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

[juergen]

Hallo zusammen,

ich muss externe Daten verarbeiten wo u.a. auch ein Datum im Format YYYYMMDD als String vorhanden ist.
Den String muss ich in meinem Programm dann in Datetime umwandeln.

Meine Frage:
Wie kann ich YYYYMMDD (String) in Delphi umwandeln in Datetime, egal welche Datumseinstellung der Server hat, z.B. 2/15/2019?

Vielen Dank schon mal vorab!

[Michael II]

Mit EncodeDate, zum Beispiel

Delphi-Quellcode:

uses System.DateUtils;

EncodeDate( 2019,2,15 );

hast du's versucht?

[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;

[juergen]

Interessant...
Ich zeige das umgewandelte YYYYMMDD als Datetime in einem cxGrid von Devexpress in einer Column an, die als Datetime definiert ist.

@Michael,
Dein Vorschlag zeigt in Showmessage offensichtlich die richtigen Werte an, finde ich. In meinem cxGrid steht dann aber in jeder Zeile 12/30/1899...

@Uwe,
dein Vorschlag funktioniert!
Es hat etwas gedauert bis ich es verstanden hatte.

IMHO hätte Michaels Vorschlag auch funktionieren müssen, ich weiß aber nicht warum es nicht tut.



Vielen Dank euch beiden!