Zitat:
Hast Du Deine Klasse von TInterfacedPersistent abgeleitet oder von TInterfacedObject?
TSkinPopUpMenu = class(TInterfacedPersistent, ISkinPopUpMenu)
Alle von TInterfacedPersistent.
Wird Dein Destructor des Objektes irgendwann aufgerufen?
Delphi-Quellcode:
destructor TSkinPopUpMenu.Destroy;
begin
inherited;
end;
Nein niemals weil ich kein Free verwende.
Aber ich habe ihn addiert.
gruss