如何在Delphi中设置窗体的宽度和高度

Question

如何在Delphi 7中设置窗体的宽度和高度？表单包含不同类型的控件。我需要将主窗体大小设置为127x263。它应该通过点击按钮以编程方式更改 。

Answer 1

像这样：

MainForm.Width := 127; 
MainForm.Height := 263; 

或者你想在客户区设置为这些维度：

MainForm.ClientWidth := 127; 
MainForm.ClientHeight := 263; 

当然，你最常用的设置在设计时在Object Inspector这些属性然后将它们写入到表单的.dfm文件中。

如果要出现一个按钮这样的改变单击添加处理程序按钮，点击看起来像这样：

procedure TMainForm.Button1Click(Sender: TObject); 
begin 
    Width := 127; 
    Height := 263; 
end; 

在这最后的摘录，你不需要指定MainForm对象实例因为事件处理程序是TMainForm类的成员，因此Self是隐含的。

如果你想跟着乌尔里希·格哈特的建议（见注释），并使用SetBounds然后你可以这样写：

SetBounds(Left, Top, 127, 263); 

最后，如果你的窗体有Scaled = True那么你需要处理的字体缩放。像这样的硬编码像素尺寸将不适合字体缩放设置为与您的机器不同的值的机器。