procedure TForm1.btn1Click(Sender: TObject); begin with TForm2.Create(self) do begin ManualDock(self); WindowState := wsMaximized; Align := alClient; Show; end; end;
http://blog.csdn.net/shuaihj/article/details/6371904
时间: 2024-08-12 17:31:34
procedure TForm1.btn1Click(Sender: TObject); begin with TForm2.Create(self) do begin ManualDock(self); WindowState := wsMaximized; Align := alClient; Show; end; end;
http://blog.csdn.net/shuaihj/article/details/6371904