Interfaces - freigabe

[Stevie]

Nein, jedesmal, wenn eine Zuweisung eines Interfaces stattfindet, wird _AddRef aufgerufen und wenn die Variable den Scope verliert, wird _Release aufgerufen. (Technisches Detail: Dafür ist die procedure _IntfCopy aus der System.pas zuständig, deren Aufruf der Compiler an die richtigen Stellen bastelt) Außerdem hast du einen (ich vermute Tippfehler) in deinem Source, es muss result := TMyImplementation.Create; heißen.

Ablauf bei deinem Beispiel (vereinfacht):

- TMyImplementation instanz wird erzeugt
- Instanz wird auf result zugewiesen (QueryInterface wird aufgerufen, um zu schauen, ob TMyImplementation IMyInterface implementiert.
- _AddRef wird aufgerufen -> RefCount = 1
- Rückgabe Ergebnis von CreateTollesInterface wird in einer Variablen gespeichert

Solange diese Variable gültig ist (bei einer lokalen Variable z.B. bis zum Ende der Routine) bleibt der RefCount auf 1 (oder noch erhöht, durch weiteres Zuweisen). Verliert sie den Scope, wird _Release aufgerufen. Sinkt der RefCount wieder auf 0, wird Free aufgerufen. (sofern von TInterfacedObject abgeleitet)