Question

delphi 怎么使得在退出系统前检测数据是否保存,未保存则提示

系统是在主窗口用一个RzPageControl控件加载其他窗体的,退出系统时如果有窗体的数据未保存则提示是否保存

Answer 1

建立一个全局布尔变量，当开始输入数据后设置它为假，保存数据后再置为真，关闭窗口时检测该变量，如果为假，抛出对话框，提醒用户保存数据，如果YES就保存数据后，再退出，如果NO就直接关闭窗口

追问

就没法直接调用子窗体的相关操作方法吗？

追答

无论采用什么办法,第一,控制变量是要的;第二对话框是要给出的,不然,你的目的就实现不了.既要马儿跑的欢,又不想给马儿喂草的事是搞不成的.用户用起来十分好用的感觉,是程序员用无数的代码换来的.

Answer 2

在主窗口的onclose事件定义canclose，如果没保存，canclose:=false,如果已保存，canclose:=true
这样就可以

Answer 3

你可以在子窗体的退出事件里判断，然后在主窗体的退出事件里，逐个关闭子窗体，就会触发到子窗体的退出事件代码，然后 你懂的