Окно загрузки программы

[DKENT]

Сообщение от googl

сделай так:

var 
  i:integer;
begin  
Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.ShowMainForm := False;
  Application.CreateForm(TForm2, Form2);
  Form2.Show;
for i:=1 to 100 do
begin
  application.processmessages;
  Sleep(100);
end;  
Form2.Hide;
  Application.ShowMainForm := true;
  Application.Run;
end.

Большое спасибо, вот теперь работает как нужно)))))

[googl]

Сообщение от DKENT

Большое спасибо, вот теперь работает как нужно)))))

можешь для прикола еще поставить бордерстайл нон и кинуть картинку на форму на задний план и поставить автосайз формы.)

[Adidas++]

Сообщение от 3D Hunter

Исправил, изучайте:
Вложение 50814

спасибо!!!