在Project动态创建
如:
program Project1;uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Form2};{$R *.res}begin
with TForm2.Create(Application) do
showModal;
Application.Initialize;
Application.CreateForm(TForm1, Form1);
// Application.CreateForm(TForm2, Form2);
Application.Run;
end.
OK!
如:
program Project1;uses
Forms,
Unit1 in 'Unit1.pas' {Form1},
Unit2 in 'Unit2.pas' {Form2};{$R *.res}begin
with TForm2.Create(Application) do
showModal;
Application.Initialize;
Application.CreateForm(TForm1, Form1);
// Application.CreateForm(TForm2, Form2);
Application.Run;
end.
OK!
请问这个动态创建的代码,放在什么地方!在form1里吗!
form1.close;
form2.show;的话肯定错了,我试了好几回了!
如果是主窗体CLOSE则所有的都会被关闭的。
万一要的话只有用HIDE/SHOW
事件中,form1.close;form2.show;的话直接出来form2,不出现form1了
事件中,form1.close;form2.show;的话直接出来form2,不出现form1了
请问这个动态创建的代码,放在什么地方!在form1里吗! *********************
你打开工程文件单元,相信看上面那段代码不难理解
记着,这样动态创建以后,就不要再在主窗体里 Form2.show;了,