Einzelnen Beitrag anzeigen

Hedge

Registriert seit: 30. Jun 2007
278 Beiträge
 
Delphi 2009 Professional
 
#15

Re: Mausrad abfangen - drehung außerhalb der anwendung erken

  Alt 5. Jul 2007, 01:46
Hoffe der thread ist nicht zu outdated um noch zu antworten..

MSDN-Library durchsuchenWM_MOUSEWHEEL

Über den wparam sollte man ja eigentlich die Information kriegen in welche Richtung das Mausrad lief...

Nur ist jetzt die Frage wie man den ausliest bezogen auf die Funktion MouseHookProc

Kann mir da Jemand auf die Sprünge helfen?

hier nochmal die funktion zur Erinnerung:

Delphi-Quellcode:
function MouseHookProc(nCode: Integer; wParam: WPARAM; lParam: LPARAM): LRESULT; stdcall;
begin
  If nCode = HC_ACTION then
   begin
    If lParam <> 0 then with PEventMsg(lParam)^ do
     begin
      If Message = WM_MOUSEWHEEL then
       begin
        Inc(Form1.i);
        Form1.Label1.Caption := IntToStr(Form1.i);
       end;
     end;
   end;
  Result := CallNextHookEx(Form1.MouseHook, nCode, wParam, lParam);
end;
  Mit Zitat antworten Zitat