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

Вниз

нужно как можно раньше контрлам формы повесить метод   Найти похожие ветки 

 
Vlad Oshin ©   (2008-10-16 15:10) [0]

Мне нужно как можно раньше контрлам формы повесить метод, допустим на OnEnter.
это делает допустим такой код
I:integer;
PropInfo: PPropInfo;
begin
 for I := 0 to ComponentCount-1 do
 begin
    if (components[i] is TControl) then
    begin
       PropInfo:= GetPropInfo(components[i],"OnEnter");
       If PropInfo<>nil then
         tButton(components[i]).onEnter:=ClassFormSend; //наверное, можно и так, tButton
    end;
 end;


но, вся суть, чтоб как можно раньше.
на создание формы нельзя, ее же еще нет.

Как посоветуете?


 
Ega23 ©   (2008-10-16 15:13) [1]


> на создание формы нельзя, ее же еще нет.


Если ты о событии OnFormCreate, то оно вызывается сразу после создания формы и всего того, что в dfm прописано.


 
Сергей М. ©   (2008-10-16 15:18) [2]


> на создание формы нельзя, ее же еще нет.


Есть. Причем полностью созданная - со всеми контролами и назначенными им из dfm свойствами, в т.ч. свойствами-методами обработки событий.

Т.е. событие OnCreate есть факт полностью сконструированной формы.


 
Vlad Oshin ©   (2008-10-16 15:22) [3]

ага, надо было просто попробовать  :)
спасибо


 
Правильный$Вася   (2008-10-16 18:42) [4]


> ага, надо было просто попробовать

просто почитать справку



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

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

Наверх




Память: 0.47 MB
Время: 0.008 c
4-1201550703
Звоновский
2008-01-28 23:05
2008.11.30
Подскажите как ужнать имя сласс по handle окона


15-1222757008
Maxer123
2008-09-30 10:43
2008.11.30
PHP: Сортировка многомерного массива


8-1188292828
dr_craigan
2007-08-28 13:20
2008.11.30
PNG


2-1224594331
ivanoff
2008-10-21 17:05
2008.11.30
SQL замудренный


2-1224824692
Quart
2008-10-24 09:04
2008.11.30
Datafield в cxDBImage