Thema: Delphi Messagen Subclassen

Einzelnen Beitrag anzeigen

EWeiss
(Gast)

n/a Beiträge
 
#1

Messagen Subclassen

  Alt 6. Dez 2008, 14:31
Hab noch ein problem mit der Magnetic Unit
Mich nervt das ich innerhalb der anwendung Messagen aus der WinProc extra an die Unit schicken muss.
Hat jemand eine ahnung wie ich es bewerkstelligen kann WM_ Messagen der Subclass hinzuzufügen
ohne sie aus der Anwendung übergeben zu müssen ?

Ich möchte als Beispiel WM_ENTERSIZEMOVE von der Anwendung an die Subclass übergeben
das dieses erkennt wenn die Message aufgrufen wird.
Im moment geht es nur wenn ich aus der Anwendung selbst diese übergebe
MagneticWndProc(MainWindow(0), WM_ENTERSIZEMOVE, Msg, dummyHandled); Sinnvoller wäre es diese hier zu addieren sobald das Window addiert wird.
Delphi-Quellcode:
function TMagnetic.AddWindow(Handle: HWND; hWndParent: HWND; var FuncPointer : TSubClass_Proc): Boolean;
begin
  Subclass_AddMsg(Handle, WM_ENTERSIZEMOVE) //<<<<
end;

Hoffe jemand versteht was ich meine.

gruss Emil
  Mit Zitat antworten Zitat