Hi,
ich lade aus einer XML-Datei einen Datumswert im Format yyyy-mm-dd aus. Nun möchte ich diesen Wert in einen normalen TDate-Typen reinbekommen ohne das Datum mit Stringoperationen auseinander nehmen zu müssen. Das einfache Verwenden von StrToDateDef funktioniert da leider nicht - da bekomme ich wirklich auch nur den Default-Wert heraus.

Suchen hat mir so spontan leider auch nichts Erträgliches gebracht.
Hat jemand einen Tipp für mich?

Chris

DateToString gibts in der Variante mit 2 Parameter, bei dem der 2. Parameter die FormatSettings angibt.

markieren

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
var
 d : TDate ;
 fs : TFormatSettings ;
begin
     fs.DateSeparator := '-' ;
     fs.ShortDateFormat := 'yyyy-mm-dd' ;
     d := StrToDate ('2007-05-08',fs) ;
     caption := FormatDateTime ('dd.mm.yyyy',d) ;
end;