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

时间:2015-09-12 12:33:21

标签: delphi tform tpanel

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

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

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

1 个答案:

答案 0 :(得分:4)

  

我想让此表单自动对Align属性设置为alClient的组件做出反应。

这就是解决方案。删除

form.WindowState := wsMaximized;

并替换为

form.Align := alClient;