Gültiges Zeitformat

[Union]

Zitat von simonko:

Wie kann ich überprüfen ob ein string ein gültiges zeitformat enthält?

z.b 14:30:20 oder auch nur 14:30

Delphi-Quellcode:

function IsTimeStringValid(TimeString : string) : boolean;
var
  ADateTime : TDateTime;
begin
   result := true;
   try
     ADateTime := StrToDateTime(TimeString);
   except
     result := false;
   end;
end;

[edit]Der Hai war wieder schneller[/edit]