Общая [D1, D4, NT4]
Начинаю © (2002-07-12 04:28:00)
Как сделать заставку, а после проиграша заставки открывается
новое окно.
Tornado (2002-07-12 08:08:00) [1]
begin
Application.Initialize;
frmLogo := TfrmLogo.Create(Application);
frmLogo.Show;
frmLogo.Update;
Application.Title := "Справочник";
Application.CreateForm(TDM1, DM1);
Application.CreateForm(TfrmMain, frmMain);
Application.CreateForm(TfrmInsert, frmInsert);
Application.CreateForm(TfrmEditing, frmEditing);
Application.CreateForm(TfrmHideCol, frmHideCol);
Application.CreateForm(TfrmPath, frmPath);
frmLogo.Close;
frmLogo.free;
Application.Run;
end.
При загрузке появляется форма (красивая), и пока грузятся
остальные формы висит на экране, потом закрывается и показывается
основная форма приложения. Удачи
Наверх 
ЧАТ |
Орешник |
|
