Делаю приложение для мобильных платформ. По совету с форума сделал одну автоматическую форму, в которой по OnShow создаю все остальные. Пока все это создается показываю на сплеше progressbar. В конце загрузки показываю form1.Show;
procedure TForm1.FormShow(Sender: TObject);
begin
application.MainForm := Form1;
SplashForm.Close;
end;
Все замечательно работает на Андроиде и в iOS не показывает SplashForm, долго показывает встроенный Splash (с логотипом Delphi) и сразу главную форму.
begin
Application.Initialize;
Application.FormFactor.Orientations := [TFormOrientation.Portrait];
Application.CreateForm(TSplashForm, SplashForm);
//SplashForm.Show;
Application.Run;
end.
Если активировать SplashForm.Show - в винде приложение валится. Вопрос собственно, как заставить ioS показать SplashForm
Вопрос
gonzales
Добрый день!
Делаю приложение для мобильных платформ. По совету с форума сделал одну автоматическую форму, в которой по OnShow создаю все остальные. Пока все это создается показываю на сплеше progressbar. В конце загрузки показываю form1.Show;
procedure TForm1.FormShow(Sender: TObject); begin application.MainForm := Form1; SplashForm.Close; end;
Все замечательно работает на Андроиде и в iOS не показывает SplashForm, долго показывает встроенный Splash (с логотипом Delphi) и сразу главную форму.
begin Application.Initialize; Application.FormFactor.Orientations := [TFormOrientation.Portrait]; Application.CreateForm(TSplashForm, SplashForm); //SplashForm.Show; Application.Run; end.
Если активировать SplashForm.Show - в винде приложение валится. Вопрос собственно, как заставить ioS показать SplashForm
Изменено пользователем gonzalesСсылка на комментарий
3 ответа на этот вопрос
Рекомендуемые сообщения
Присоединяйтесь к обсуждению
Вы можете написать сейчас и зарегистрироваться позже. Если у вас есть аккаунт, авторизуйтесь, чтобы опубликовать от имени своего аккаунта.