![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как связать обработчик событий с идентификатором? [D5, IB5.x]
Ламер © (2003-01-21 14:55:00)Мастера! Научите передовать в процедуру обработки события (OnExit) идентификатор породившего событие объекта. Объекты (ComboBox) создаются программно и каждому из них назначается одна и та же процедура OnExit. Как процедуре отследить, какой именно объект она отрабатывает?
gsu (2003-01-21 15:59:00) [1]If (Sender is TMyComponent) or (Sender=MyComponent) ?
don-do (2003-01-21 15:36:00) [2]Первая премия за самый самый вопрос!
procedure TForm1.OnExit(Sender: TObject);
begin
If (Sender is TMyComponent) or (Sender=MyComponent)
then begin
TMyComponent(Sender).MyMetod;
TMyComponent(Sender).MyBoolProperty:=false;
end;
end;
gsu (2003-01-21 15:28:00) [3]>> Anatoly Podgoretsky ©
холодильник
>> Ламер
в морозилке (-:|~
Ламер (2003-01-21 15:12:00) [4]А где в Senderе?
don-do (2003-01-21 15:09:00) [5]Sender
Anatoly Podgoretsky (2003-01-21 15:07:00) [6]Что такое ижентификатор объекта