Question

delphi 关闭时 出现对话框.取消则不退出怎么实现?

点关闭按钮(就是上面那个×的时候) 出现对话筐 点取消就不退出 怎么实现啊? 急

Answer 1

在关闭事件里面弹出一个Messagebox询问是否要退出就行了，如果不退出的话就Cancolose设为false就行了，这个是最基本的问题了

Answer 2

在from的 onclose事件里添加以下代码

if messagebox(handle,'是否退出?','提示',MB_YESNO)=IDYES then close();