如何在自己的程序里创建wps对象,用wps对象来完成打开,另存为和关闭等操作.
就像创建word对象一样.
就像创建word对象一样.
解决方案 »
- 在delphi中 如何实现 USB摄像头捕获视频显示?
- 请问各位:在繁体系统中,大陆银行中用"3"的大写字如何带出???急!!!在线等!!!
- adoquery中使用SQL语句中的insert 、update和delete
- delphi加access的安装问题,再线等待
- 请问,用 mmio 系列函数读取 Riff 文件时如何获取当前指针
- 怎样判断某一项数据在stringgrid中已经被添加过
- 我怎样才能截获这个程序发送的消息,或者确定它的消息格式?分不够再加!
- 急急!!!!请问TGIF控件哪儿有下????
- 如何调用其它form中的数据源(datasource)?
- 请教:我的这两个程序相差不大,为什么一个可以,一个不可以呢?
- intraweb 中Iwdbgrid iwdbedit使用
- 分布式开发选择那种技术比较好?
procedure TForm1.Button1Click(Sender: TObject);
var
App: OleVariant;
begin
//打开WPS程序,
App := CreateOleObject('Wps.Application');
App.Visible := True;
//新建一个文档
App.Documents.Add;
//建入一行文本
App.Selection.TypeText('hello world');
//保存文档
App.ActiveDocument.SaveAs('C:\hello world.wps', 1, False, '', True,
'', False, False, False, False, False);
//关闭程序
App.Quit;
end;procedure TForm1.Button2Click(Sender: TObject);
var
App: OleVariant;
begin
App := CreateOleObject('Wps.Application');
App.Visible := True;
//打开上面保存的文档
App.Documents.Open('C:\hello world.wps');
end;如果你写过VBA,从上面的例子可以看出,WPS提供的接口与Office是完全一样的,只有COM对象的名字是Wps.Application
所以,如果你会Office二次开发,那么对WPS的二次开发完全没有任何困难。
下面是Office的二次开发文档:
http://www.microsoft.com/downloads/details.aspx?familyid=179BEE82-E6E6-4B78-AFF9-9A541167541F&displaylang=en
因此,楼上的话是有些偏颇的,其实国内的公司与国外的公司差距并不是很大,呵呵!!!
我还有一个问题请教,就是我引用WPS对象的程序,可以在没有安装WPS的机子上运行吗?
你引用的WPS对象的是WPS这个产品提供的,如果没有安装WPS,怎么可能可以用呢。如果是这样,那还要WPS做什么呢。