PDF显示问题 - VFP论坛

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

编程论坛 → 数据库技术 → 『 VFP论坛』 → PDF显示问题

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 286 人关注过本帖

标题：PDF显示问题

只看楼主加入收藏

tbk_lcy

等　级：新手上路
帖　子：45
专家分：0
注　册：2022-12-30
结帖率：56.25%

楼主

已结贴√ 问题点数：20 回复次数：7

PDF显示问题

请教各位老师：
   使用下面代码把文字为“说明”的pdf文件导入到了fj2里
txt00=getfile("pdf")
if .not.empty(txt00)
   append general fj2 from (txt00) &&overwrite
endif

想用olecontrol1显示，如何写代码？

搜索更多相关主题的帖子: 显示　 PDF　代码　 append　from　

2024-04-11 16:43

nbwww

等　级：贵宾
威　望：11
帖　子：318
专家分：750
注　册：2021-1-9

第 2 楼

得分:10

https://bbs.bccn.net/viewthread.php?tid=505200&highlight=PDF

2024-04-12 06:35

tbk_lcy

等　级：新手上路
帖　子：45
专家分：0
注　册：2022-12-30

第 3 楼

得分:0

回复 2楼 nbwww

没有看明白，请帮忙写一下代码

2024-04-12 08:45

tbk_lcy

等　级：新手上路
帖　子：45
专家分：0
注　册：2022-12-30

第 4 楼

得分:0

使用下面代码把文字为“说明”的pdf文件导入到了自由表wjk的通用字段fj2里
txt00=getfile("pdf")
if .not.empty(txt00)
append general fj2 from (txt00) &&overwrite
endif

想用olecontrol1在表单上直接显示，ThisForm.olecontrol1.openFile(txt00,'')实现不了，请教怎么弄？

2024-04-12 15:48

nbwww

等　级：贵宾
威　望：11
帖　子：318
专家分：750
注　册：2021-1-9

第 5 楼

得分:0

ThisForm.olecontrol1. 是什么？

2024-04-12 18:59

sych

等　级：业余侠客
威　望：7
帖　子：246
专家分：297
注　册：2019-10-11

第 6 楼

得分:10

aa= CREATEOBJECT("form")
WITH aa
    .Show
    .width=500
    .height=500
    TRY
        .ADDOBJECT("Olefoxit","Olecontrol","Foxit.FoxitReaderSDKCtrl.3")
    CATCH
        !regsvr32/s FoxitReader_AX_Pro.ocx
        .ADDOBJECT("Olefoxit","Olecontrol","Foxit.FoxitReaderSDKCtrl.3")
    ENDTRY
       WITH aa.olefoxit
        .openFile(Getfile('pdf'),'')  &&如果有密码，后面的空字符串应改为相应的密码
        .Visible=.t.
        .width=500
        .height=500
        .showTitleBar(0)
        .ShowToolBar(0)
        .showFormFieldsMessageBar(0)
        .showNavigationPanels(0)
        .showStatusBar(0)
    ENDWITH
ENDWITH
susp
retu
附：调用的是这个控件FoxitReader_AX_Pro.ocx
（下载频道-上传资源功能好像不能用）

[此贴子已经被作者于2024-4-21 06:23编辑过]

2024-04-13 11:06