delphi里我想做一个推出关闭时的提示程序,麻烦各位帮忙解决下

2025-03-06 22:21:56
推荐回答(1个)
回答1:

改一下,就行了
if MessageDlg('还有未保存文件,是否关闭?',mtWarning,[mbYes,mbNo],0)=6 idyes then
CanClose:=true
else
CanClose:=false;