Разработка приложений в системе Delphi. Шейкер Т.Д. - 134 стр.

                   14.2. Управление выводом форм
    Форма-заставка создаётся при запуске приложения и отображается первой.
Затем создаётся главная форма, но она не выводится, пока на экране
располагается заставка. После того как заставка удаляется с экрана и из памяти,
приложение выполняется как обычно. Для реализации предложенного сценария
необходимо внести изменения в файлы проекта и главной формы. Далее
приводится рекомендуемая последовательность действий.
    1. Начать новое приложение.
    2. В модуле главной формы в процедуре FormCreate задать время
демонстрации заставки. Для этого объявить целочисленную переменную t,
зафиксировать текущее время и задать цикл, который будет повторяться в
течение заданного интервала времени (например 5с). Так как функция
getTickCount возвращает результат в мс, то его надо разделить на 1000:
t:=getTickCount div 1000;
while ( getTickCount div 1000 ) < t+5 do;

    Задержка может не потребоваться, если при создании главной формы в
обработчике OnCreate надо выполнить большое количество действий или если
приложение содержит много форм, создание которых выполняется в файле
проекта. В последнем случае операторы создания форм располагаются между
командами, которые создают и удаляют форму-заставку. В результате заставка
отображается на экране сразу после запуска приложения и видна до тех пор,
пока идёт подготовка других форм. К сожалению, время такой задержки
зависит от производительности компьютера. В итоге время искусственной
задержки приходится подбирать экспериментальным путём.
    3. Сохранить главную форму в файле.
    4. Добавить к проекту новую форму. Так как эта форма будет использована
для создания заставки, то следует ей присвоить имя и задать в Инспекторе
объектов или программно свойства, определяющие внешний вид, размеры и
расположение на экране.



                                      134