delphi xe 横屏竖屏的管理


本文整理自网络,侵删。

 在FromShow事件上面或者FormCreate事件:
 Application.FormFactor.Orientations := [TFormOrientation.soLandscape, TFormOrientation.soInvertedLandscape];
横屏竖屏自动
Application.FormFactor.Orientations := [TFormOrientation.soLandscape];
只横屏
Application.FormFactor.Orientations := [TFormOrientation.soInvertedLandscape];
只竖屏

相关阅读 >>

Delphi touchkeyboard1 基本用法

Delphi_关于null,nil

Delphi完美的线程注入和卸载

使用Delphi启动和关闭外部应用程序

Delphi 代码查询一个json ip 地址的归属地

Delphi d10.x 并行库ppl编程之 futures

Delphi程序删除自己

Delphi-基础(for循环)

Delphi压缩库 zlibex 介绍

Delphi idhttp上传图给asp完美解决

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...