Exception?????

[Carl Friedrich Gaus]

Ich verstehe Exception nicht. zum Beispiel:

Delphi-Quellcode:

procedure TForm1.Button2Click(Sender: TObject);
var a: double;
begin
try
     a := 2/0;
except
     on EZeroDivide do label1.caption:='teilungdurch 0 ';
end;
end;

da bricht das programm einfach ab mit der gewohnten Fehlermeldung - ich möchte aber natürlich, das es weiter läuft und label1.caption teilungdurch 0 anzeigt.

weiss jemand, was ich da falsch verstanden habe???

karl

[edit=MrSpock]Code Tags eingefügt. Mfg, MrSpock[/edit]

[negaH]

Jo, du verwechselst die Debug Funktionen der Delphi IDE mit dem Starten deiner EXE als normale Anwendung OHNE Debugger.

Also, entweder mal deine EXE aus dem Explorer starten, oder in der Delphi IDE den Debugger deaktivieren.

gruß hagen

[Chewie]

try..except dient dazu, eigenen Code beim Auftreten einer Exception ausführen zu lassen. Um Code auszuführen, egal, ob eine Exception auftaucht oder nicht, dient try..finally.

[Carl Friedrich Gaus]

danke, negaH, jetz weiss ich was ich verwechsle.
Aber wie kann ich in der Delphi IDE den Debugger deaktivieren???

ich habe delphi 5
( tools - umgebungsoptionen -????? )

[mytar]

Du kannst das ganze auch unter Tools -> Debuggeroptionen unter einer bestimmten Registerkarte einstellen.

Dort kannst du alles Delphi-exceptions aktivieren bzw. deaktivieren und auch einzelne Exceptions mit der Nameneingabe aktivieren. In der EXE selbst funktioniert die Exception sicherlich.

mytar

[negaH]

Nenn mich Hilfe und drücke mir am Rücken auf F1
Also Delphi5\IDE\Menu\Tools\Debugger Einstellungen\Allgemein\Integerierter Debugger Checkbox abhacken.

Gruß Hagen

[NicoDE]

Zitat von negaH:

Nenn mich Hilfe und drücke mir am Rücken auf F1

"Die Hilfedatei C:\Programme\Borland\Delphi\Help\negaH.hlp wurde nicht gefunden. Prüfen Sie, ob die Datei auf der Festplatte vorhanden ist. Installieren Sie sie gegebenenfalls erneut."

[negaH]

Dann musste mich patchen, momentan habe ich mir einen Wurm eingefangen, weil mein OS durch C Programmierer erstellt wurde und ich somit nicht Feuerfest bin, ich vertrage keine FireWall Heute abend werde ich aber mit meinem Großrechner connecten und ein Update durchführen Vorher laufe ich Blau an und schließe alle Fenster.
Sorry, out of Order, please download first the newest internet connection kit to connect to the internet.

Gruß Hagen

[Carl Friedrich Gaus]

danke, leute, ich hab jetzt alles im griff: mit maus und Hilfeknopf kann nichts mehr schiefgehn!

Aber sowas muss einem ja schliesslich auch mal erklärt werden!!
?? bin ich nicht der ganz echte gaus??

[NicoDE]

Zitat von Carl Friedrich Gaus:

bin ich nicht der ganz echte gaus?

Doch doch, ziemlich authentisch sogar.

Gruss Nico

ps: damals gab es wahrscheinlich weder F1 noch negaH.hlp