VPF::Как определить класс? - Форум программистов

I_Am_Rock

Дата 8.7.2008, 17:52 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 523
Регистрация: 18.1.2008

Репутация: 12
Всего: 15

Как определить класс объекта?
Например, кнопка "Пуск" (класс Button) находится на Панели задач (класс Shell_TrayWnd).
Эти классы я определил, используя другие программы.
А как определить в VB? Например, как узнать класс Панели задач?

Rrader

Дата 10.7.2008, 09:44 (ссылка)

(нет голосов)

Загрузка ...

Inspired =)

Профиль
Группа: Экс. модератор
Сообщений: 1535
Регистрация: 7.5.2005

Репутация: 6
Всего: 191

Код


Private Declare Function GetClassName Lib "user32" Alias "GetClassNameA" _
  (ByVal hwnd As Long, ByVal lpClassName As String, ByVal nMaxCount As Long) As Long
  
Const MAX_PATH = 260
  
Private Sub Command1_Click()
  Dim ClassName As Long
  Dim S As String
  S = Space(MAX_PATH)
  ClassName = GetClassName(Form1.hwnd, S, MAX_PATH)
  If ClassName <> 0 Then
    S = Left(S, ClassName)
    MsgBox S
  End If
End Sub

Окна можно обойти через EnumWindows.

Это сообщение отредактировал(а) Rrader - 10.7.2008, 09:45

--------------------

Let's do this quickly!
Rest in peace, Vit!

I_Am_Rock

Дата 10.7.2008, 10:21 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 523
Регистрация: 18.1.2008

Репутация: 12
Всего: 15

Спасибо)

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| VB6 \| Следующая тема »