请教高手? 1.是不是能用action:=cafree;关闭showmodal窗体;2.怎么样能让一个showodal窗体在关闭后,打开另一个showmodal窗体? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 1、当然可以,只是你这样的话下回还要显示这个窗体时(无论是Show还是ShowModal)必须重新Create。事实上,Show和ShowModal只是显示窗体的两种方式,和窗体内部的代码关系不大。2、这样连着写就行了: Form1.ShowModal; Form2.ShowModal; 显示窗口: begin FrmPrn := TFrmPrn.create(Application); FrmPrn.ShowModal;end;关闭窗口时:在FrmPrn的onclose事件中:procedure TFrmPrn.FormClose(Sender: TObject; var Action: TCloseAction);begin Action := caFree;end; 但是我在用action:=cafree;把窗体关闭后,用showModal不能在加载另一个窗体了。为什么? 关于delphi中fastreport的问题 轉換成字串輸入'0' 不知道这算不算Delphi的 bug delphi怎么自定义鼠标 自己写的一个小控件,树管理控件 我装的delphi7中的TClientDataSet组件怎么找不到?急... 关闭登陆窗口,打开主窗本代码怎么写? 请各位大哥大姐帮帮忙啊!!!!关于数据库的连接问题! 救命啊!为什么我一打开CSDN的问题就出错!好几天了,以前只是偶尔裸奔一下. 为什么Delphi的很多控件中都需要唯一关键字? Writeprint() 这个函数如何用? 两天了还是搞不定,Writeprint() 这个API函数如何用?
Form1.ShowModal;
Form2.ShowModal;
begin
FrmPrn := TFrmPrn.create(Application);
FrmPrn.ShowModal;
end;关闭窗口时:在FrmPrn的onclose事件中:
procedure TFrmPrn.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Action := caFree;
end;
用showModal不能在加载另一个窗体了。
为什么?