主题：[原创]窗口查看PDF文件，需要的请进(重传)

窗口显示PDF文件，目前基本是两种方法：

 

第一种方法：通过webbrower控件

Dim web As WinForm.WebBrowser = e.Form.Controls("WebBrowser1")

web.address = "c:\test.pdf"

如果机器装有Adobe Reader，控件就会自动打开相应的文件，达到预览的目的，但是如果没有安装Adobe Reader，恐怕就不能打开了(这点没试过)

此主题相关图片如下：note1.jpg

 

第二种方法：引用第三方控件

引用附件中的PDFView.dll文件和PDFLibNet.dll文件以及gsdll32.dll文件，请拷贝到foxtable程序目录下

新建窗口，增加图片控件PictureBox1，新建按钮，代码如下

Dim Pdfv As new PDFView.ConvertPDF.PDFConvert
Dim pcb As WinForm.PictureBox = e.form.Controls("PictureBox1")
pcb.Image = Pdfv.GetPageFromPDF(ProjectPath & "Hello.pdf",1)

效果如图

此主题相关图片如下：note2.jpg

附件下载：

 

 

---

以下内容只有回复后才可以浏览

---