关闭窗体，显示提示信息方面

Question

如果要关闭一个窗体的时候,提示,保存或者相关信息要在哪写?

Answer 1

这段代码今天刚用，送给你啦：
在Form的OnCloseQuery 事件里加入以下代码：
   if Application.MessageBox('Close it now?','Ask',MB_YESNO )=IDYES then
      begin
        ……//这里可以写在确认关闭之前的事件
        CanClose:=True;
      end
   else
      CanClose:=False;

Answer 2

最好在OnCloseQuery中写
onclose有时候执行不到。
onDestroy不想关闭再返回当前窗口不可能