String = Datum Prüfen

[Aenogym]

hi aljosha,

du kannst die exception foglendermaßen abfangen:

Delphi-Quellcode:

const
  datum = '21.03.1988';
var
  TempDate: TDate;
begin
  try
    //versuchen, string umzuwandeln
    TempDate := StrToDate(datum);
  except
    //fallös eine EConvertError-Exception auftritt
    on E: EConvertError do
      //fehler melden
      ShowMessage(E.ClassName + #13#10 + E.Message);
end;

aenogym