![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как передать событие? [D5, WinXP]
insmod © (2002-06-09 10:51:00)Такой вот вопрос у меня: Надо чтоб при запуске Формы2 из Формы1, Форме2 присваивалось событие OnDblClick например просто Close, ну и собственно при закрытии Формы2 он убиралось, но это только будет при запуске с Формы1. Вот. Такой вот изврат.
insmod (2002-06-09 12:35:00) [1]Нифига.
выделеяет строчку procedure form2.closeclick(Sender:TObject);
и пишет ";" expected but "." found
MBo (2002-06-09 10:57:00) [2]формулировочки-то хромают...
form2.ondblclick:=form2.closeclick;
procedure form2.closeclick(Sender:TObject);
Close;
Song (2002-06-09 10:55:00) [3]Form1.onDblClick:=CloseProc;
В CloseProc пишешь закрытие
При выходе Form1.onDblClick:=nil;