Freigabe von lokal erzeugten Objekten

[TiGü]

Zitat von Der schöne Günther:

Delphi-Quellcode:

...
   wicImage := TWICImage.Create();
...

Wer Create sagt, muss auch Free sagen!

[Der schöne Günther]

Jaja, vereinfachtes Beispiel und so.

In Wirklichkeit habe ich immer nach Alister Christie: Escaping the Try...Finally...Free Nest (http://www.youtube.com/watch?v=6Ob8fHtjSZI) lokal einen Speicherwächter der mir beim Verlassen der Methode die lokalen Objekte abräumt.

[TiGü]

Und wie räumst du auf, wenn eine Exception fliegt?

[Der schöne Günther]

Gar nicht, das macht der interface-referenzierte Speicherwächter.

Beispiel:

Delphi-Quellcode:

procedure noMemLeakHere();
var
   memGuard: IMemGuard;
   myLocalObject: TObject;
begin
   myLocalObject := TObject.Create();
   TMemGuard.Guard(memGuard, myLocalObject);

   // Wilde Dinge geschehen jetzt...

   // Wilde Dinge enden jetzt...
end;

Wenn eine Exception auftritt wird geht der Referenzzähler von memGuard auf Null und er wird abgeräumt. Und in seinem Destruktor zerstört er auch myLocalObject .

Schau dir das Video am besten mal an, ist Schritt für Schritt super erklärt

[TiGü]

Ah, okay...habe nur mit einen halben Auge und ohne Ton drüberspult und mir fiel die Sache ab Minute 18:00 auf.
Wunderte mich das keine MessageBox mit "Three" kam, aber beim zweiten Anschauen mit Ton wird es klar...er kommt ja gar nicht erst zum Create des dritten Objects.

Das ist eigentlich ganz schön clever.
Lohnt sich das auch sonst für nur eine Objekt-Erzeugung?
Ich habe kaum verschachtelte try-finallys in meinen Code (gefunden).

[Der schöne Günther]

Ein Beispiel was ich den Zusammenhang auch immer sehe ist die Sanduhr: Mauszeiger auf Sanduhr setzen, Dinge tun und sich durch diese Technik sicher sein, dass der Cursor, auch im Exception-Fall, automatisch wieder auf "Normal" zurückgesetzt wird.

Ich bin aber kein Freund davon:
Siehe http://www.delphipraxis.net/180596-h...ml#post1260998

Ich benutze es wirklich nur wenn ich mehr als ein Objekt lokal erzeuge und freigeben muss. Gibt neben den beiden sicher noch mehr Anwendungsfälle.