delphi - 如何使用delphi在Tpanel中最大化表单

Question

我正在尝试使用此功能在 TPanel 中动态显示表单

procedure Show_form_in_panel(form: TForm; Panel: Tpanel);
begin
  form.Parent := Panel;
  form.Show;   
  form.WindowState := wsMaximized;
end; 

表单显示非常正常，但他没有在我的面板中最大化，而且我想让这个表单像具有 Alight 属性 = (alClient) 的组件一样自动反应

Answer 1

我想让这个表单像Align属性设置为alClient.

这就是解决方案。消除

form.WindowState := wsMaximized;

并替换为

form.Align := alClient;