try except in Funktion funktioniert nicht

[Konse]

Zitat von Mazel:

Nun dachte ich, weil ich die Funktion öfter vwerwende, diese in eine extra Funktion zu lagern damit für mich der Zugriff und Überblick einfacher wird. Jedoch funktioniert dies leider nicht. Ich dachte, das try except würde genau so reagieren wie im OnChange Ereignis, das tut es scheinbar aber nicht.

das try except reagiert richtig.
nur du hast deine funktion falsch geschrieben.

wenn du dir den code den ich dir da geschickt habe bzw. die kommentare anschaust, dann
solltest du es sehen.

Delphi-Quellcode:

Edit1.Text := DateTimeToUnixTime(
       StrToDateTime(Edit1.Text) // hier kann auch eine exception geworfen werden diese fängst du nicht ab
);

hättest du das strToDateTime in deine Funktion gesteckt und deine funktion so aufgebaut:

Delphi-Quellcode:

function DateTimeToUnixTime(DateTime: string): String;
begin
  try
    Result := IntToStr(DateTimeToUnix(StrToDateTime(DateTime)));
  except
    Result := IntToStr(DateTimeToUnix(0));
  end;
end;

hätte es so funktioniert wie du es haben wolltest, da die exception jetzt innerhalb
deines try except blockes auftritt.
vorher hattest du diese nicht gecatched!

beste grüße
konse