在主窗体前的密码窗体点“取消”如何关闭整个程序(100分)

  • 主题发起人 主题发起人 panjf
  • 开始时间 开始时间
if cancel then application.terminate
 
1.
APPLICATION.TERMNATE;
或
APPLICATION.HALT;
2.可以让密码窗口模态显示
判断他的MODALRESULT来决定
主窗口是否关闭
 
关键是你的密码窗体是怎么show的。
如果是show,close
如果是showmodal,给modalresult赋值。
 
多人接受答案了。8-)
 
如果你的主窗体已经建立只是还没有show的话，你应该用application.terminate；
如果你是先建立的密码窗体的话，完全可以通过判断越过主窗体的create
 
program sa;
...
if 密码窗体 not cancel then begin
application.初始化（就是那个以initia开始的那个，具体的我忘记了：P）
建立程序运行窗体
application.run
end;
end.
 
我是个新手，再请问如何判断密码窗体使用的是“取消”按钮？
 
用button.caption!!!吧！
 
用halt 或Terminate可以关闭整个程序，
如果想知道是否按Cancel，看 事件中的Sender
比如：
Cancel 的名字叫C_button,你就可以：
if Sender=C-BUtton then
......
 
BaKuBaKu：这个问题已经结束讨论，您的答案最终被接受。
 
procedure TPassword_Frm.btnCancelClick(Sender: TObject);
begin
Application.Terminate ;
end;

DELPHI会自动响应取消按钮的单击事件，不用你关心的！
终止程序只要Application.Terminate 即可！
 
多人接受答案了。
 
您必须登录或注册才可回复。

Similar threads

Ray
[转]终于可以发布Delphi下收点OSGI精髓皮毛而设计的插件框架WisdomPluginFramework
回复
4
查看
4K
chlkuei
C
晨
一个关闭子窗体的问题，高手请进(100分)
回复
4
查看
167
jsxjd
J
B
能不能做到不关闭窗体，其它程序就无法运行(100分)
回复
12
查看
170
tomol
T
Z
ActionMainMenuBar，ActionManager和多窗体的问题！(50分)
回复
3
查看
137
CLHSoft
C
A
子窗体的关闭问题(30分)
回复
8
查看
155
AYing
A
后退
顶部