当前位置 : 主页 > 编程语言 > delphi >

如何通过Delphi 2009打开PDF文件(窗口默认程序Adobe Reader)?

来源:互联网 收集:自由互联 发布时间:2021-06-23
所以基本上当我尝试打开W​​indows默认使用Adobe Reader打开的PDF文件时,没有任何反应.如果我将默认程序设置为Internet Explorer,它可以工作.. 这是我的代码 varopenDialog : TOpenDialog; // Open dial
所以基本上当我尝试打开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);
网友评论