【问题标题】:how to set width and height of a form in delphidelphi如何设置表格的宽度和高度
【发布时间】:2011-09-23 10:45:25
【问题描述】:

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

【问题讨论】:

  • 请确保您始终包含通用的 delphi 标签,因为没有多少人检查 delphi-7 标签。这次我添加了它,但对于以后的问题,请记住这一点 - 这样你会得到更好的答案。
  • 好的。我以后会这样做,谢谢

标签: delphi delphi-7


【解决方案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,那么您需要处理字体缩放。像这样的硬编码像素尺寸不适用于字体缩放设置为与您的机器不同的值的机器。

【讨论】:

  • 我不会单独更改宽度和高度,而是使用 SetBounds 来最小化更新。
  • 如果AutoSize 设置为true,则以编程方式设置ClientHeightClientWidth 不会影响表单。
猜你喜欢
  • 2011-02-26
  • 2014-05-24
  • 1970-01-01
  • 2013-05-04
  • 1970-01-01
  • 2011-08-20
  • 2017-12-26
  • 1970-01-01
  • 1970-01-01
相关资源
最近更新 更多