
16.11.2011, 14:56
|
Местный
|
|
Регистрация: 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;
|