http://blog.youkuaiyun.com/delphiteacher/article/details/9720831参考这个 1、应用程序禁止竖屏代码 Application.Initialize;