savedialog弹出提示框的问题
if SaveDialog1.Execute then
Application.MessageBox(PChar(msg '),PChar(Application.Title), MB_ICONQUESTION or MB_YESNOCANCEL or MB_DEFBUTTON1);

我这么写,为什么点保存出现了提示,而保存对话框就不见了?
我应该怎么写才能在执行messagebox以后才保存窗口?

[解决办法]
SaveDialog是一个模块窗口,点击保存后就关闭的。