| Метод
PutEventByld (Word, Word). Процедура Form_PutEventByld (Word, Word,
LongInt) |
Top Previous Next |
| Назначение
|
| Процедура
посылает адресованное стандартное событие в очередь стандартных
событий. |
| Событие
адресуется элементу формы, имя которого указывается в параметрах
процедуры. |
| Описание
|
| procedure
PutEventById (iEvent: Word, iId: Word); |
| procedure
Form_PutEventById (iEvent: Word, Iid: Word; P : LongInt);
|
| Параметры
|
| iEvent
: Word - константа события. Доступны следующие
константы: |
| · | feBreak
- выйти из цикла (управляемый цикл, строка с циклом);
|
| · | feDoLoop
- войти в цикл (для циклов, где требуется проверка на вход - цикл с
параметром CHECKENTER); |
| · | feTrue,
feFalse - выбор альтернативы для условного оператора
или выбор ветви WHILE для оператора выбора.
|
| iId
: Word - идентификатор элемента формы, которому передается
событие. Идентификатор элемента формы доступен в интерфейсе с
префиксом fc. |
| P
: LongInt - ссылка на форму. Ссылка создается вызовом
метода форм Handle. |
| Пример
|
| Предположим,
есть некоторая форма Form1, доступная из интерфейса, содержащая
следующий условный оператор NameExist: |
| IF
NameExist
|
| Имя:@@@@@@@@@@@@@@@@@@@@
|
| ELSE |
| Имя
отсутствует! |
| END |
| Для
того чтобы сделать выбор альтернативы, необходимо передать
идентификатору условного оператора NameExist константу нужного
события: если имя пустое, то посылаем событие feFalse.
|
| if
(Length(Name)=0) Form1.PutEventByID (feFalse, fcNameExist);
|