Delphi SaveDialog未显示

时间:2015-06-29 16:49:02

标签: windows delphi

在使用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帖子,其中说明了以下内容:

  

通过从中删除可执行文件名来解决问题   HKLM \ SOFTWARE \ Microsoft \ Windows NT \ CurrentVersion \ Image File Execution   选项

不幸的是,就我而言,问题还没有解决,因为申请甚至没有在提到的注册表项中列出。

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

1 个答案:

答案 0 :(得分:-1)

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

不幸的是我不记得它是哪个Delphi版本。