Общая

← →
Начинаю (2002-07-12 04:28) [0]

Как сделать заставку, а после проиграша заставки открывается новое окно.

← →
Tornado © (2002-07-12 08:08) [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.

При загрузке появляется форма (красивая), и пока грузятся остальные формы висит на экране, потом закрывается и показывается основная форма приложения. Удачи

Общая Найти похожие ветки