XProfan

Deutsch

Sven
Bader

Herunterladen

Hallo Community!

Da ich bis heute keine gute Lösung gefunden habe, die mittlere Maustaste und vor allem das Mausrad ohne *waitinput abzufragen, habe ich nun eine DLL dafür geschrieben. Neben den üblichen 3 Maustasten konnte ich noch zwei weitere hinzufügen, auf meiner Maus sind es die Seitentasten "Thumb Back/Forward".

Es können zudem alle Tasten gleichzeitig abgefragt werden!

Die Mausrad-Abfrage wird jedes mal zurückgesetzt, da der Event keinen down/up Zustand hat.

Viele Grüße
Sven

Kompilieren Markieren Separieren

Declare hDll&,wheel&
hDll& = UseDll("mouser.dll")
ImportFunc(hDll&,"getbutton", "getbutton")
ImportFunc(hDll&,"getwheel", "getwheel")'wird bei Abfrage zurückgesetzt!
Cls

WhileNot iskey(27)

    sleep 20
    locate 1,1
    print "Button 1: " + str$(getbutton(1)) + "\n"
    print "Button 2: " + str$(getbutton(2))+ "\n"
    print "Button 3: " + str$(getbutton(3))+ "\n"
    print "Button 4: " + str$(getbutton(4))+ "\n"
    print "Button 5: " + str$(getbutton(5))+ "\n"
    wheel& = wheel& + getwheel()
    print "Mausrad: " + str$(wheel&) + "    "

Endwhile

FreeDll hDll&
End

*Warum habe ich ein Problem mit den waitinput Lösungen? Selbst wenn man waitinput mit settimer "überennt" benötigt der Aufruf sehr viel Zeit, die DLL ist hier deutlich schneller.

mouser.png Vorschau

6 kB

Hochgeladen:

10.09.2021

Ladeanzahl:

Herunterladen

mouser.zip

66 kB

Hochgeladen:

10.09.2021

Ladeanzahl:

Herunterladen

10.09.2021 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Georg
Teles

Servus,

Genial, die Abfragen sind global, erinnert mich an die Funktion GetAsyncKeyState

XProfan X2
TC-Programming [...]

XProfan 8.0 - 10.0 - X2 - X3 - X4

10.09.2021 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Sven
Bader

Hallo Georg,

es freut mich, dass noch jemand Verwendung dafür hat. GetAsyncKeyState
benutze ich auch gerne, ich meine die kann sogar den rechten und linken Maus-Button.

Für die DLL verwende ich einen Hook, welcher die Mausdaten im sogenannten "low level Modus" an eine Funktion weiterreicht. Das würde sogar nativ in XProfan funktionieren nur überfordern die vielen Aufrufe das Programm.

XProfan X4

10.09.2021 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Georg
Teles

Diese DLL findet definitiv einige Verwendung