delphi怎么程序执行数据保存的时候 关闭窗口时提示正在执行操作是否关闭程序
1条回答 默认 最新
- threenewbee 2016-06-28 05:36关注
TForm1.FormCloseQuery里面写 if MessageDlg('还有未保存文件,是否关闭?',mtWarning,[mbYes,mbNo],0)=6 then CanClose:=true else CanClose:=false;
解决 无用评论 打赏 举报
delphi怎么程序执行数据保存的时候 关闭窗口时提示正在执行操作是否关闭程序
TForm1.FormCloseQuery里面写
if MessageDlg('还有未保存文件,是否关闭?',mtWarning,[mbYes,mbNo],0)=6 then
CanClose:=true
else
CanClose:=false;