Мой Kbyte.Ru
Рассылка Kbyte.Ru
Группы на Kbyte.Ru
Партнеры Kbyte.Ru
Реклама
Сделано руками
Сделано руками
> Исходные коды - Евгений Ипатов -

Visual Basic 5.0/6.0 - Окна и формы

Все примеры / Интерфейс / Окна и формы

Информация о окне

Автор: Евгений Ипатов | добавлено: 06.03.2010, 12:45 | просмотров: 1866 (1+) | комментариев: 0 | рейтинг: *x4
Возвращает информацию о окне: координаты, высоту, ширину.

Код

Public Sub GetWindowsRECT(hWnd As Long, ProcID As Integer, Height As Integer, Top As Integer, Left As Integer, Witch As Integer)

Dim rctTemp As RECT

   GetWindowThreadProcessId hWnd, lngProcID
   GetWindowRect hWnd, rctTemp
   
   'Load the labels with the info retrieved.
ProcID = lngProcID
Top = rctTemp.Top
Left = rctTemp.Left

Height = rctTemp.Bottom - Top
Witch = rctTemp.Right - Left

End Sub

Private Sub Command1_Click()
Print Top
Print Left
End Sub
Обратите внимание
Язык Visual Basic 6.0 является устаревшим. Многие примеры, размещенные на нашем сайте, были созданы еще во времена Windows 98 и могут не работать в современных операционных системах.
Если у вас возникнут какие-либо проблемы или вопросы, вы можете обратиться за помощью на наш форум.
Об авторе

Евгений Ипатов

Нет информации об авторе...

См. также:
Профиль автора
Евгений Ипатов
Последние комментарии (всего: 0)

Добавлять комментарии могут только зарегистрированные пользователи сайта.
Если у Вас уже есть учетная запись на Kbyte.Ru, пройдите процедуру авторизации OpenID.
Если Вы еще не зарегистрированы на Kbyte.Ru - зарегистрируйтесь.


Нет комментариев...

Авторизация
 
OpenID
Зарегистрируйся и получи 10% скидку на добавление своего сайта в каталоги! Подробнее »
Поиск по сайту
Реклама
Счетчики