trystrtodatetime

[Luckie]

Kuck dir doch mal die Parameter an. Als erstes übergibst du den String mit dem Datum und der zweite Parameter enhält dann das Datum, wenn es geklappt hat.

Delphi-Quellcode:

var
  s: String;
  Mydate: TDateTime;
begin
  s := '2004-08-21';
  if TryStrToDateTime(s, Mydate) then
    ShowMessage('hat geklappt')
  else
    ShowMessage('Hat nicht geklappt');