Classe/Interface aus WinProc aufrufen

[EWeiss]

Zitat:

Dann tippe ich wirklich auf gegenseitige Referenzierung.

Kann nicht sein denn wenn kein Submenu existiert dann wird diesbezüglich auch nichts Referenziert.
Keine einzige Variable die damit im Zusammenhang stehen könnte wird dann verwendet oder initialisiert.

gruss

[stahli]

Habe das gerade korrigiert.

Ich schreibe hier schnell mal parallel während der Arbeit. Da bin ich manchmal nicht konzentriert genug. :-(

Dann musst Du mal schauen, wo da noch eine Referenz gehalten wird.

[EWeiss]

Zitat:

Zitat von stahli (Beitrag 1381150)

Habe das gerade korrigiert.

Ich schreibe hier schnell mal parallel während der Arbeit. Da bin ich manchmal nicht konzentriert genug. :-(

Dann musst Du mal schauen, wo da noch eine Referenz gehalten wird.

Dank für deine Hilfe..
Werde ich wohl selbst fixen müssen wie auch immer. ;)

gruss

[TiGü]

Delphi-Quellcode:

TSkinPopUpMenu = class(TInterfacedObject, ISkinPopUpMenu...)
   ...
  protected
    function _AddRef: Integer; stdcall;
    function _Release: Integer; stdcall;
  public
   ...
end;

...

function TSkinPopUpMenu._AddRef: Integer;
begin
  Result := inherited _AddRef;
end;

function TSkinPopUpMenu._Release: Integer;
begin
  Result := inherited _Release;
end;

Dann in den eigenen _AddRef und _Release Haltepunkte setzen und vergleichen.
Irgendwo gibt es das Ungleichgewicht.

Fortgeschrittenen-Tipp:
Haltepunkte setzen aber in den Eigenschafen Break/Anhalten deaktivieren und den Call Stack mitloggen in der Ereignisanzeige:

[EWeiss]

Danke werde das mal testen obwohl _AddRef , _Release eigentlich geerbt werden :)

gruss

[Neutral General]

Zitat:

Zitat von EWeiss (Beitrag 1381180)

Danke werde das mal testen obwohl _AddRef , _Release eigentlich geerbt werden :)

Die Ableitung ist ja dafür da, dass du Breakpoints setzen kannst..

[EWeiss]

Zitat:

Zitat von Neutral General (Beitrag 1381181)

Zitat:

Zitat von EWeiss (Beitrag 1381180)

Danke werde das mal testen obwohl _AddRef , _Release eigentlich geerbt werden :)

Die Ableitung ist ja dafür da, dass du Breakpoints setzen kannst..

Ja habe ich schon verstanden .. Danke.

gruss

[stahli]

Ich hätte das auch schon vorgeschlagen, dachte aber, das ginge nicht, weil _AddRef ja nicht virtuell ist und somit nicht überschrieben werden kann...

Gibt es (zum Verständnis) eine Erklärung, warum das so funktioniert?

[Zacherl]

Zitat:

Zitat von stahli (Beitrag 1381185)

Ich hätte das auch schon vorgeschlagen, dachte aber, das ginge nicht, weil _AddRef ja nicht virtuell ist und somit nicht überschrieben werden kann...

Gibt es (zum Verständnis) eine Erklärung, warum das so funktioniert?

Sämtliche Methoden, die du in einem Interface deklarierst, sind automatisch

Delphi-Quellcode:

virtual

(und

Delphi-Quellcode:

abstract

).

Delphi-Quellcode:

_AddRef

,

Delphi-Quellcode:

_Release

und

Delphi-Quellcode:

QueryInterface

werden von Delphi automatisch zu jedem Interface hinzugefügt, um die COM Kompatibilität zu gewährleisten.

Im Grunde sind COM Interfaces auch lediglich Klassen, welche mindestens die oben genannten virtuellen Methoden besitzen. Unter C++ sieht man das ganz schön, denn da ist das Basisinterface IUnknown einfach als normale Klasse mit den entsprechenden 3 virtuellen Methoden deklariert (eine Unterscheidung zwischen

Delphi-Quellcode:

class

und

Delphi-Quellcode:

interface

gibt es hier gar nicht). Die Unterscheidung - wie man sie in Delphi hat - ist vermutlich nur vorhanden, weil Delphi die Interfaces ja tatsächlich auch unterschiedlich behandelt (automatischer RefCount und Freigabe, etc). In anderen Sprachen hat man dieses Verhalten nicht (man muss manuell

Delphi-Quellcode:

_AddRef

aufrufen, sobald man eine neue Referenz erzeugt bzw. Wrapperklassen verwenden, die das für einen übernehmen).

[stahli]

Oha, vielen Dank! Wichtiger Hinweis!