Einzelnen Beitrag anzeigen

Benutzerbild von BenBE
BenBE

Registriert seit: 3. Apr 2005
Ort: Jahnsdorf
48 Beiträge
 
Delphi 5 Enterprise
 
#7

Re: try .. except ... oder finally?

  Alt 30. Jun 2005, 16:41
[ot]Irgendwie wundert es mich hier kaum noch, dass pro Tag huntert verschiedene Themen aufgemacht werden und viele davon auch noch doppelt ... Jeder sagt was, aber keine hat von dem, was er sagt, Ahnung ... Die angesprochenen bitte demnächst erst denken und ansonsten Klappe halten; TIA.[/ot]

Aber gut, zum Thema:
Wenn der Konstruktor oder eine Operation mit einem Objekt fehlschlagen kann, so sieht die richtige Verfahrensweise so aus:
Delphi-Quellcode:
try
    Image := TBitmap.Create;
    try
        Image.LoadFromFile(GehtSchief);

        //Bild weiterverarbeiten
    finally
        FreeAndNil(Image);
    end;
except
    ShowMessage('Fehler aufgetreten; interessiert aber eh keinen!');
end;
HTH.

MfG,
BenBE.

P.S.: Diese Informationen hätten auch in der DOH gestanden; man hätte sich nur mal den Object Pascal Reference Part durchlesen müssen ...

Anm.: Ich weiß, dass man sich durch solche Posts nicht beliebter macht, aber in diesem Thread war die Unwissenheit, Postcount-Hochtreiberei und ungetester Source in höchster Konzentration vertreten.
Benny Baumann
Je komplexer das System, desto kleiner die Fehler; je kleiner die Fehler, desto häufiger ihr Auftreten!
  Mit Zitat antworten Zitat