delphi 如何在两个窗体间切换

Posted 2023-03-14

form1为主窗体，当单击FORM1上的按钮时切换到FORM2。这怎么弄啊？

参考技术A 在form1的implementation下写入
uses unit2;

在form1的按钮中写
form2.show; 参考技术B form1.hidden();
form2.show(); 参考技术C form2是form1的子窗体：
如果需要form2执行完关闭后，再继续执行form1,用form2的showmodal；
如果需要form2执行过程中，可以操作form1，用form2的show。
var
frm2:TForm2;
begin
frm2:=TForm2.Create(nil);
frm2.show;//不需要form2执行完
try
if frm2.showmodal=mrCancel then;//需要form2执行完
begin
//xxxxx
end;
finally
frm2.free;
end;

end;