Thema: Delphi Mausrad erkennen

Einzelnen Beitrag anzeigen

Daniel
(Co-Admin)

Registriert seit: 30. Mai 2002
Ort: Hamburg
13.919 Beiträge
 
Delphi 10.4 Sydney
 
#2
  Alt 21. Apr 2003, 10:18
Hallo FLogo,

dafür gibt es die API-Funktion "GetSystemMetrics". Diese rufst Du mit dem Parameter "SM_MOUSEWHEELPRESENT" auf und sie liefert Dir einen Wert ungleich Null zurück, falls eine Maus mit Rad (oder eine entsprechende Treiberemulation) installiert ist.

myMouseHasAWheel:= (GetSystemMetrics(SM_MOUSEWHEELPRESENT) <> 0); Die vollständige Doku zu dieser Funktion so wie eine Liste der weiteren Parameter findest Du in der MSDN-Library unter der folgenden Adresse: MSDN-Library :: GetSystemMetrics.

Bitte beachten:
Der o.g. Parameter "SM_MOUSEWHEELPRESENT" wird nicht bei Win95 oder WiNNT 3.51 unterstützt.
Daniel R. Wolf
mit Grüßen aus Hamburg
  Mit Zitat antworten Zitat