如何设置Delphi 2009使PDF文件默认用Adobe Reader打开?

更新于
2026-10-04 22:47:36
0阅读来源:SEO教程
  • 内容介绍
  • 文章标签
  • 相关推荐

本文共计216个文字,预计阅读时间需要1分钟。

尝试使用Windows默认程序打开PDF文件时,如果没有任何反应。如果将默认程序设置为Internet Explorer,它将可以正常工作。以下是代码示例:

javascriptvar openDialog : TOpenDialog;// Open dialog

所以基本上当我尝试打开W​​indows默认使用Adobe Reader打开的PDF文件时,没有任何反应.如果我将默认程序设置为Internet Explorer,它可以工作..

这是我的代码

var openDialog : TOpenDialog; // Open dialog variable begin openDialog := TOpenDialog.Create(self); openDialog.InitialDir := MaskEditLocation.Text; if openDialog.Execute then ShellExecute(Handle, PChar('Open'), PChar(openDialog.FileName), nil, nil, SW_SHOWNORMAL); openDialog.Free; end;

有任何想法吗?

谢谢您的帮助!

你永远不应该假设应用程序已经注册了一个特定的动词,如open或run.当你想要默认行为时,只需将动词留空,让Windows决定:

ShellExecute(Handle, nil, PChar(OpenDialog.FileName), nil, nil, SW_SHOWNORMAL);

本文共计216个文字,预计阅读时间需要1分钟。

尝试使用Windows默认程序打开PDF文件时,如果没有任何反应。如果将默认程序设置为Internet Explorer,它将可以正常工作。以下是代码示例:

javascriptvar openDialog : TOpenDialog;// Open dialog

所以基本上当我尝试打开W​​indows默认使用Adobe Reader打开的PDF文件时,没有任何反应.如果我将默认程序设置为Internet Explorer,它可以工作..

这是我的代码

var openDialog : TOpenDialog; // Open dialog variable begin openDialog := TOpenDialog.Create(self); openDialog.InitialDir := MaskEditLocation.Text; if openDialog.Execute then ShellExecute(Handle, PChar('Open'), PChar(openDialog.FileName), nil, nil, SW_SHOWNORMAL); openDialog.Free; end;

有任何想法吗?

谢谢您的帮助!

你永远不应该假设应用程序已经注册了一个特定的动词,如open或run.当你想要默认行为时,只需将动词留空,让Windows决定:

ShellExecute(Handle, nil, PChar(OpenDialog.FileName), nil, nil, SW_SHOWNORMAL);