Zitat:
An
exception block that contains no
exception handlers, but instead consists only of a list of statements, handles all exceptions. For example,
try
...
except
HandleException;
end;
Here, the HandleException routine handles any
exception that occurs as a result of executing the statements between try and except.
...schrieb die Delphi-Hilfe so schön.
Delphi7 schreibt aber bei mir in dieser Try-Except-Routine ...
Delphi-Quellcode:
try
fl_colorline := getcolor(Flaechen_ColorLine.Text);
fl_colorpt := getcolor(Flaechen_ColorPt.Text);
line_colorline := getcolor(Linien_ColorLine.Text);
line_colorpt := getcolor(Linien_ColorPt.Text);
pt_colorpt := getcolor(Punkte_ColorPt.Text);
fl_radius := StrToInt(Flaechen_Radius.Text);
line_radius := StrToInt(Linien_Radius.Text);
pt_radius := StrToInt(Punkte_Radius.Text);
fl_drawline := Flaechen_Check1.Checked;
fl_drawpt := Flaechen_Check2.Checked;
line_drawpt := Linien_Check1.Checked;
except
HandleException;
ShowMessage('
EXCEPTION!!!!');
end;
...
[Error] Unit3.pas(92): Undeclared identifier: 'HandleException' ...
Warum tritt diese Meldung auf (in der Hilfe ist er doch dokumentiert)? Braucht man für dieses HandleException etwa eine bestimmte
Unit? Und wenn das bei mir so nicht funktionieren sollte, steht dann hier die Frage, wie ich sonst alle Exceptions, die in dem Befehlsblock zwischen Try und Except auftreten, blocken kann (sie erscheinen nicht auf dem Bildschirm) und dafür dann eigene Maßnahmen zur Behandlung des Fehlers ergreifen kann (Hier als Beispiel die Ausgabe in ShowMessage).