EventData()

Синтаксис

Data = EventData()

Описание

Возвращает значение, связанное с текущим событием. Событие должно быть пользовательским событием, отправленным с помощью PostEvent().

Параметры

Ничего.

Возвращаемое значение

Возвращает значение, связанное с текущим событием. Если текущее событие не является пользовательским событием, отправленным с помощью PostEvent(), то это значение будет не определено.

Пример

; Все наши пользовательские события
Enumeration #PB_Event_FirstCustomValue
    #EvenementDebutAction ; это есть минимальное значение для пользовательского события (если ниже будут конфликты).
    #EvenementFinAction
EndEnumeration

Procedure Thread(Valeur)
    PostEvent(#EvenementDebutAction, 0, 1, #PB_EventType_FirstCustomValue, 10)
    Delay(3000)
    PostEvent(#EvenementFinAction, 0, 1, #PB_EventType_FirstCustomValue, 100)
EndProcedure

OpenWindow(0, 200, 200, 100, 100, "PostEvent")

CreateThread(@Thread(), 0)

Repeat
    Event = WaitWindowEvent()

    Select Event
        Case #EvenementDebutAction
            Debug "Поток начал действовать... "
            Debug EventData()

        Case #EvenementFinAction
            Debug "Поток завершает действовать"
            Debug EventData()
    EndSelect

Until Event = #PB_Event_CloseWindow

См. также

PostEvent(), WindowEvent()

Поддерживаемые OS

Все