DestroyWindow per Hook abfangen

[Sascha R. Lohaus]

Hallo,

ich müsste vor Freigabe meines ActiveForms nochmal auf mein eigenes
Objekt (self) zugreifen. Leider scheint es im Destroy schon zu spät
dazu zu sein. An anderer Stelle im Forum las ich, dass im Destroy
durch den Container (z.B. IE )bereits schon alles mögliche freigegeben
wurde.

Ein OnClose, o.Ä. gibt es im ActiveForm leider nicht. Messages (WM_CLOSE, etc)
helfen auch nicht, da zuerst in's Destroy gesprungen wird.

Also bleibt mir wohl nur das Benutzen von Hooks. Ich habe hier mal ein C++ Pendant:


BOOL CMeinControl:: DestroyWindow()
{
// Uninstall the WH_GETMESSAGE hook function.
if( g_hMessageHook )
{
VERIFY (::UnhookWindowsHookEx (g_hMessageHook));
g_hMessageHook = NULL;
}

DoSomething(TRUE);
return COleControl:: DestroyWindow();
}



Kann mir jemand sagen wie ich das in Delphi umsetze?

Danke
Sascha

Ps.: Delphi 7 Enterprise