Tutorial: Warnungen und Hinweise vom Delphi Compiler

[MaBuSE]

Mist die 24h zum Editieren sind um

Zitat von MaBuSE:

Oft sieht man auch folgendes:

Delphi-Quellcode:

...
procedure test;
var
  o: TObject;
begin
  try
    o := TObject.Create;
    machWasMit(o);
  finally
    o.Free;
  end;
end;
...

Hier gibt der Delphi Compiler auch eine Warnung bei der o.Free Zeile aus: Variable 'o' ist möglicherweise nicht initialisiert worden.
Das ist genau das Gleiche.
So soll try finally nicht verwendet werden! Das macht keinen Sinn. Falls in "TObject.Create;" oder "MachWasMit(o);" ein Fehler auftritt, fängt try...finally die Exception, und springt in den finally Block. Es werden nun die Befehle zwischen finally und end ausgeführt. Beim Erreichen des end; wird dann die gefangene Exception ausgelöst. Und die Prozedur bricht an der Stelle ab.
Richtig ist folgendes Beispiel (gleiches Verhalten, aber keine Warnung).

Delphi-Quellcode:

...
procedure test;
var
  o: TObject;
begin
  o := Tobject.Create;
  try
    machWasMit(o);
  finally
    o.Free;
  end;
end;
...

Das kann man auch noch mal im Exceptional exceptions im Developer Network von CodeGear nachlesen.

Ich wollte zu diesem Thema noch einen Link angeben, in dem das noch mal beschrieben wird.
(Ich musste erst nochmal meine Bookmarks duchsuchen)

Es ist der Blog von Allen Bauer. Er schrieb am 03.11.2006 einen interesannten Artikel zu genau diesem Thema:
http://blogs.codegear.com/abauer/arc.../03/28916.aspx

Viel Spaß beim Lesen.