Någon som vet hur man "capture" musen...jag vill att en function skall köras i mitt program varje gång musen rör på sig...även utanför programet...(tex. när det är minimerat...)

MVH Gabriel

Det enklaste sättet att göra det på skulle jag vilja påstå är med API:et
getCursorPos.

klistra in exemplet nedan

Sample Code =====================================

Option Explicit

Private Declare Function GetCursorPos Lib "user32" (lpPoint As POINTAPI) As Long

Private Type POINTAPI
x As Long
y As Long
End Type

Private Sub Form_Load()
Timer1.Interval = 100
Timer1.Enabled = True
End Sub

Private Sub Timer1_Timer()
Dim musPos As POINTAPI
GetCursorPos musPos
Debug.Print musPos.x, musPos.y
End Sub

Sample Code =====================================

Du kan uppnå samma resultat med subclassing, men det är lite
krångligare att förstå.

Som med allt annat är det så att det du vinner i tid, förlorar du i kraft.
Med andra ord. Om du ställer ner timern för mycket segar andra delar
av ditt progg. Å andra sidan om timertiden är för hög så försämras
upplösningen i de musrörelser du detekterar. Det är bara att testa
den gyllene medelvägen.

Återigen, en tillräckligt stor cyklisk buffert. Som ofta loggar in dina mus-
rörelser. Gör att du får med flera kordinater och sedan skickar dom till
din serverprogramvara (antar att det har att göra med winsock grejjen du
jobbar med också).

Musen står ju stilla ibland också. Så därför behöver du inte logga eller
skicka två på varandra följande kordinater som är lika. Detta ger ju
onödig overhead.

/peterh

Det är ju subclasing jag vill använda mig av =)
hoppas någon vet hur man gör för jag kan inte hitta någon infomration om subclasing av musen...om tangentbordet har jag hittat....