delphi - delphi中如何设置窗体的宽度和高度

Question

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

Answer 1

像这样:

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

或者您可能想将客户区域设置为这些尺寸:

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

当然，您最常在设计时在对象检查器中设置这些属性，然后将它们写入表单的 .dfm 文件中。

如果您希望在按钮单击上发生此类更改，请为按钮单击添加一个处理程序，如下所示:

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

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

如果您希望遵循 Ulrich Gerhardt 的建议(请参阅评论)并使用 SetBounds 那么您可以编写:

SetBounds(Left, Top, 127, 263);

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