如何打开PDF文件，谁能帮帮我？ (100分)

M

MichaelZhu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-20

• #1

我在DELPHI中写了一段代码，希望能打开一个PDF文件，但是只能显示PDF的启动画面，之后，<br>什么也没有。我在任务管理器中也没有找到acrobat.exe文件。另外，我的机子是W2K，装了<br>acrobat5。<br>我用了这一句：<br>ShellExecute(Handle, 'Open', pchar('C:/Program Files/Adobe/Acrobat 5.0/Acrobat/Acrobat.exe'), pchar('I:/Exchange Performance.pdf'), '', SW_ShowNormal);<br>又用了这一句：<br>ShellExecute(handle,'open',pchar('I:/Exchange Performance.pdf'),nil,nil,SW_shownormal)<br>全部不管用。<br>另外，我导入了ACROBAT的OCX，在ActiveX页面产生了一PDF，但是不知道怎么用。<br>用了LOADFILE，也是只见到启动画面。<br>哪位大侠，请帮帮忙？<br>

 

D

desertsmoke

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-20

• #2

我试过后一种方法（我导入了ACROBAT的OCX），没问题

 

M

MichaelZhu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-20

• #3

能写出你的代码吗？<br>

 

M

MichaelZhu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-20

• #4

To desertsmoke:<br>能写出你的代码吗？

 

D

desertsmoke

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-20

• #5

不用写一句代码，你把引入的TPdf 拖到窗体中，将它的align属性值设为alClient(以便看到效果)<br>，然后在src属性中输入pdf的路径（好象对中文路径有问题），确定后就看到效果了。

 

M

MichaelZhu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-20

• #6

To desertsmoke:<br>我需要用一个BUTTON，在程序中动态指定PDF文件。<br>如何实现？最好是能够在单独的ACROBAT软件中见到。<br>我试过，如果在单击BUTTON之前，ACROBAT是打开的，那么执行我写的代码都可以见到文件。<br>否则，就只能看到启动画面。<br>

 

S

Skyman

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-20

• #7

delphi窑洞有个控件：llPDFLib 2.0也许能行，你试试看（我没用过）。

 

M

MichaelZhu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-20

• #8

To skyman,<br>我想自己写一段简单点的代码，不想用控件。

 

D

desertsmoke

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-20

• #9

哦！是有问题

 

B

b2sun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-30

• #10

http://www.delphibbs.com/delphibbs/DispQ.asp?LID=1354567<br>关注一下吧没有人提起来呀！用MODEM打电话利用PC机的耳机和麦克风，自己编程如何实现？<br>(我知道有现成的软件可以用，但是我想自己实现这个上东西）<br>QQ：65466700<br>MAIL： along@b2sun.com<br>TEL :13802785865<br>http://b2sun.com<br>请各位大侠多多指教！<br><br>

 

D

desertsmoke

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-30

• #11

我找不到你的帖子了，前几天我用一个方法实现了你的要求，不过办法有点特别：<br>先在程序中动态生成一个批处理文件，然后调用这个批处理文件，即可。等一下贴代码。

 

D

desertsmoke

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-09-30

• #12

procedure TForm1.Button1Click(Sender: TObject);<br>begin<br>&nbsp; shellexecute(handle,'open',pchar(extractfilepath(application.ExeName)+'start.bat'),nil,nil,SW_HIDE);<br>end;<br><br>start.bat(可以在程序中动态写入要打开的文件名)<br>--------------------------------------------------------------------<br>path C:/Program Files/Adobe/Acrobat 5.0/Reader/<br>acrord32.exe d:/download/1.pdf<br>exit<br>--------------------------------------------------------------------<br>运行良好。

 

M

MichaelZhu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-01

• #13

To desertsmoke,<br>我得国庆后才能试试你的方法了。<br>谢谢你的答复。<br>

 

M

MichaelZhu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-10-19

• #14

有没有更好的办法？我想在程序中随机指定一个PDF文件，然后打开。

 

M

MichaelZhu

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2003-11-25

• #15

多人接受答案了。