我试图在TPanel中动态显示表单 使用此功能
procedure Show_form_in_panel(form: TForm; Panel: Tpanel);
begin
form.Parent := Panel;
form.Show;
form.WindowState := wsMaximized;
end;
表单显示非常正常,但他在我的面板中没有最大化,而且我想让这个表单自动反应像具有Alight属性=(alClient)的组件
答案 0 :(得分:4)
我想让此表单自动对
Align
属性设置为alClient
的组件做出反应。
这就是解决方案。删除
form.WindowState := wsMaximized;
并替换为
form.Align := alClient;