Загрузка как в настоящей игре

[X@OC]

всех С наступающим Новым Годом
Годом Дракона 2012

Пишу игрульку новогоднюю на Delphi 7
и есть возможность выбирать различные карты
карты загружаются в программу т.е. изображения кнопки и прочие
в программе создаются динамически
когда все это создается происходит такой как бы застой потом все появляется

Возможно ли сделать как в нормальных играх заставку с процентами
когда все загружается в программу?

спасибо

[Artares]

...
PB1.Max := max_objects;
PB1.Position := 0;
for i := 1 to max_objects do begin
 ...
  //создание объекта
 ...
 PB1.Position := i;
end;
...

[X@OC]

__спасибо__

[3D Hunter]

не забудьте после

PB1.Position := i;

поставить

Application.ProcessMessages;

это форсирует прорисовку контролов.