Datumsformat umwandeln

[Jelly]

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

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;