Метод PutEventByld. Процедура Form

Назначение

Процедура посылает адресованное стандартное событие в очередь стандартных событий.

Событие адресуется элементу формы, имя которого указывается в параметрах процедуры.

Описание

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);

Смотрите также

Handle