PlugIn-Dll: TPUtilWindow freigeben / Erzeugung verhindern?

[worker]

Ich habe ein PlugIn für eine fremde Anwendung geschrieben.
Das PlugIn liegt als Dll vor und hat ein visuelles Fenster.

Mein PlugIn erzeugt irgendwann, aus einem mir nicht nachvollziehbaren Grund (ich rufe kein AllocateHwnd o.ä. manuell auf), ein Fenster der Klasse TPUtilWindow.

Die Hostanwendung gibt in bestimmten Zeitintervallen alle ungenutzten PlugIns frei, um Ressourcen zu sparen.

Dieses TPUtilWindow wird dabei allerdings von meinem PlugIn nicht freigegeben - wie sollte es auch? Ich kenne es ja nicht und weiß nichtmal, wieso es wann erzeugt wird.

In der WindowProc dieses TPUtilWindow stehen nun irgendwelche Zeiger auf Code aus meiner Dll, die aber entladen worden ist.

Wenn nun die Hostanwendung irgendwann versucht, das PlugIn neu zu initialisieren, da es benutzt werden soll, oder das TPUtilWindow aus irgendeinem anderen Grund eine Message bekommt, so stürzt die Hostanwendung ab, da das TPUtilWindow auf eine nicht vorhandene Adresse (Dll ist ja entladen) zugreifen will.

Wie kann ich

a.
entweder verhindern, dass dieses TPUtilWindow überhaupt erzeugt wird, oder

b.
dieses zerstören, obwohl ich sein Handle ja nicht kenne. (Irgendwelche Fenster der Klasse TPUtilWindow kann ich nicht zerstören, da vlt. andere PlugIns ebenso eines haben können).

[worker]

Hat denn niemand eine Idee hierzu?

[Sherlock]

Schade, daß da keiner eine Idee zu hat. Denn original dieses Problem habe ich auch gerade bekommen.
Ich weiss alerdings noch, daß das TPUtilWindow ein unsichtbares Hilfsfenster ist, daß die VCL nutzt um Messages für Timer, Popups etc. zu empfangen/verarbeiten.

Ich habe auch dieses hier gefunden http://qc.embarcadero.com/wc/qcmain.aspx?d=21771, allerdings glaube ich nicht so ganz, daß Threads mein/unser Problem sind. Etwas nähere Informationen hat noch der Delphi Geek.

Bevor ich jetzt rangehe und die Änderungen in der classes.pas vornehme, würde ich dann doch gerne wissen, ob das wirklich dem oben geschilderten Problem als Lösung dienen kann.

Sherlock

[shmia]

Ich würde sagen die Ursache ist, dass in DeallocateHWnd() die Procedure Windows.UnregisterClass() nicht aufgerufen wird, wenn das letzte Wnd-Handle freigegeben wird.
Eigentlich müsste die VCL bei AllocateHWnd() einen Zähler hochzählen und bei DeallocateHWnd() um eins runterzählen.
Wenn Zählerstand = 0, dann UnregisterClass() aufrufen.
Aber so bleibt die Windows-Klasse 'TPUtilWindow' registriert.
Bei einer normaler Anwendung kein Problem; nur eben bei einer DLL.

Mögliche Abhilfe (ungetestet, reine Vermutung):

Delphi-Quellcode:

const
  DLL_PROCESS_DETACH = 0;
  DLL_PROCESS_ATTACH = 1;
  DLL_THREAD_ATTACH  = 2;
  DLL_THREAD_DETACH  = 3;

procedure LibraryProc(Reason: Integer);
begin
  case Reason of 
  DLL_PROCESS_DETACH:
    Windows.UnregisterClass('TPUtilWindow', HInstance);
  end;
end;

...
begin
  DLLProc := @LibraryProc;
  LibraryProc(DLL_PROCESS_ATTACH);
end;