Движение мышки за пределами активного окна программы - VB
Формулировка задачи:
Подскажите можно ли получить каким-нибудь образом событие MouseMove в том случае, если окно программы активно но занимает не весь экран и мышка двигается за пределами формы??
Решение задачи: «Движение мышки за пределами активного окна программы»
textual
Листинг программы
- Private Sub Timer1_Timer()
- Dim p As POINTAPI, s$
- GetCursorPos p
- If p.X>=Me.Left And p.X<=Me.Left+Me.Width And _
- p.Y>=Me.Top And p.Y<=Me.Top+Me.Height Then
- s = " (внутри)"
- Else
- s = " (снаружи)"
- End If
- Me.Caption = "X=" & p.X & "; Y=" & p.Y & s
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
