Einzelnen Beitrag anzeigen

Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.453 Beiträge
 
Delphi 12 Athens
 
#5

AW: TDateOrder und GetDateOrder aus System.SysUtils nutzen

  Alt 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;
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat