新手问题,delphi 的保存对话框

Posted 2023-03-18

初学者的问题:
delphi保存选择对话框,点击是的话执行保存.点击否的话不执行.
谁帮我写一下,谢谢!

if Application.MessageBox('选择是或否','提示',MB_YESNO+MB_ICONINFORMATION) = IDYES then
showmessage('是')
else
showmessage('否'); 参考技术A 我们老师告诉我们说：
如果你对自己没什么信心，就去学VB
如果你对自己不是非常有信心，就去学Delphi或者PB
如果你对自己非常有信心，就去学VC吧 参考技术B if SaveDialog.Execute then
begin
showmessage('文件已保存')
end;

delphi 如何在不打开saveDialog对话框的前提下保存文件

我要将一个数据集中的所选数据行另存到指定的目录里面。如何在不打开saveDialog对话框的前提下保存文件。请高手指教，图为我写的代码但是保存每行数据是都弹出对话框。

参考技术A 删除 if dlgsave1.execute then
将下一行的.SavetoFile(dlgSave1.FileName)
改为 .SaveToFile(FieldByName('AttachName').AsString)
或 .SaveToFile(PrdWSDN.cdsDown.FieldByName('Remark').Asstring+"\"+FieldByName('AttachName').AsString) 参考技术B 指定路径保存即可。把savedlg注释掉追问

朋友可否详细解说，最好有代码示范一下，谢谢！

本回答被提问者采纳