Delphi中的excel问题(100分)

  • 主题发起人 主题发起人 licj
  • 开始时间 开始时间
L

licj

Unregistered / Unconfirmed
GUEST, unregistred user!
在Delphi中如何实现打开一个Excel文件
 
作ado连access会么,一样的。
李维写的书<Delphi 5.X ADO_MTS_COM+高级程序设计篇>中有例子。
 
你可以ADO连EXCEL文件,就如同打开一个数据表一样简单.
你也可以用ExcelApplication打开EXCEL文件做修改,修饰,做得好的话可以做到像在EXCEL中
一样的效果.我也有简单的例子,要的话发给你.kan@freetrend.com.vn
 
也可以用shellexecute函数来打开EXCEL文件,详细用法参见help菜单下的windows SDK
 
这只是一个小例子,用来打开一个XLS文件,和关闭EXCEL

在SERVER页上选 一个EXCELAPPLICATION放在FORM上,加入如下代码:
procedure TForm1.Button1Click(Sender: TObject);
begin
ExcelApplication1.Connect;
ExcelApplication1.Caption:='this is my program!';
ExcelApplication1.Workbooks.Open('c:/1.xls',EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,EmptyParam,0);
ExcelApplication1.Visible[0]:=True;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
ExcelApplication1.Quit;
end;
 
有点夸张啊~~~
 
但是在delphi6中不好用!!!
 
接受答案了.
 
后退
顶部