delphi xe 横屏竖屏的管理


本文整理自网络,侵删。

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

相关阅读 >>

Delphi程序只允许运行一个实例的三种方法

Delphi 生成guid算法的单元

Delphi firemonkey的屏幕分辨率hdpi、mdpi、ldpi的差别

Delphi读写firebird二进制数据

Delphi读取webbrowse中的图片显示在image中

Delphi判断某个程序是否已经启动

Delphi format中的换行符号是什么

Delphi dbgrid支持鼠标滚轮浏览数据

Delphi crc32算法

Delphi datasnap的线程池

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



打赏

取消

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

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

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

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

评论

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

    正在狠努力加载,请稍候...