分享：Delphi导入EXCEL数据表的交互技术(全用代码实现)

Question

写在这里了，新手请转入
http://blog.csdn.net/yjkita/article/details/7426403

Answer 1

顶一下~~~
case5166升的好快，
一个月就超过我了，后生可畏。。
老衲应该隐居找老尼了

Answer 2

今天测试了还有这个方法，较简单的用法，用ListBox显示数据
procedure TForm1.Button1Click(Sender: TObject);
var 
  ExcelApp: Variant; 
  a,s,d:string; 
  i:integer;
begin
  ExcelApp:=CreateOleObject('Excel.Application'); 
  ExcelApp.WorkBooks.Open('d:\delphi\book1.xls');
  a:=ExcelApp.Cells[2,1];
  s:=ExcelApp.Cells[2,2]; 
  d:=ExcelApp.Cells[2,3];   ListBox1.Items.add(a);
  ListBox1.Items.add(s);
  ListBox1.Items.add(d);
end;

Answer 3

因不能编辑只能加楼补充Uses
uses
ExtCtrls,ComObj;

Answer 4

1、博客中贴的方法是把EXCEL表格直接当作一张关系型DB表来操作，这种方法虽然简单，但有局限，只能适用于简单的列表式规则的表格
2、4楼的方法则是采用了EXCEL的OLE对象接口根据坐标来直接操作单元格，这种方法通用性强，不过也是一定要有EXCEL软件的运行环境才行
3、还有一种方法，就是直接解析EXCEL的文件格式，这种方法对运行环境没有要求，但实现较复杂，需要对EXCEL的各种格式版本（二进制、基于XML的、基于ZIP的）十分熟悉。最大的障碍是EXCEL的格式并不是完全开放的，因此在兼容性以及知识产权方面可能会有一些问题综上，EXCEL文件的操作建议第2种方法，最靠谱，最可靠