GetClassName_

Синтаксис

Function GetClassName_(byval hWin As HWND) As String

Описание

Функция возвращает класс окна

Параметры

hWin - хендл окна

Платформы

Windows

Пример

#Include "window9.bi"
Dim As Integer event
Dim As HWND hwnd
hwnd=OpenWindow("Привет",10,10,100,100)
ButtonGadget(1,10,10,80,20,"Кнопка")
Do
  event=WaitEvent()
  If Event = eventgadget Then
     MessBox(_
     "Классы окон",_
     "Класс родительского окна - " & GetClassName_(hwnd) & !"\n" & _
     "Класс дочернего окна(кнопки) - " & GetClassName_(GadgetID(1)))
  EndIf
Loop Until Event=EventClose

Результат

Created with the Personal Edition of HelpNDoc: Free CHM Help documentation generator