Datum auf Fehler prüfen - Deutsches Datumsformat

[Nersgatt]

Ja, es gibt tryStrToDate.

Kleines Beispiel für Wolfgang:

Delphi-Quellcode:

var str : string;
    d : TDateTime;
begin

  str := InputBox('Datum', 'Bitte geben sie ein Datum ein', '');
  if tryStrToDate(str, d) then
  begin
    showMessage('Sie haben ' + FormatDateTime('ddd, dd. MMMM yyyy', d) + ' eingegeben')
  end;

end;