Autor Beitrag
fidionael
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 232

Win XP SP2, Ubuntu 6.06
Delphi 7 PE, Delphi 3 Prof
BeitragVerfasst: Mi 05.07.06 12:30 
Hallo, ich habe jetzt schon dieses Forum und Google auf den Kopf gestellt und bin dennoch noch nicht weiter.

Ich möchte gerne, für eine Komponente, an der ich gerade arbeite das MouseDown / MouseUp-Event manuell abfangen. Ich habe meine Komponente vom Typ TGraphicControl abgeleitet.

Ich möchte meine Events auf die gleiche Weise abfangen, wie z. B. die Events MouseEnter und MouseLeave:

ausblenden Delphi-Quelltext
1:
2:
procedure cmMouseEnter(var Message: TMessage); message CM_MOUSEENTER;
procedure cmMouseLeave(var Message: TMessage); message CM_MOUSELEAVE;


Ich war mir eigentlich ziemlich sicher, dass ich MouseDown und MouseUp via WM_MOUSEDOWN, bzw. WM_MOUSEUP abfangen könnte

ausblenden Delphi-Quelltext
1:
2:
procedure wmMouseDown(var Message: TMessage); message WM_MOUSEDOWN;
procedure wmMouseUp(var Message: TMessage);   message WM_MOUSEUP;


doch ich bekomme beim Kompilieren die Fehlermeldung, dass WM_MOUSEDOWN und WM_MOUSEUP undefinierte Bezeichner seien.

Kann mir jemand helfen? Danke schonmal im Vorraus.
Grendel
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 443

Gentoo Linux, MacOS X, Win 2000
D5 Ent, D7 Ent, Lazarus, Anjuta, MonoDevelop
BeitragVerfasst: Mi 05.07.06 12:51 
Es gibt kein WM_MOUSEDOWN und WM_MOUSEUP. Die gesuchten Messages heißen WM_LBUTTONDOWN und WM_LBUTTONUP für Klicks mit der linken Taste bzw. WM_RBUTTONDOWN und WM_MBUTTONDOWN für Klicks mit der rechten bzw. mittleren Taste.

Bis neulich ...
fidionael Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 232

Win XP SP2, Ubuntu 6.06
Delphi 7 PE, Delphi 3 Prof
BeitragVerfasst: Mi 05.07.06 12:54 
Danke :oops: