Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.07;
Скачать: [xml.tar.bz2];




Вниз

Как вызвать процедуру после полного отображения главной формы? 


Smok_er   (2002-01-22 04:49) [0]

Дамы и господа!
Такой вот к вам вопрос: как вызвать некую процедуру после полного создания и отображения главной формы? Методы OnCreate и OnShow не подходят, потому что сначала выполняется эта процедура (что довольно-таки долго), а уже потом отображается форма.
Заранее спасибо!



Digitman   (2002-01-22 08:18) [1]

В обработчике OnShow() пошли самому себе какое-нибудь предопределенное сообщение вызовом PostMessage(). В обработчике сообщения вызывай свою "некую процедуру"



Johnny Smith   (2002-01-22 09:42) [2]

Можешь сделать так: перед запуском своей процедуры написать Form1.Repaint;



aus   (2002-01-22 12:28) [3]

OnActivate



dimsfdf   (2002-01-22 13:48) [4]

Application.OnIdle



Smok_er   (2002-01-23 03:01) [5]

Всем откликнувшимся огромное спасибо!
Методом OnActivate все здорово получается!



SoftOne   (2002-01-23 03:11) [6]

2 Smok_er.
Имхо, по OnActivate ты можешь заработать геморрой, поскольку он может вызываться н-ное количество раз в ходе работы приложения. Так же и OnIdle.
Если требуется однократный вызов некоей функции при запуске приложения, но после отображения формы, то имхо Digiman дал наилучший совет.



SoftOne   (2002-01-23 04:01) [7]

Sorry. Писал предыдущий ответ думая о своих проблемах. Однако по серьезном размышлении, понял, что был не совсем прав. По сути вопроса, наверное, OnActivate - лучшее решение, но с обязательным учетом однократности выполнения. Совет Digitman, вследствии идеологии Windows, может оказаться не подходящим (опять вспоминаю свои проблемы) поскольку между завершением OnShow и выполнением PostMessage может пройти некоторое время.




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.02.07;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.025 c
1-18916           jenbond               2002-01-24 10:08  2002.02.07  
Запуск word


6-18945           Hawk                  2001-11-13 18:49  2002.02.07  
Connect между TServerSocket и TClientSocket по сети


1-18877           Shadow77              2002-01-23 09:22  2002.02.07  
Перетаскивание формы за Label?


1-18908           Demon ltd             2002-01-24 01:21  2002.02.07  
работа с Combobox ом


3-18778           Alex Ignatenko        2002-01-14 13:55  2002.02.07  
MS SQL Server 2000 и каскадное удаление