两个FORM的问题(100分)

X

xsh123

Unregistered / Unconfirmed
GUEST, unregistred user!
有两个FORM,分别是FORM1,FORM2
FORM2上有个按键,点了以后,FORM2关闭,FORM1显示
procedure TForm2.Button1Click(Sender: TObject);
begin
form2.Close;
form1.ShowModal;
end;

为什么没用,直接退出了程序!
 
Form2是主窗体吧?
你Form2都已经关掉了怎么执行后面的showmodal呢?当然退出喽。
 
form1是主窗体
 
怎么处理啊!!!!!!!!!!!!!!!!!!!!!!!!!!!
在线等!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
 
Form1原来是隐藏的?
 
是的.
谁有解决方法,分觉的少,你说.我再加!
 
你说的能详细点吗?办法很多种的 要哪种我也不知道你怎么想的 加我QQ吧 说清楚了很简单的 24685462 或者你在BBS里说清楚点
 
Form1 写
Form2 :=TForm2.Create(self);
Form2.Show;
self.Visible:=false;
Form2 写
self.Visible:=false;
Form1.Visible:=true;
还有别的方法 需要的话加QQ哈!
 
按楼主的意思只少要三个窗口,如果用隐藏的方法那两个就够了,这参考楼上就行了。
你用CLose方法就需要三个窗口,结构图应该是这样:
frmMain
/ /
/ /
frmForm1 <---> frmForm2
 
form1.close方法里加上一句:action:=canone;form1就不会关闭了
 
建议你这样做:form2点击按钮form1显示,form1在onshow中发送消息关闭form2
 
来晚了好几步。。。。
 
笑笑笑笑笑笑[:D][:D][:D][:D][:D]问问题的表述不清,回答问题的,可真累呀!
 
顶部