Задание свойств элементам фрейма при запуске приложения

← →
konstantinov (2003-05-06 20:47) [0]

Есть фрейм, в котором есть ComboBox свойство Items нужно задать при запуске приложения. Написал следующее:

Процедура в модуле фрейма:
public
procedure ComboBox1ItemsCreate;
...

procedure TFrame2.ComboBox1ItemsCreate;
begin
...
end;

Вызов процедуры из Form1.Create:

procedure TForm1.FormCreate(Sender: TObject);
begin
Frame21.ComboBox1ItemsCreate;
end;

Можно ли для компонента ComboBox или любого другого в модуле фрейма отловить момент создания компонента, чтобы в будущем, используя этот фрейм не писать лишнего кода в основном модуле?

Заранее спасибо!

← →
vuk (2003-05-06 22:22) [1]

Перекройте AfterConstruction в фрейме.

← →
vuk (2003-05-06 22:30) [2]

Да, только учтите, что если Вы бросите фрейм на форму и уже потом в дизайнере установите свойство Items у вашего элемента управления, то эффекта от того, что вы пропишете в AfterConstruction не будет, т.к. после его выполнения будут загружены измененные свойства из ресурса формы.

← →
vuk (2003-05-06 22:32) [3]

Подумал ещё чуток, и пришел к выводу, что можно перегрузить не AfterConstruction, а Loaded. :o) Так оно надёжнее.

Задание свойств элементам фрейма при запуске приложения Найти похожие ветки