如何在Delphi XE2中固定tablet PC的表单？

Question

我有个问题。我用Delphi XE2创建了一个全屏表单。然后，我在屏幕分辨率为1024x600的Windows7平板电脑上运行我的应用程序。然后我旋转tablet PC (现在的分辨率是600x1024)，我遇到了一些表单元素的问题(一些按钮在屏幕后面，等等)。我是否可以配置项目，以便当我转动tablet PC时，我的窗体不旋转？

Answer 1

根据此MSDN article，您可以通过监听WM_DISPLAYCHANGE消息来检测屏幕是否已旋转。

然而，你会面临一个严重的问题。现在，您需要将整个应用程序绘制为90度旋转。这将需要相当多的工作。老实说，我不相信这是一个容易处理的解决方案。我怀疑可行的选择是：

• 修改您的程序，使其在两个方向上都能工作，或
• 配置设备，使其始终处于您的首选方向。