{
The following variables are predefined in delphi:
- DateSeparator
- ShortDateFormat
- LongDateFormat;
- ShortMonthNames;
- LongMonthNames;
- ShortDayNames;
- LongDayNames;
}
// Change date format
// Datumsformat wechseln procedure TForm1.Button1Click(Sender: TObject); begin DateSeparator := '.';
ShortDateFormat := 'dd.mm.yy';
LongDateFormat := 'dddd, dd.mmmm.yyyy'; end;
// Get day and month names
// Tagesnamen und Monatsnamen auslesen procedure TForm1.Button2Click(Sender: TObject); begin {shows the short and long month name of month number 11} ShowMessage(ShortMonthNames[11] + ' - ' + LongMonthNames[11]);
{shows the short and long day name of day number 6} ShowMessage(ShortDayNames[5] + ' - ' + LongDayNames[5]); end;