![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
О TObject ;в событиях [D5, Win95/98]
Mikhalyov Dmitry © (2001-12-19 15:55:00)напишите мне тормозу на примере вызов события Edit1.OnChange из другого события или процедуры
Mick (2001-12-19 17:09:00) [1]Мне все нравится. Автор вопроса задал вопрос нечетко.
Мне показалось что он просто хочет повторно использовать код, реализованный у него в Form1.Edit1Change(Sender:TObject).
Alex_Sudakov (2001-12-19 17:01:00) [2]Ну да, и что? Чем тогда тебе мойвыриант не нравится?
Mick (2001-12-19 16:13:00) [3]> Alex_Sudakov
В первом случае необходимо проверять свойство у Edit1 OnChange на nil.
Alex_Sudakov (2001-12-19 16:07:00) [4]Чем тебе предыидущий вариант не понравился?
Mick (2001-12-19 16:06:00) [5]Sorry, конечно же так:
Edit1Change(Edit1)
......
Edit1Change(Application)
Mick (2001-12-19 16:02:00) [6]Edit1.OnChange(Edit1)
Edit1.OnChange(nil)
Edit1.OnChange(Self)
Edit1.OnChange(Application)
Но все зависит от реализации самого обработчика
procedure Edit1.OnChange(Sender:TObject);
Alex_Sudakov (2001-12-19 16:01:00) [7]if Assigned(Edit1.Onchange) then Edit1.Onchange(self);
MBo (2001-12-19 16:00:00) [8]http://delphi.mastak.ru/cgi-bin/forum.pl?look=1&id=1008764059&n=0
gek (2001-12-19 16:00:00) [9]А че тебе еще написать а, может и прогу заодно?