Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.04.02;
Скачать: CL | DM;

Вниз

FormCreate...   Найти похожие ветки 

 
serjkp   (2006-03-20 17:53) [0]

Уважаемые, подскажите...
в проекте множество форм,необходимо при FormCreate любой формы выполнять одну простенькую процедуру. подскажите как можно сделать так чтобы не вставлять во всем проекте вызов этой процедуры.Была идея создать пустую форму где уже написан в FormCreate и переназначить ее для всех далее создаваемых форм. Но как это сделать???


 
StriderMan ©   (2006-03-20 18:00) [1]

сразу 2 варианта на ум приходит:
1. Сделать базовый класс для всех форм, и в нем сделать Event FormCreate, не забыв назначит у потомков тоже. Либо вообще в базавом классе выполнять эту процедуру в конструкторе формы.

2. Сделать процедуру
procedure FormCreate(Sender: TObject);

и потом при создании форм - назначать на нее Event;


 
Игорь Шевченко ©   (2006-03-20 18:29) [2]

type
 TMyForm = class(TForm)
 protected
   procedure DoCreate; override;
 end;

procedure TMyForm.DoCreate;
begin
 .... все необходимые действия...
 inherited;
end;

Не зря все обработчики событий сделаны виртуальными процедурами.


 
serjkp   (2006-03-21 11:26) [3]

Примногоблагодарен, все получилось!!!!



Страницы: 1 вся ветка

Текущий архив: 2006.04.02;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.04 c
15-1142123474
Настя Б.
2006-03-12 03:31
2006.04.02
Срочна нужна помощь профессионалов!!!


4-1137242738
Volf_555
2006-01-14 15:45
2006.04.02
Как в ран-тайме добавить в попап-меню расширенное меню?


15-1141744421
ZeFiR
2006-03-07 18:13
2006.04.02
Новый счетчик-прорыв на сайте?


6-1135017409
SergP
2005-12-19 21:36
2006.04.02
Открыть браузер и выполнить POST-запрос


10-1116231207
andrey__
2005-05-16 12:13
2006.04.02
компонент - TExcelApplication, создать диаграмму