delphi - 将控制集中在调整大小上的首选方式

Question

当父级更改宽度或高度时，您首选的保持控件以父级为中心的方法是什么？

Answer 1

如果“居中”是指“它已经在中间，并且您想将其保留在那里而不调整其大小”，则删除所有锚点。如果应该调整大小，gabr 的解决方案是:)

Answer 2

将控件的 Anchors 属性设置为 [akLeft, akTop, akRight, akBottom]。

Answer 3

如果您的意思是一种“更新，请稍候......”类型的东西，我在 Form 的 OnResize 事件中手动移动它。这使我可以在设计过程中保持面板不碍事，并正常隐藏，但我可以在需要时使其可见。

procedure TMyForm.FormResize(Sender: TObject);
var
  nNewTop : Integer;
begin
  inherited;
  pnlRegenerating.Left := (ClientWidth - pnlRegenerating.Width) div 2;
  nNewTop := (ClientHeight div 5) {* 4};
  if (nNewTop + pnlRegenerating.Height) > ClientHeight then
    nNewTop := ClientHeight - pnlRegenerating.Height - 4;
  pnlRegenerating.Top := nNewTop;
end;