Interface Referenzzählung

[QuickAndDirty]

Hallo liebe Delphianer,
ich habe gestern zu meinem Entsetzen festgestellt das die Referenzzählung von Objekten die ein IInterface implementieren
NICHT gestartet wird wenn man sie einer Objectvariable zuweist. bzw. diese wieder freigibt...

Also

Delphi-Quellcode:

Programm bla;
uses 
  alles;

type
  IMyinterface = Interface(IInterface)
   bla
  end;

  TMyInterfacedObject= class(Tinterfacedobject, IMyInterface)
    bla
  end; 

var meinObjekt: TMyInterfacedObject;
    meinInterface: IMyInterface;

Begin
  meinObject := TMyInterfacedobject.create;
  meinInterface := TMyInterfacedobject.create;
end;

Bei Programm ende wird nur der destruktor von MeinInterface aufgerufen nicht aber der von MeinObject.

1. Wieso?
2. Kann ich das Ändern?
3. Was passiert bei Typecasts Classe zu Interface, Interface zu classe, kommt die Refernzzählung dann durcheinander?
4. ...äh..scheiße nochmal, warum geht das bei MeinObject nicht....

[jbg]

Zitat:

Zitat von QuickAndDirty

1. Wieso?

Weil Referenzzählung nur für Interfaces gilt. Eine Klasse die von TInterfacedObject abgeleitet ist, stellt zwar alles Notwenidge für ein Interface bereit, ist aber selbst keins.

Zitat:

2. Kann ich das Ändern?

Klar, wenn du die Referenzzählung von Hand übernimmst. Der Compiler wird dir hierbei nicht helfen.

Zitat:

3. Was passiert bei Typecasts Classe zu Interface, Interface zu classe, kommt die Refernzzählung dann durcheinander?

Bei Klasse zu Interface wird der Referenzzähler um 1 erhöht. Interface zu Klasse erlaubt der Compiler schon mal nicht (man kann sich aber Abhilfe schaffen, ändert dann aber trotzdem nichts am Referenzzähler)



Ach ja: Du hast gerade herausgefunden, warum man Interfaces mit Objektreferenzen nicht mischen soll: Die Referenzzählung spielt verrückt und die Objektreferenz oder das Interface zeigen auf ein nicht mehr vorhandenes Objekt.

[QuickAndDirty]

Zitat:

Zitat von jbg

Ach ja: Du hast gerade herausgefunden, warum man Interfaces mit Objektreferenzen nicht mischen soll: Die Referenzzählung spielt verrückt und die Objektreferenz oder das Interface zeigen auf ein nicht mehr vorhandenes Objekt.

Das ist nicht gerade ein motivierender Lernerfolg!
Gibt es ein Class2Interface Tool, damit ich den public Teil wenigstens nicht ständig doppelt deklarieren muss?

[Bernhard Geyer]

Zitat:

Zitat von jbg

Ach ja: Du hast gerade herausgefunden, warum man Interfaces mit Objektreferenzen nicht mischen soll: Die Referenzzählung spielt verrückt und die Objektreferenz oder das Interface zeigen auf ein nicht mehr vorhandenes Objekt.

Genau diesen Fall der gemischten Verwenudng von Interfaces und Objektreferenzen hat uns vor ein paar Jahren schon mal einige Tage gekostet. Also: Wenn Interfaces, dann immer nur über dieses Interface zugreifen!

[Phoenix]

Ich persönliche mache es so:
Ich erstelle ein Interface-Objekt das KEINE Referenzzählung implementiert, und behandele es wie ein Objekt. Das heisst ich kümmere mich selber um die Freigabe. Es geht hier ja nicht um COM-Interfaces sondern um eigene, und da hast Du das Verhalten selber in der Hand.

[mjustin]

Zitat:

Zitat von QuickAndDirty

Zitat:

Zitat von jbg

Ach ja: Du hast gerade herausgefunden, warum man Interfaces mit Objektreferenzen nicht mischen soll: Die Referenzzählung spielt verrückt und die Objektreferenz oder das Interface zeigen auf ein nicht mehr vorhandenes Objekt.

Das ist nicht gerade ein motivierender Lernerfolg!
Gibt es ein Class2Interface Tool, damit ich den public Teil wenigstens nicht ständig doppelt deklarieren muss?

Ja: das Extract Interface Refactoring in der IDE. Einfach rechte Maustaste auf der Klassendeklaration und dann aus dem Kontextmenü wählen. Man kann die zu extrahierenden Methoden dann auch einzeln deaktivieren. Die Klasse erhält dann auch in der Deklaration das Interface.

Das sieht dann bei einem Formular so aus:

