hurtigere timer.

tror du skal gå over til at bruge noget med objekt.click() istedet... så undersøger den jo dit input med det samme!

/jsc

nu er det musens bevægelse jeg vil overvåge, og ikke kliks.
det programmet skal gøre, er at jeg har 4 værdier: Xmax, Xmin, Ymax, Ymin som tilsammen så giver et firkantet område, hvori musen skal være.

så jeg vil overvåge når musen kommer udenfor denne firkant, og hvis det er tilfældet, så flytte den tilbage i midten af området.

det har jeg så gjort med en timer-kontrol og nedenstående kode, og det virker egentligt fint nok, problemet er bare at timerens interval er for langsomt, således at musen egentligt kan nå at flytte sig ret langt udenfor firkanten.

her er den kode jeb benytter i timeren:

Private Sub Timer1_Timer()
  Mouse1.MouseCoordinates X, Y
  Label1.Caption = "X:" & X & " Y:" & Y
 
  If (X <= Form1.txtXmin.Text + 1) Then
    Mouse1.MouseMove CLng(Round((Form1.txtXmax.Text - ((Form1.txtXmax.Text - Form1.txtXmin.Text) / 2)), 0)), CLng(Round((Form1.txtYmax.Text - ((Form1.txtYmax.Text - Form1.txtYmin.Text) / 2)), 0))
  End If

  If (X >= Form1.txtXmax.Text - 1) Then
    Mouse1.MouseMove CLng(Round((Form1.txtXmax.Text - ((Form1.txtXmax.Text - Form1.txtXmin.Text) / 2)), 0)), CLng(Round((Form1.txtYmax.Text - ((Form1.txtYmax.Text - Form1.txtYmin.Text) / 2)), 0))
  End If

  If (Y <= Form1.txtYmin.Text + 1) Then
    Mouse1.MouseMove CLng(Round((Form1.txtXmax.Text - ((Form1.txtXmax.Text - Form1.txtXmin.Text) / 2)), 0)), CLng(Round((Form1.txtYmax.Text - ((Form1.txtYmax.Text - Form1.txtYmin.Text) / 2)), 0))
  End If

  If (Y >= Form1.txtYmax.Text - 1) Then
    Mouse1.MouseMove CLng(Round((Form1.txtXmax.Text - ((Form1.txtXmax.Text - Form1.txtXmin.Text) / 2)), 0)), CLng(Round((Form1.txtYmax.Text - ((Form1.txtYmax.Text - Form1.txtYmin.Text) / 2)), 0))
  End If

End Sub

forstår bare stadig ikke hvorfor du ikke bruger Form1.MouseMove() - så skal man selvfølgelig til at finde ud af om Musen er i området... men det gør du jo allerede...

Det kan være jeg bare skal hold min mund...

hmm havde ikke set der var noget der hed det... kigger lige på det.

damn. det virkede ellers nice, eneste problem, er bare at form1.mousemove kun bliver kørt når musen er over formen. -jeg skal kunne overvåge musen selvom den er udenfor mit program.

så må man jo lave en "skujlt" og "altid øverst" form.... :)

der findes allerede mange spm, med noget med "udenfor formen".....

hmm lyder interessant.
hvordan laver jeg en fullscreen gennemsigtig form?

-jeg skal også kunne klicke på det program der ligger nedenunder jo - meningen med programmet er at holde musen fanget indenfor et andet program's menu-knap-område.

okay, prøver lige at søge efter det.

det lyder lidt til at være sådan et center crosshair program :)

men som sagt.. så prøv at søg efter "fang musen", "gennemsigtig form" etc.

hele pointen med programmet, er at jeg vil kunne sørge for at musen er fanget indenfor et lille område af skærmen. på den måde kan jeg bruge min trådløse mus som fjernbetjening, og vide at den altid rammer det rigtige sted på skærmen.

jeg kigger efter noget med gennemsigtig form.

smart må jeg sige.... men ja.. prøv det

Du kan bare bruge lidt API :D
http://hjem.get2net.dk/sjh/eksperten/538986/MouseHookPos.zip

Jeg er lige på arbejde, men jeg kigger på det iaften engang. umiddelbart set der spænnende ud.

glemte at svare, det virkede perfekt!