EventActivate

Синтаксис

#define EventActivate &H6

Описание

Константа. Используется для определения события активизации окна.

Параметры

нет

Платформы

Windows , Linux

Пример

#Include "window9.bi"
Dim As hwnd hwnd,hwnd2
hwnd=OpenWindow("",10,10,200,200)
hwnd2=OpenWindow("",100,100,200,200)
Do
  Var event=WaitEvent
  Select Case event
     Case EventClose
        If EventHwnd=hwnd Then
           End
        ElseIf EventHwnd=hwnd2 Then
           Close_Window(hwnd2)
        EndIf
     Case EventActivate
        ? eventhwnd
  End Select
Loop

Created with the Personal Edition of HelpNDoc: Easy CHM and documentation editor