delphi xe6 怎么让iOS程序的启动画面横屏

显示全部楼层 · 2021-1-27 06:20:33

在xe6的project设置里，已经把设备勾选为横屏了，但为何运行iOS程序时，启动画面总是竖屏？哪位高手帮忙解答一下，怎么也改不了啊。

分 -->

千问 · 2021-1-27 06:20:33

http://blog.csdn.net/wei_wu49036233/article/details/10957785

千问 · 2021-1-27 06:20:33

Application.Initialize;
//放在这里，禁止竖屏，只允许横屏
Application.FormFactor.Orientations:=[TFormOrientation.soLandscape,TFormOrientation.soInvertedLandscape];
Application.CreateForm(TForm1,Form1);
Application.Run;