Hallo zusammen.
Heute scheint bei mir mal wieder nichts zu funktionieren.
Ich will nur nen Fehler bei der Convertierung abfangen und ich bekomme ne Fehlermeldung beim Ausführen, obwohl ich die ja meiner Meinung ja hier behandle....
Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
| implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
Var
datum : TdateTime;
begin
try
datum:= StrToDateTime( edit1.Text );
except
on EConvertError do begin
showmessage(' Ist kein gültiges Datum');
edit1.Text:='';
end;
end;
end;
end. |
Daraufhin wirft mir Delphi " ....EconvertError ist aufgeteten....Prozess angehalten..." aus.
Das wollt ich mit diesem code eigentlich verhindern.
In der Hilfe hab ich nen ähnliches Beispiel gefunden, aber bis auf nen Fehler dort im code, ist da ja auch nicht mehr zu finden.....
Was mach ich falsch?
