说说gtPDFViewer1这款古怪的组件使用

冥界3大法王

下面在使用过程中发现了一个问题，官方给的实例是通过action调用打开PDF文件的
但是呢？我要求在使用文件浏览器时，双击某文件打开(传递一个路径过去）就用不了啦~~
于是查看自带的CHM竟然没有
发现最有可能的是：gtPDFDocument1.LoadFromFile('你的文件路径');
使用后发现不报错，就是pdf没有显示出来。。。
组件使用时，必须使用gtPDFViewer1 和 gtPDFDocument1
案例里也没有找到答案，最后无奈的看了下原官方英文的FAQ
通过几轮测试发现出问题的代码在下面的注释代码中。

[Delphi] 纯文本查看 复制代码

procedure TMain_Form1.FileListBox1DblClick(Sender: TObject);
var
  i: Integer;
  TempString: string;
begin
  for i := 0 to FileListBox1.items.count - 1 do
  begin
    if FileListBox1.Selected[i] = True then
    begin
//      ShowMessage(FileListBox1.items[i]);                                 //得到文件名（含扩展名）
      ShowMessage(FileListBox1.Directory + (FileListBox1.items[i]));       //得到文件完整路径
      TempString := FileListBox1.Directory + (FileListBox1.items[i]);

      gtPDFViewer1.PDFDocument := gtPDFDocument1;       //这句不加上不显示文档内容
      gtPDFDocument1.LoadFromFile(TempString);
      gtPDFViewer1.Active := True;                                   //这句不加上同样也不显示文档内容
//      ShellExecute(Handle, 'Open', PChar('wordpad.exe'), PChar(TempString), nil, SW_SHOWNORMAL);
    end;
  end;
end;

alongzhenggang

多借   分享  这个 没有见过

Bachelor硕

这个控件打印出来的pdf带水印吗

nappywu

学习了，这个我们也研究过