Delphi Supports ohne out Parameter

Thema durchsuchen

Ansicht

Themen-Optionen

Supports ohne out Parameter

Ein Thema von pflaume · begonnen am 10. Okt 2012 · letzter Beitrag vom 10. Okt 2012

Vorheriger Beitrag

Nächster Beitrag

himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.371 Beiträge

Delphi 12 Athens

AW: Supports ohne out Parameter

10. Okt 2012, 09:41

Verwende mal TComponent, statt dem TInterfacedObject. [edit] oder TInterfacedPersistent, dessen Name ich ständig vergesse (Dank an Uwe)

Du nutzt das TFirstSecond als Objekt-Instanz, womit es intern keine Interfacereferenz gibt.
Suppots greift aber intern über ein Interface zu, womit also eine Interface-Referenz erstellt wird. Bei Freigabe dieser Referenz wird dann das ganze Objekt freigegeben, da es keine weiteren Referenzen gibt.

In TComponent wird die Referenzzählung der Interfaces "ignoriert" und diese steuern vorallem nicht die Freigabe.

Ein Therapeut entspricht 1024 Gigapeut.

Geändert von himitsu (10. Okt 2012 um 10:11 Uhr)