Tag Monat Jahr in auf System eingestelltest Datumsformat

[Sharky]

Hai Stephan,

mit EncodeDate kannst Du die Zahlen in ein TDate umwandeln. Mit DateToStr dann in einem String.

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage (DateToSTr (EncodeDate(2004,8,25)));
end;