寻求Excel或者word转换成PDF的解决方案,大家有谁做过这方面的程序吗?有什么vcl控件可以用吗,免费收费的都可以,用PDF打印机的方法除外。
解决方案 »
- DELPHI XE2 生成的体积好大。
- delphi7怎样通过ini、dll文件配置SQl数据库连接?
- sql 日期转换 ,小妹感激。解决马上结贴
- 求助,什么软件使delphi程序在打开后,空闲一段时间后,就不能运行了,报错!!
- 随机数
- DBGrid直接操作,只容许新增,不容许修改怎么实现?
- d7+access 中的SQL “select * from "如何实现格式化字段
- 一个计算问题,大家帮忙看怎样实现
- delphi如何连接sql server 数据库
- 中国软件的黑幕之最
- 请问Delphi 中 Embedded 控件的 NewWindow2 和NewWindow3 事件各有什么区别?
- COM高手进来!
首先,要找到这个控件,安装Acrobat Reader程序也就同时得到了这个控件。
这个控件位于它的 ActiveX 子目录下,名字可能因版本不同而稍有不同。如 3.0 版的名字叫 pdf42.ocx .
然后,使用 Delphi5 的 Component 菜单下的 Import ActiveX Control 功能将此 ActiveX 控件 install 入 Delphi5 中。
Delphi5 将生成一个包裹类 TPDF 在 PdfLib_TLB 单元中,下面是其属性、方法声明:
TPdf = class(TOleControl)
private
FIntf: _DPdf;
function GetControlInterface: _DPdf;
protected
procedure CreateControl;
procedure InitControlData; override;
public
procedure Print;
function LoadFile(const fileName: WideString): WordBool;
procedure AboutBox;
property ControlInterface: _DPdf read GetControlInterface;
property DefaultInterface: _DPdf read GetControlInterface;
published
property TabStop;
property Align;
property DragCursor;
property DragMode;
property ParentShowHint;
property PopupMenu;
property ShowHint;
property TabOrder;
property Visible;
property OnDragDrop;
property OnDragOver;
property OnEndDrag;
property OnEnter;
property OnExit;
property OnStartDrag;
property src: WideString index 1 read GetWideStringProp write SetWideStringProp stored False;
end;例如,使用下面的代码,只用一行就可以打开并显示一个PDF文件,这就是ActiveX给我们带来的好处。procedure TForm1.Button1Click(Sender: TObject);begin if OpenDialog1.Execute then pdf1.src := OpenDialog1.FileName;
end;参考上面的属性、方法,我们可以将PDF的应用发挥得更加充分。