假设如下:
1、Form1.FormStyle := fsMDICHILD; (因为FORM1是一个独立的功能模块,故设计期设置为fsMDICHILD)2、现在FORM2想调用FORM1中的方法或组件,代码如:var frm: form1; frm := tform1.create(nil);。出现的问题:每创建form1它就会显示出来,FORM2调用FORM1的时候我不需要FORM1显示。请教!
1、Form1.FormStyle := fsMDICHILD; (因为FORM1是一个独立的功能模块,故设计期设置为fsMDICHILD)2、现在FORM2想调用FORM1中的方法或组件,代码如:var frm: form1; frm := tform1.create(nil);。出现的问题:每创建form1它就会显示出来,FORM2调用FORM1的时候我不需要FORM1显示。请教!
ShowWindow(Form1.handle, SW_hide) ;
ShowMessage( inttostr( Form1.aaa ) );