delphi - 如何在 Delphi 7 中设置元素对齐所有表单的一半？

Question

您好我创建了一个表单并将两个 DBGrid 放入表单中。并设置 align Left to right 两者。当我运行程序并最大化窗口 DBGrid 宽度没有改变。我需要将 DBGrid 的宽度都更改为窗口的 50%？

Answer 1

将左侧控件（Control1例如）设置为alLeft，将右侧控件（Control2例如）设置为alClient。OnResize然后在父窗体上创建一个处理程序：

procedure TForm1.FormResize(Sender: TObject);
begin
  Control1.Width := ClientWidth div 2;
end;