Detecte inaktiv bruger

ja

Fedt

noget i retning af

timer1_timer()
if TimeDiff(\"s\",Lastmove,Time)<-100 then
msgbox \"INAKTIV\"
end if
end sub

form_Mousemove()
lastmove=Time
end sub
form_Keypress()
lastmove=Time
end sub

ja det ser rigtig ud

Haha, gilbert... du fortjener sgu alle 60 point for din store indsats

Blazer > Cool burger, jeg kigger lige på det

skal liige tilpasses...var bare lige sårn efter hovedet :)

husk at sætte timerens interval!

hehe

Jep... Jeg har allerede en timer, så det var bare at tilføje de tre linier.

Det virker fint med form_Mousemove()

form_Keypress():
Procedure declaration does not match description of event or procedure having the same name

Ahhhh, form_Mousemove() registrerer (selvfølgelig) kun musebevægelser indenfor den pågældende form... Mit program er en lille sag der kører i baggrunden - Kan det lade sig gøre at detecte om musen bliver bevæget i det hele taget?

yups....søg efter pointapi på planetsourcecode.com hvis du ikke kan finde det kan jeg lige gøre det år jeg kommer hjem!

Damn nice, lige hvad jeg skulle bruge...
Takker

OK, jeg fandt den her på MSDN:
http://support.microsoft.com/support/kb/articles/Q114/7/77.asp

---
Type POINTAPI \' This holds the logical cursor information
      x As Integer
      y As Integer
  End Type

  Declare Sub GetCursorPos Lib \"User\" (lpPoint As POINTAPI)

Sub Timer1_Timer ()
      Dim rect As POINTAPI
      \' Get the current mouse cursor coordinates:
      Call GetCursorPos(rect)
      FORM1.Cls
      \' Print out current position on the form:
      Print \"Current X = \" & rect.x
      Print \"Current Y = \" & rect.y
  End Sub
---

Ser umiddelbart logisk nok ud, men jeg får denne fejl:
File Not Found: \"User\"

Kan du give et tip der?

ja...åben din winapi viewer....og find funktionen deri og overskriv den gamle!

(ligner altså en declare fra win 3.11 den der)

prøv oxo med suer32.dll

Ok, den her lyder mere tidssvarende...

Public Declare Function GetCursorPos Lib \"user32\" Alias \"GetCursorPos\" (lpPoint As POINTAPI) As Long

Men når jeg kører den går programmet ned med det største brag...
(Hukommelsen kunne ikke \"read\")

Anyway, tak for hjælpen, jeg roder lidt videre med det.