如何实现当单击窗体有上角的关闭按钮后弹出对话框,单击OK后窗体真正关闭,而单击Cancel后窗体不关闭??我用if messagebox(handle,'aa','bb',mb_okcancel+mb_defbutton1)=idok then
       close
    else
       form1.createnew;出现异常,请教高手,谢谢您的指点。

解决方案 »

  1.   

    我觉得在窗体的OnClose事件中写:
    if messagebox(handle,'aa','bb',mb_okcancel+mb_defbutton1)<>idok then
      Action := caNone;
      

  2.   

    关注!屏蔽标题篮,自己在FORM上放BUTTOM不好么?
      

  3.   

    谢谢楼上的大侠,您说的很对,顺便问问caNone是什么意思啊?
      

  4.   

    就是啥都不做。
    你以前用过Delphi吗?我觉得你在问之前,先看Help。
      

  5.   

    好的,我用VC的,最近学数据库,老师要求用Delphi的,你说的对,当初我也是MSDN一路过来的,谢谢你的建议,我只是想省力点,再次感谢,马上结帖。