Заставка с сообщением в FireMonkey - PullRequest
1 голос
/ 29 апреля 2019

Я хочу заставку с tLabel на нем.Это tLabel будет использоваться для отображения хода выполнения задач инициализации приложения, таких как: «Запуск баз данных», «Настройка форм» и т. Д.

Я пробовал следующий код, вфайл проекта:

  Application.Initialize;
  FormSplash := TFormSplash.Create( Application );
  FormSplash.OpenSplash;
  FormSplash.ShowProgress;
  Application.Run;

Правильно показывает заставку.Однако tLabel, который должен отображать каждый текст, размещенный в нем в последовательности, когда появляется заставка, показывает только последний опубликованный текст.Это происходит, даже если я добавляю команду Sleep после каждого отправленного текста.Я пытался опубликовать тексты по событиям FormCreate, FormShow и FormActivate с тем же результатом.

Приложение для Windows 32.

1 Ответ

1 голос
/ 06 мая 2019

Между изменением содержимого вашего ярлыка вы должны разрешить приложению реагировать на эти изменения.Самая простая возможность - использовать Application.ProcessMessages.

...