Delphi-Quellcode:

type
  IMainFrm = interface
  procedure Button1Click(Sender: TObject);
  procedure Button2Click(Sender: TObject);
  procedure Button3Click(Sender: TObject);
  procedure FormCreate(Sender: TObject);
  end;

  TMainForm = class(TForm, IMainFrm) 
  ...

Refactorings sind für manche der einzige Grund, auf eine neuere Version zu wechseln - was man da bei grossen Projekten an Zeit spart, gleicht die längere Startzeit der IDE locker aus :)

[QuickAndDirty]

Zitat:

Zitat von Phoenix

Ich persönliche mache es so:
Ich erstelle ein Interface-Objekt das KEINE Referenzzählung implementiert, und behandele es wie ein Objekt. Das heisst ich kümmere mich selber um die Freigabe. Es geht hier ja nicht um COM-Interfaces sondern um eigene, und da hast Du das Verhalten selber in der Hand.

Mir gefällt aber gerade die Referenzzählung, und das ich mir über die Verwendung nach einer Freigabe und so "theoretisch" keine Sorgen machen muss. Und einige andere Sachen die evtl. einen eigenen Thread brauchen.
Das reale InterfacedObject zu dem Beispiel ist übrigens ein ILogFile/TLogFile. Das schöne ist das ich wenn es einmal erstellt ist alles Loggen kann, alles bis zu letzt ohne wissen zu müssen wo ich das Objekt/interface am besten freigebe.

[himitsu]

Eine Konvertierung hab ich noch nicht gefunden ... brauchst dir ja nur mal der verwurschtelten Code von himXML ansehn, die Klassen in himXML.pas sind alle so konzipiert, daß sie entwerder als Klasse oder als Interfache kompiliert werden können und der Zugriff auf die objektinternen Variablen und Funktionen werden notfalls über ein zusätzliches internes Interface umgeleitet.

[Blup]

Zitat:

Zitat von QuickAndDirty

Bei Programm ende wird nur der destruktor von MeinInterface aufgerufen nicht aber der von MeinObject.

Der Destructor Destroy ist aus gutem Grund Virtual.
Wer einen Destructor mit eigenem Namen hinzufügt, sollte auch Destroy überschreiben und diesen dort aufrufen.

Zitat:

Zitat von QuickAndDirty

Gibt es ein Class2Interface Tool, damit ich den public Teil wenigstens nicht ständig doppelt deklarieren muss?

Man könnte z.B. von einer Basisklasse ableiten, die schon das Standardverhalten für das erforderliche Interface implementiert.
Oder auch entsprechend Hilfe "Implementieren von Schnittstellen durch Delegation".

Ansonsten Copy + Paste für die Deklaration und Shift + Strg + C um die Methodenrümpfe zu erstellen.
Dann gibts noch solche Sachen wie ModelMaker ...

[QuickAndDirty]

Zitat:

Zitat von Blup

Zitat:

Zitat von QuickAndDirty

Bei Programm ende wird nur der destruktor von MeinInterface aufgerufen nicht aber der von MeinObject.

Der Destructor Destroy ist aus gutem Grund Virtual.
Wer einen Destructor mit eigenem Namen hinzufügt, sollte auch Destroy überschreiben und diesen dort aufrufen.

Willst du mich vera...... ? Was glaubst du wie ich wohl herausbekommen haben das der Destruktor NICHT aufgerufen wird?
"BLA" enthält natürlich einen Überschriebenen Destruktor und dieser ist natürlich auch implementiert. Und natürlich ist das nur mal QuickAndDirty dahingetippt , ich wollte das mitlerweile 620 K Kodezeilen lange Programm nicht vollständig Posten, auch wenn so natürlich einige Dinge aus dem Zusammenhang gerissen erscheinen, MEA CULPA.

Zitat:

Zitat von Blup

Zitat:

Zitat von QuickAndDirty

Gibt es ein Class2Interface Tool, damit ich den public Teil wenigstens nicht ständig doppelt deklarieren muss?

Man könnte z.B. von einer Basisklasse ableiten, die schon das Standardverhalten für das erforderliche Interface implementiert.
Oder auch entsprechend Hilfe "Implementieren von Schnittstellen durch Delegation".

Ansonsten Copy + Paste für die Deklaration und Shift + Strg + C um die Methodenrümpfe zu erstellen.
Dann gibts noch solche Sachen wie ModelMaker ...

Stimmt CopyPaste und man muss beide immer selbstständig Synchron halten, imho ein kleiner Nachteil wenn man davon mal mehr hat oder
wenn man bereits viele Klassen hat die man jetzt als Interface braucht.