在程序中利用pdf.ocx浏览pdf文件

lingh110 2003-10-15 04:58:55
程序中利用pdf.ocx浏览pdf文件时,遇到如下问题:
第一次浏览文件,可以正常浏览,但当更换文件再次浏览时,程序非法退出,
不知何原因
type
PTreeNode = ^TMyRec;
TMyRec = record
PNodeText: string;
PNodeValue: string;
end;


begin
new(FilePath);
FilePath:=TVFile.Items.Item[TVFile.Selected.Index].Data;//树型结构数据
filename1:=filepath.PNodeValue;

if pdf1.src<>'' then//再次浏览文件
begin
pdf1.src:='';
pdf1.src:=filename1;
end
else
begin//首次浏览文件
pdf1.src:= filename1;
pdf1.setShowToolbar(false);
end;
...全文
74 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
alanfan 2003-12-17
  • 打赏
  • 举报
回复
谁有接口的说明,
setShowToolbar(false)不能真正隐藏工具条,
--再打开一个新页面来浏览不就行了.
或重调入时重新初始化一下
smallcrocodile 2003-10-15
  • 打赏
  • 举报
回复
关注

5,379

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