Splash Form

← →
BJValentine © (2002-08-08 16:53) [0]

Мастера, помогите. У меня долго грузится программа. Ну я и решил использовать форму заставки. Создал код (spl-Splash Form):
spl:=Tspl.Create(Application);
spl.Visible:=true;

Application.Initialize;
Application.CreateForm(TForm1, Form1);
.....................................
Application.CreateForm(TForm1, Form1);

spl.Visible:=false;
spl.free;
Application.Run;

Но когда начал загружать свою программу, то эта форма отобразилась первой, но не отрисовалась как следует. Что я сделал не так?

← →
Skier © (2002-08-08 16:56) [1]

>BJValentine

spl:=Tspl.Create(Application);
spl.Show;
spl. Update;

Application.Initialize;
Application.CreateForm(TForm1, Form1);
.....................................
Application.CreateForm(TForm1, Form1);

spl.Hide;
spl.free;
Application.Run;

Привеликое спасибо. У меня в книге такого не написано, но оно работает!

Splash Form Найти похожие ветки