YYYYMMDD (string) umwandeln in Datetime, egal welches PC-Datumsformat

[Uwe Raabe]

Delphi-Quellcode:

var
  dt: TDateTime;
  S: string;
  myfmt: TFormatSettings;
begin
  myfmt.DateSeparator := '/';
  myfmt.ShortDateFormat := 'YYYY/MM/DD';
  S := '20190215';
  dt := StrToDate(S.Insert(6, '/').Insert(4, '/'), myfmt)
end;