VB.NET Kurzor mimo programu
Zdravím,
potřeboval by jsem pomoct s jednou věcí, hledal jsem na netu, neúspěšně. Pracuji na jednom programu ve VB.NET, a potřebuji, aby program vykonal akci, když je místto defaultního kurzora, ruka (Cursor.Hand). Pokoušel jsem se o to prostředníctvím Cursor.Current ale neúspěšně, program sice vykonáva požadovanou akci, ale jen do doby, co je kurzor v okně programu, problém je, že já to potřebuji i mimo okna programu.
Příklad řekněme že chci aby klikl:
Public Class Form1
Declare Sub mouse_event Lib "user32" Alias "mouse_event" (ByVal dwFlags As Integer, ByVal dx As Integer, ByVal dy As Integer, ByVal cButtons As Integer, ByVal dwExtraInfo As Integer)
Private Const MOUSELEFTDOWN = &H2
Private Const MOUSELEFTUP = &H4
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
If Cursor.Current = Cursors.Hand Then
mouse_event(&H2, 0, 0, 0, 1)
mouse_event(&H4, 0, 0, 0, 1)
Else
End If
End Sub
End Class
Capturing mouse/keyboard events outside of form (app running in background)
Děkuji, tímhle je problem vyřešen :)