其尺寸大于屏幕尺寸的表单的屏幕截图

时间:2012-05-24 15:57:20

标签: windows delphi delphi-2010 screenshot tform

我有一个TForm对象,其高度大于我屏幕所需的垂直分辨率。

出于某种原因,Windows不允许表单的可见(客户端?)区域超出屏幕分辨率,因此我的表单上会出现垂直滚动条。

如何获取TBitmap图像或整个表单的屏幕截图(没有滚动条,所有表单组件都可见),以便表单的所有内容都可见?

1 个答案:

答案 0 :(得分:8)

首先,您必须确保表单没有滚动条。为此,您可以为FormConstrainedResize编写事件处理程序,并根据需要调整MaxWidth和MaxHeight。如果在设计期间限制了表单大小,请将FormCreate事件中所需的宽度和高度设置为所需的值。

现在您可以使用GetFormImage来获取屏幕截图。