等号后的 mbYes 改成 mrYes
mtConfirmation, [mbYes, mbNo], 0) = mrYes then
你把程序代码复制过来吗
if MessageBox(Handle, PChar('确认关闭？'), PChar('询问'), MB_YESNO or MB_DEFBUTTON2)= idyes then form1.Close ;
可以使用这个方法，与你要实现的那个类似。
= mrYes then 后面不要分号
内容全部来源于网络收集，如有侵权，请联系网站删除！
QQ：24596024