Текущий архив: 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.45 MB
Время: 0.005 c