Delphi For iOS开发指南(17):让应用程序禁止竖屏(也就是只显示横屏)

概述Delphi For iOS开发指南(17):让应用程序禁止竖屏(也就是只显示横屏)     最近好多人问，怎么样让Delphi For iOS开发的应用程序禁止竖屏，也就是想让它一直横屏显示，横屏是好，一行可以放好几个控件，表格的话也可以多显示几列，看起来方便。 只要一句代码就可以让Delphi For iOS开发的应用程序禁止竖屏，如下： Application.FormFactor.Orie

Delphi For iOS开发指南(17):让应用程序禁止竖屏(也就是只显示横屏)

 

 

最近好多人问，怎么样让Delphi For iOS开发的应用程序禁止竖屏，也就是想让它一直横屏显示，横屏是好，一行可以放好几个控件，表格的话也可以多显示几列，看起来方便。

只要一句代码就可以让Delphi For iOS开发的应用程序禁止竖屏，如下：

Application.FormFactor.OrIEntations := [TFormOrIEntation.soLandscape,TFormOrIEntation.soInvertedLandscape];

很多时候，需要在iOS应用程序刚打开的时候，也就是欢迎界面显示的时候就要横屏了，那就要放在工程的代码中才会起作用：

(工程代码查看方法：在工程管理视图，鼠标右键工程节点，在d出的菜单中选择VIEw Source)。

program Project1; uses  System.StartUpcopy,FMX.Forms,Unit1 in 'Unit1.pas' {Form1}; {$R *.res} begin  Application.Initialize;  //放在这里，禁止竖屏，只允许横屏  Application.FormFactor.OrIEntations := [TFormOrIEntation.soLandscape,TFormOrIEntation.soInvertedLandscape];  Application.CreateForm(TForm1,Form1);  Application.Run;end.

 

 

当然，你也可以在工程选项中进行设置:

在工程管理视图中鼠标右键，在d出的菜单中选择Options…，在左边的列表中选中Application，在右边面板区域中的OrIEntation页，勾选Custom orIEntation，你就可以勾选它下面的四个选项(Portrait，UpsIDe down，Landscape home right，Landscape home left)，其中Landscape home right，Landscape home left表示横屏，Portrait，UpsIDe down表示竖屏。

 

当然，它其实也是在工程代码中加上前面我们讲的那句代码。

 

 

 

 

 

 欢迎加入OrangeUI For FMX 技术支持QQ群10900297

总结

以上是内存溢出为你收集整理的Delphi For iOS开发指南(17):让应用程序禁止竖屏(也就是只显示横屏)全部内容，希望文章能够帮你解决Delphi For iOS开发指南(17):让应用程序禁止竖屏(也就是只显示横屏)所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。