Вниз
Скачать: CL | DM;

Выполнение процедуры после открытия формы.   Найти похожие ветки 

← →
grusty ©   (2003-05-14 10:48) [0]

Как выполнить процедуру во время создания, открытия формы - понятно. А как выполнить процедуру после ее открытия, т.е. когда форма уже открыта и видна на экране?
Заранее благодарен!


← →
Leshiy ©   (2003-05-14 10:52) [1]

onShow?


← →
MBo ©   (2003-05-14 10:53) [2]

в OnShow



← →
kull ©   (2003-05-14 11:09) [3]

Да... OnShow? сейчас... ждите.... как же...

Не верь им они тебя обманывают. Если тебе надо чтобы форма полностью прорисовалась, то в том же самом OnShow надо послать себе сообщение с помощью PostMessage и его потом же ловить и запускать ту процедуру которую тебе надо.
(В принципе есть и другие вырианты.)


← →
Anatoly Podgoretsky ©   (2003-05-14 11:19) [4]

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


← →
AlexSV ©   (2003-05-14 11:25) [5]

> Anatoly Podgoretsky © (14.05.03 11:19)

Почему? Если процедуру надо выполнить только один раз, то установить флаг выполнения процедуры и не иметь проблем


← →
Anatoly Podgoretsky ©   (2003-05-14 11:38) [6]

Один из вариантов, да, но если можно обйтись без флага, то зачем плодить сущности?


← →
Babay ©   (2003-05-14 12:15) [7]

В onCreate написать так
Begin
inherited;
Show;
MyProcedure;
end;


← →
grusty ©   (2003-05-14 12:30) [8]

--> Babay

Спасибо огромное!


← →
Calm ©   (2003-05-14 13:31) [9]


> Babay © (14.05.03 12:15)
> В onCreate написать так
> Begin
> inherited;
> Show;
> MyProcedure;
> end;

А ничего, что форма будет автоматически показываться как только ее создали?
Это может быть (и часто бывает) критично, если после создания формы нужно изменить какие-либо ее параметры.



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.01 c
14-83673
Marina_S
2003-05-05 21:47
2003.05.26
Как в 3d max заставить двигаться фигурки (avi для делфи)


1-83485
NetKnight
2003-05-15 14:09
2003.05.26
finfirst & findnext


14-83703
Manulo
2003-05-06 15:03
2003.05.26
*.h + Delphi = work


1-83534
softmaster
2003-05-13 17:37
2003.05.26
FastReport


1-83438
Андрей
2003-05-13 08:08
2003.05.26
Как ограничить кол-во одновременно запущенных потоков




   Наверх