Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.453 Beiträge
Delphi 12 Athens
|
AW: TDateOrder und GetDateOrder aus System.SysUtils nutzen
31. Mär 2016, 08:18
Mit der Methode kommt sowohl auf Windows als auch auf dem Mac:
Zitat:
---------------------------
...
Im Projekt DatumsTest ist eine Exception der Klasse EConvertError mit der Meldung ''1992-02-29' ist kein gültiges Datum' aufgetreten.
...
Hier nicht:
Delphi-Quellcode:
procedure Main;
var
dt: TDateTime;
fmt: TFormatSettings;
begin
fmt := TFormatSettings.Create;
fmt.ShortDateFormat := 'YYYY-MM-DD';
fmt.DateSeparator := '-';
dt := StrToDate('1992-02-29', fmt);
Writeln(DateToStr(dt));
end;
|