Windows 7 上的 Delphi 2007 对 saveDialog.Execute 调用没有任何作用。几周前我看到另一个人提到了这一点，但它是在 Borland c++ 中。
问问题
3440 次
2 回答
3
请参阅embarcadero 新闻组上的线程“TOpenDialog.Execute not working” 。
通过从“HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options”中删除可执行文件名称解决了问题
于 2010-01-28T17:15:36.587 回答
2
我在 Windows XP 中遇到了同样的问题（保存对话框不工作）。
根据您提到的 embarcadero 组中的大量交流，经过多次不成功的尝试（https://forums.embarcadero.com/thread.jspa?messageID=196950&tstart=0#196950）。
我发现原因是：Savedialog12 的初始文件目录和文件名不好，相互矛盾，文件名包含我打开的最后一个文件的完整路径（我认为准备保存我的文件很聪明最后打开了；不幸的是，我在初始目录中的内容与我在文件名中的内容相同！）
通过清除保存对话框的两个字段已经解决了该问题。
此外，通过在相关字段中输入有效值来实现我准备保存的最初目标：
SaveDialog1.FileName:=ExtractFileName(Opendialog1.Filename);
SaveDialog1.InitialFileDir:=ExtractFilePath(Opendialog1.Filename);
于 2010-12-13T09:57:09.043 回答