用DELPHI写一个代码,将EXCEL文件读取成TXT文本

来源:百度知道 编辑:UC知道 时间:2024/05/27 02:27:20
我是新手,请各位大侠把每段代码的意思标写清楚。

才10分,懒得说

在delphi中调用excel有四种方式,我们选取其中的一种用OleObject来装载excel工作表的方式来谈delphi控制excel的重要属性和方法。
首先给出通过OLE创建的一些主要代码步进行简单说明:
创建OLE对象:
Var olecon: TOleContainer;
Olecon:= TOleContainer.Create(self);
Olecon.oleobject:= Olecon.CreateObject('excel.sheet',false);
或选择导入一个excel文件来创建OLE对象:
Olecon.oleobject:= Olecon.CreateObjectFromFile(xlsname,false);
最好隐藏excel的几个工具条,这样就好象是嵌在你的程序中的一个表而已了:
Olecon.OleObject.application.CommandBars['Standard'].Visible:=false;
Olecon.OleObject.application.CommandBars['Formatting'].Visible:=false;
Olecon.OleObject.application.CommandBars['Reviewing'].Visible:=false;
然后显示并激活excel表,对TOleContainer定义的对象:
Olecon.show;
Olecon.doverb(0);
这样基本可以了,但TOleContainer有个不好的地方,就是当你一点击其它控件是就它就失去焦点,然后就自动退出,其实并没有真的退出,只是需要你再次激活它而已,关键是当它失去焦点的时候就excel对象就不见了,可以用Timage控件把TOleContainer所在的地方有 EXCEL时候的区域图片截下来骗骗用户,我们这里主要不是讲这个,就不详述了。
下面我们就开始讲Excel_TLB中的接口的常用属性和方法,主要是针对导出和设定报表格式的一