Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Auswerten von Mousehooknachrichten (https://www.delphipraxis.net/53837-auswerten-von-mousehooknachrichten.html)

Chris P 23. Sep 2005 13:58


Auswerten von Mousehooknachrichten
 
Hi Leute,

ich möchte die Mousehooknachrichten die an mein Programm geschickt werden auswerten.
Dabei soll unterschieden werden, ob der Cursor bewegt wird oder ob eine der Maustasten gedrückt wurde!

Die Auswerten in meinem Programm sieht so aus:
Delphi-Quellcode:
procedure TForm1.DllMessage(var Msg: TMessage);
begin
   case Msg.WParam of
          WM_MOUSEMOVE:
                       Label1.Caption := 'MOUSEMOVE';
                         
          WM_LBUTTONUP,
          WM_MBUTTONUP,
          WM_RBUTTONUP:
                       Label1.Caption := 'BUTTONCLICK';
         
   end;

end;
WM_MOUSEMOVE funktioniert ohne Proleme, aber wenn ich eine Maustaste drücke,
dann steht in Label1 erst BUTTONCLICK und dann trotzdem MOUSEMOVE.

Warum wird die case-Anweisung WM_MOUSEMOVE beim Drücken einer Maustaste auch ausgelöst???

Kann mir jemand helfen? Danke...

fylo 24. Sep 2005 13:07

Re: Auswerten von Mousehooknachrichten
 
Hi,

wahrscheinlich, weil du während des drückens oder danach die Maus bewegst?

Chris P 24. Sep 2005 13:16

Re: Auswerten von Mousehooknachrichten
 
Das klingt logisch, aber wenn ich die Maustaste auf dem Notebook drücke komme ich ja nicht auf das Touchpad,
also wird doch die Maus nicht bewegt!

Es muss an etwas anderem liegen!

Trotzdem danke...

fylo 24. Sep 2005 14:54

Re: Auswerten von Mousehooknachrichten
 
Hi

du sprichts vom Notebook? Dann liegt es wahrscheinlich am Touchpad-Treiber, der nicht wie eine normale Maus arbeitet, sondern kontinuierlich ein "MOVE" signalisiert.

Das Problem hatte ich auch mal mit einem "billig" Maustreiber einer richtigen Maus.


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:40 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz