TWinControl via TInterfacedObject via TInterfacedPersistent

[Zacherl]

Zitat von Schokohase:

Wenn du dir selber aber die Interface Referenz nicht merkst [...] und du gibst eine Interface-Referenz davon heraus, dann tickt ab da die RefCount-Bombe und die kann zu jedem Zeitpunkt platzen.

Stimmt, das hatte ich nicht bedacht

Generell sollte es aber doch trotzdem möglich sein (wenn man sich dann eben 1 Interface-Referenz merkt), ein Leaken zu vermeiden, wenn man entsprechende AddRef und Release Aufrufe immer ausschließlich in Paaren ausführt. Ich vermute, dass hier einfach irgendwo ein paar versteckte AddRef Aufrufe stattfinden (z.B. innerhalb eines API Calls) zu denen es kein Release gibt.

Zitat von EWeiss:

[Genau so habe ich es umgesetzt also self mit FProxy ersetzt.
Dann die ganzen OnEvents.. nach TAudioVolumeProxy portiert.

Da die ganzen Events strict private sind konnte ich von außen die Events nicht mehr zuweisen.
Danach habe ich es dann gelassen

Jaa, also das strict kannst du auch weglassen, aber muss zugeben, dass ich die Komponente auch nicht in ihrer Gesamtheit angeschaut habe, weshalb ich nicht weiß, ob es den Aufwand wert ist.

Was du allerdings mal machen könntest, ist AddRef und Release zu überschreiben und Breakpoints zu setzen. Dann kannst du vielleicht nachvollziehen, wo es zu Aufrufen von AddRef kommt, ohne dass danach Release aufgerufen wird.