Einzelnen Beitrag anzeigen

Benutzerbild von Flocke
Flocke

Registriert seit: 9. Jun 2005
Ort: Unna
1.172 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#11

Re: Goto in andere Procedure...oder gibts ne Alternative?

  Alt 29. Aug 2005, 15:05
Zitat von marabu:
Hoffentlich schaut wenigstens Flocke mal in die Online-Hilfe - Assert (Prozedur) ...
Sicher tu ich das 8)
1. was löst eine fehlgeschlagene Assertion aus? Eine Exception vom Typ EAssertionFailed!
2. Assertions taugen nur zum Debuggen, da man mit einem Compilerschalter ganz einfach alle komplett deaktivieren kann.

Zitat von glkgereon:
Meine Onlinehilfe (D2k5) kennt Assert nicht.
Meine auch nicht!

Zitat von tommie-lie:
die sauberste Möglichkeit, auf so einen Fehler zu reagieren.
Meiner Meinung nach nicht. Die "sauberste" Möglichkeit wäre (in meinen Augen), aus den booleschen Funktionen Prozeduren zu machen, die im Falle eines Fehlers direkt eine Exception auslösen. Der Rumpf sähe dann so aus:

Delphi-Quellcode:
Init;
WriteLn('Init OK');
FileInit;
WriteLn('FileInit OK');
Analyse;
WriteLn('Analyse OK');
FileUnInit;
WriteLn('FileUnInit OK');
UnInit;
WriteLn('UnInit OK');
... und im Falle eines Fehlers die Exception einfach durchschlagen lassen (oder halt diesen Block mit try..except umranden und eine "schöne" Fehlermeldung ausgeben).
Volker
Besucht meine Garage
Aktuell: RtfLabel 1.3d, PrintToFile 1.4
  Mit Zitat antworten Zitat