如何实现主窗体调用子窗体 ( 积分: 60 )

  • 主题发起人 主题发起人 zm_027
  • 开始时间 开始时间
Z

zm_027

Unregistered / Unconfirmed
GUEST, unregistred user!
1.在工程中有一个FrMain和一个FrCksf<br> &nbsp;要实现点击FrMain中的一个按钮来显示FrCksf<br> &nbsp;小弟是菜鸟,请大侠们详细解答,多谢!<br>2.另外请问以下代码是什么功能:<br>FrCksf:= TFrCksf.Create(application);<br> &nbsp; try<br> &nbsp; &nbsp; FrCksf.ShowModal;<br> &nbsp; finally<br> &nbsp; &nbsp; FrCksf.Free;<br> &nbsp; &nbsp; FrCksf:=nil;<br> &nbsp; end;<br>分题给分!
 
1.在工程中有一个FrMain和一个FrCksf<br> &nbsp;要实现点击FrMain中的一个按钮来显示FrCksf<br> &nbsp;小弟是菜鸟,请大侠们详细解答,多谢!<br>2.另外请问以下代码是什么功能:<br>FrCksf:= TFrCksf.Create(application);<br> &nbsp; try<br> &nbsp; &nbsp; FrCksf.ShowModal;<br> &nbsp; finally<br> &nbsp; &nbsp; FrCksf.Free;<br> &nbsp; &nbsp; FrCksf:=nil;<br> &nbsp; end;<br>分题给分!
 
1:双击FrMain中的按钮<br>拷贝2的代码,并且在按Alt+F11选择FrCksf进行FrCksf的引用。<br>按F9试试<br>2:功能就是创建一个模态窗口,显示完毕后进行资源释放。
 
http://www.delphibbs.com/delphibbs/dispq.asp?LID=3242663
 
FrCksf:= TFrCksf.Create(application); &nbsp;// 是創建窗體<br> &nbsp; try <br> &nbsp; &nbsp; FrCksf.ShowModal;// 獨立顯示窗體<br> &nbsp; finally<br> &nbsp; &nbsp; FrCksf.Free; // 注銷<br> &nbsp; &nbsp; FrCksf:=nil; // 清空<br> &nbsp; end;
 
FrCksf:= TFrCksf.Create(application); &nbsp;// 是創建窗體<br> &nbsp; try <br> &nbsp; &nbsp; FrCksf.ShowModal;// 獨立顯示窗體<br> &nbsp; finally<br> &nbsp; &nbsp; FrCksf.Free; // 注銷<br> &nbsp; &nbsp; FrCksf:=nil; // 清空<br> &nbsp; &nbsp; 上面两句可改成<br> &nbsp; &nbsp; FreeAndNil(FrCksf);<br> &nbsp; end;
 
谢谢,多人接受答案了!
 
后退
顶部