EventGadget

Синтаксис

#define EventGadget &h401

Описание

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

Параметры

нет

Платформы

Windows , Linux

Пример

#Include "window9.bi"
OpenWindow("",10,10,200,200)
ButtonGadget(1,10,10,100,20)
TextGadget(2,10,50,100,20,"Текст")
Do
  Var event=WaitEvent
  Select Case event
     Case EventClose
        End
     Case EventGadget
        Select Case EventNumber
           Case 1
              MessBox("","это кнопка")
           Case 2
              MessBox("","это текстовый гаджет")
        End Select
  End Select
Loop

Created with the Personal Edition of HelpNDoc: Free PDF documentation generator