PureBoard

Verfasst: **25.02.2005 16:10**

Hallo !
Ich wollt ein Programm schreiben (kein Keylogger, naja in einer entfernten art und weise schon +_+) mit dem man zählen kann wieviele Taste insgesamt gedrückt wurden. Hier mal der Code:

Code: Alles auswählen

Repeat 
    For lngI = 0 To 255
        Taste = GetAsyncKeyState_(lngI)
        If (Taste & $1) = $1
            Miep+1
            Debug Miep
        EndIf 
    Next
    
    lngI = 0
    Delay(1)
Until GetAsyncKeyState_(27)

Funkt eigentlich ganz gut. Problem gibts da, das Mausklicks mit gezählt werden. Könnt ihr mir vielleicht helfen wie ich Mausklicks ignorieren kann?

Verfasst: **25.02.2005 16:17**

Code: Alles auswählen

Repeat
eventid.l=windowevent()
if eventid.l<>#WM_LBUTTONDOWN
    For lngI = 0 To 255
        Taste = GetAsyncKeyState_(lngI)
        If (Taste & $1) = $1
            Miep+1
            Debug Miep
        EndIf
    Next
   endif 
    lngI = 0
    Delay(1)
Until GetAsyncKeyState_(27)

Verfasst: **25.02.2005 16:31**

scheitert daran, dass ich kein Fenster benutze +_+. Müsst ich das wieder zu einem Programm zusammen fügen...

Verfasst: **25.02.2005 16:35**

Code: Alles auswählen

Repeat 
  For lngI = 7 To 255 
    Taste = GetAsyncKeyState_(lngI) 
    If (Taste & $1) = $1 
      Miep+1 
      Debug Miep 
    EndIf 
  Next 
  
  lngI = 0 
  Delay(1) 
Until GetAsyncKeyState_(27)

musst nur gucken, was das VK_CANCEL (03) Control-break processing macht, weil das hab ich ja jetzt weggelassen.

c ya,
nco2k

PureBoard

Brauch Hilfe mit GetAsyncKeyState +_+

Brauch Hilfe mit GetAsyncKeyState +_+