was funktioniert den daran nicht genau?
also der unterschied zwischen deine beiden dingen ist:
Delphi-Quellcode:
try
Edit1.Text := IntToStr(DateTimeToUnix(
StrToDateTime(Edit1.Text)
// hier wird auch eine exception geworfen falls du kein gültiges datum hast
));
except
Edit1.Text := IntToStr(DateTimeToUnix(0));
end;
bei deinem anderem beispiel jedoch nicht
Delphi-Quellcode:
function DateTimeToUnixTime(DateTime: TDateTime): String;
begin
try
Result := IntToStr(DateTimeToUnix(DateTime));
except
Result := IntToStr(DateTimeToUnix(0));
end;
end;
dort kann jetzt immernoch ein fehler passieren in :
Delphi-Quellcode:
Edit1.Text := DateTimeToUnixTime(
StrToDateTime(Edit1.Text)
// hier kann auch eine exception geworfen werden diese fängst du nicht ab
);
hoffe ich konnte dir helfen
gruß Konse