procedure TForm1.openForm(aFormClass: TFormClass; aOwner: TWinControl);
begin
with AFormClass.Create(aOwner) do
begin
ManualDock(aOwner);
WindowState := wsMaximized;
Align := alClient;
Show;
end;
end;
procedure TForm1.openForm(aFormClass: TFormClass; aOwner: TWinControl);
begin
with AFormClass.Create(aOwner) do
begin
ManualDock(aOwner);
WindowState := wsMaximized;
Align := alClient;
Show;
end;
end;