windows - Delphi SaveDialog 不显示

Question

在使用 Delphi XE6 和 ReportBuilder ( link) 开发并部署在 Windows 7 计算机上的应用程序中，在屏幕上显示 ReportBuilder 报告后，用户可以选择将其打印到文件中。

一个按钮允许用户选择保存文件的目录:

 /* This source code was provided by Digital Metaphors; I cannot change it. */
 SaveDialog1: TSaveDialog;
 ...
 procedure TppPrintDialog.btnPrintToFileClick(Sender: TObject);
 begin
   if SaveDialog1.Execute then
     begin

在部署了该应用程序的大多数 Windows 7 计算机中，报告工作正常。

但是，在某些计算机中，执行 SaveDialog1.Execute 时没有任何反应。

我找到了 StackOverflow post引用了 Embarcadero 的帖子，该帖子声明如下:

Problem there was resolved by deleting the executable name from HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options

不幸的是，就我而言，问题没有得到解决，因为该应用程序甚至没有在提到的注册表项中列出。

我已经联系了 Digital Metaphors 和 Embarcadero，但无济于事。

Answer 1

当我在 Delphi IDE 中为项目设置环境变量时，这发生在我身上。在调试器中启动时，加载和保存对话框均未显示，这是由于 VCL 中被静默忽略的 OLE 错误。再次删除这些环境变量解决了问题。

很遗憾，我不记得它是哪个 Delphi 版本。