PureBoard

Verfasst: **20.01.2005 19:17**

Hallo!

hat von Euch jemand eine Idee, wie man Mausklicks mit PB zählen kann? Dabei soll die Standardfunktion allerdings nicht beeinträchtigt werden, es soll nur jeder Klick, evtl. sogar in Links- und Rechtsklick aufgeteilt, mitgezählt werden.

Grüsse

Michael

Verfasst: **20.01.2005 20:28**

Müsste so funktionieren:

Code: Alles auswählen

Repeat
ExamineMouse()
If MouseButton(1) And losgelassen = 1
  gedruekt+1
  losgelassen = 0
EndIf

If MouseButton(1) = 0
  losgelassen = 1
EndIf
Until MouseButton(2)

Verfasst: **20.01.2005 20:33**

Das geht leider nur in Verbindung mit OpenScreen()

EDIT: Hab jetzt "plötzlich" was im CodeArchiv gefunden:

Code: Alles auswählen

Repeat
If GetAsyncKeyState_(#VK_LBUTTON)
    Beep_(1400,200)
    While GetAsyncKeyState_(#VK_LBUTTON) :Wend
  EndIf
  If GetAsyncKeyState_(#VK_RBUTTON)
    Beep_(1400,200)
    While GetAsyncKeyState_(#VK_RBUTTON) :Wend
  EndIf
  If GetAsyncKeyState_(#VK_MBUTTON)
    Beep_(1400,200)
    While GetAsyncKeyState_(#VK_MBUTTON) :Wend
  EndIf
  If GetAsyncKeyState_(#VK_ESCAPE)
    End
  EndIf
  Delay(1)
ForEver

Verfasst: **21.01.2005 00:50**

is doch doof, dann wird ja das ganze programm angehalten...

wie wäre es mit sowas?

Code: Alles auswählen

Repeat
  If LeftMouse And GetAsyncKeyState_(#VK_LBUTTON) = #False
    LeftMouse = #False
    LeftMouseClicks + 1
  ElseIf GetAsyncKeyState_(#VK_LBUTTON)
    LeftMouse = #True
  EndIf
Until GetAsyncKeyState_(#VK_ESCAPE) : End

ist natürlich noch verbesserungswürdig, aber immerhin ein kleiner denkanstoss.

c ya,
nco2k

PureBoard

Mausklicks zählen?

Mausklicks zählen?