Показать сообщение отдельно
  #8  
Старый 16.11.2011, 14:56
icWasya icWasya вне форума
Местный
 
Регистрация: 09.11.2010
Сообщения: 499
Репутация: 10
По умолчанию

Цитата:
Сообщение от cyber922
На форме заставки должно быть какое нибудь изображение, потом она закрывается и появляется основная форма.
dfm - файлы были, но вырубили свет они стёрлись... комп у меня привередливый к этому делу...(
как-то так
Код:
//prohject.dpr

begin
  Application.CreateForm(TFormInit,FormInit);//создали форму заставку
  FormInit.Show;//сделали видимой
  FormInit.Update;//временно сделали главной

// а теперь создаём остальные формы
  Application.CreateForm(TMainForm, MainForm);
  Application.CreateForm(TForm3, Form3);
  Application.CreateForm(TForm4, Form4);
  Application.CreateForm(TForm5, Form5);
  Application.CreateForm(TForm6, Form6);

  MainForm.Update;// теперь эта форма главная

  FormInit.Free;//убиваем заставку
// штатное продолжение
  Application.Run;
end;
Ответить с цитированием