Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Заставка перед загрузкой программы [D7, WinXP]


mouse_web ©   (2004-08-10 02:26:00) 

Как сделать заставку перед загрузкой программы. Например как при загрузке MS Word. Сначала заставка, потом загружается word и когда полностью подгрузился заставка пропадает.


TUser   (2004-08-10 07:21:00) [1]

А. Вобщем да, но не в данном случае. Там, на этой форме лабел, на него чего-то пишется в Form1OnCreate. Там этих ProcessMessages - в избытке. А в других случая, конечно, надо.


Думкин   (2004-08-10 07:18:00) [2]

>  [4] TUser ©   (10.08.04 07:14)

Ну я Application.ProcessMessages вставляю. Потому как не видно ее так если.


TUser   (2004-08-10 07:14:00) [3]

И Hide, а почему не Free?
Ну, это я из проекта выдрал, там это не совсем заставка - эта форма показывается и во время работы иногда.

А после Show что?


Думкин   (2004-08-10 07:12:00) [4]

> [2] TUser ©   (10.08.04 07:09)

После Show надо еще одно. И Hide, а почему не Free?


TUser   (2004-08-10 07:09:00) [5]

Например так
 Application.Initialize;
 Form4:=TForm4.Create(Application);
 Form4.Show;
 Application.CreateForm(TForm1, Form1);  
 Application.CreateForm(TForm2, Form2);
 Application.CreateForm(TForm3, Form3);
//  Application.CreateForm(TForm4, Form4);
 ....
 Form4.Hide;
 Application.Run;
end.
Пока грузятся все формы и выполняются их OnCreate, Form4 будет видима.


GanibalLector   (2004-08-10 02:35:00) [6]

например так Demos\Db\Mastapp


Наверх

Титульная страница Поиск, карта сайта Написать письмо