Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Подскажите api нахождения координат контрола / 15 сообщений из 15, страница 1 из 1
04.06.2010, 15:43
    #36669719
ak787
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите api нахождения координат контрола
Подскажите api нахождения координат контрола... собственно весь вопрос
...
Рейтинг: 0 / 0
04.06.2010, 15:45
    #36669728
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите api нахождения координат контрола
что за контрол, где искать собрались и откуда?
...
Рейтинг: 0 / 0
04.06.2010, 15:49
    #36669747
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите api нахождения координат контрола
Код: plaintext
Public Declare Function GetWindowRect Lib "user32" Alias "GetWindowRect" (ByVal hwnd As Long, lpRect As RECT) As Long
...
Рейтинг: 0 / 0
04.06.2010, 15:54
    #36669766
ak787
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите api нахождения координат контрола
Konst_Oneчто за контрол, где искать собрались и откуда?
самопальный класс, контол Label
координаты нужны относительно экрана, чтобы сопоставить с координатами мыши
...
Рейтинг: 0 / 0
04.06.2010, 15:54
    #36669767
ak787
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите api нахождения координат контрола
Konst_One
Код: plaintext
Public Declare Function GetWindowRect Lib "user32" Alias "GetWindowRect" (ByVal hwnd As Long, lpRect As RECT) As Long

да это самое то! сэнкс
...
Рейтинг: 0 / 0
04.06.2010, 15:56
    #36669781
Antonariy
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите api нахождения координат контрола
Если это обычный label, то у него нет hWnd.
...
Рейтинг: 0 / 0
04.06.2010, 16:00
    #36669798
ak787
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите api нахождения координат контрола
AntonariyЕсли это обычный label, то у него нет hWnd.
да, действительно, облом ;)
...
Рейтинг: 0 / 0
04.06.2010, 16:02
    #36669809
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите api нахождения координат контрола
сделайте свой ActiveX control , тогда всё будет ок
...
Рейтинг: 0 / 0
04.06.2010, 16:09
    #36669824
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите api нахождения координат контрола
Можно вычислить координаты hwnd контейнера метки (формы, фрейма и т.п.) и добавить к ним Top и Left от метки
...
Рейтинг: 0 / 0
04.06.2010, 16:17
    #36669856
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите api нахождения координат контрола
можно вообще обойтись без всяких апи, а просто написать функцию получения координат конкретного вашего label
...
Рейтинг: 0 / 0
04.06.2010, 16:19
    #36669862
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите api нахождения координат контрола
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Option Explicit

Private Sub Form_Load()
Me.Label2.Caption = ""
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Label2.Caption = ""
End Sub

Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Label2.Caption = "X=" & X & ", Y=" & Y
End Sub
...
Рейтинг: 0 / 0
04.06.2010, 16:31
    #36669912
ak787
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите api нахождения координат контрола
Konst_One
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
Option Explicit

Private Sub Form_Load()
Me.Label2.Caption = ""
End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Label2.Caption = ""
End Sub

Private Sub Label1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Me.Label2.Caption = "X=" & X & ", Y=" & Y
End Sub

блин а слона то и не заметил ;).... сэнкс, сработало, вопрос снят
...
Рейтинг: 0 / 0
04.06.2010, 20:52
    #36670407
Ципихович Эндрю
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите api нахождения координат контрола
ak787, эти сообщения со скриптами от 16 19 и 16 31 актуальны для всех контролов и в среде ВБА?
...
Рейтинг: 0 / 0
05.06.2010, 19:37
    #36671201
ak787
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите api нахождения координат контрола
Ципихович Эндрю,

это к чему вопрос?
...
Рейтинг: 0 / 0
05.06.2010, 19:41
    #36671208
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Подскажите api нахождения координат контрола
ak787Ципихович Эндрю,
это к чему вопрос?

Это к тому, что он, вместо того, чтобы попробовать, ждет, как обычно, когда ему разжуют и в рот положат.
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Подскажите api нахождения координат контрола / 15 сообщений из 15, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]