procedure TForm1.btn1Click(Sender: TObject);
begin
with TForm2.Create(self) do
begin
ManualDock(self);
WindowState := wsMaximized;
Align := alClient;
Show;
end;
end;
窗口显示于parent控件上
最新推荐文章于 2024-11-26 15:27:31 发布
本文介绍了一个使用Delphi实现窗体间交互的简单示例。主要通过创建第二个窗体并调整其显示状态来演示如何在一个窗体上触发另一个窗体的操作。此示例中涉及窗体最大化和对齐设置。
扫一扫
4709
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
