Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > VB6 > Координаты PictureBox'а


Автор: GorKa 5.4.2007, 11:34
Кликнув в PictureBox'e, мне нужно получить координаты точки места клика...

Автор: Naghual 5.4.2007, 16:20
Код

Private Sub Picture1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    MsgBox X
    MsgBox Y
End Sub

Автор: GorKa 6.4.2007, 08:34
Спасибо, Naghual.

Теперь можно дальше продолжать...

Автор: Black_Star 6.4.2007, 14:01
 smile 
Хм... 
Вообще клик считается MouseDown+MouseUp. 
Причем срабатывание клика происходит именно в момент маусапа. Соответственно в координатах где этот ап произошел. Задержка тут не важна. 
Код

Private Sub Form_Click()
  Print "Click"
End Sub
Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
  Print "Down"
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
  Print "Up"
End Sub

Результатом будет:
Цитата

Down
Up
Click

Потому отлавливать событие клика с координатами лучше по MouseUp.

Автор: Naghual 6.4.2007, 14:37
Black_Star, вы совершенно правы. Спасибо.

Автор: GorKa 6.4.2007, 14:50
Мне и надо было при жатии.
Всё равно спс... smile 

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)