一个关于EXCEL的问题

Question

我想用ＤＥＬＰＨＩ 直接操作EXCEL表（ 包括读和写功能），希望高手赐教！！！！！

Answer 1

可以用ADO连接EXCEL来直接操作
ADOConnection1.ConnectionString:='Provider=MSDASQL.1;Persist Security Info=False;Extended Properties="DSN=a.xls;DBQ=D:\a.xls;DefaultDir=D:;DriverId=790;FIL=excel 8.0;MaxBufferSize=2048;PageTimeout=5;"'//这是一个连接字符串的例子

Answer 2

我想问一下,接着怎样把数据在DBGRID里显示出来呢??

Answer 3

把dbgrid通过datasorce连接到相应的数据表控件上

Answer 4

但最好把excel先加到odbc,然后去连odbc

Answer 5

可以用delphi自带的ExcelApplication控件
或者用原生的OLEOBJECT对象

Answer 6

可以把EXCEL做为数据库，这样更简单，

Answer 7

Delphi操作Excel有问题，不要用ADO方式，直接用Excel.Application可能要好一点点

Answer 8

excelfile:=CreateOleObject('excel.application');
  str:=extractfilepath(application.ExeName);
  if not fileexists('excelexample.xlt')then
    begin
      application.MessageBox('EXCELexample.XLT模板不存在','错误');
      excelfile.workbooks.add(-4167);
      exit;
    end
  else
    excelfile.workbooks.add(str+'excelexample.xlt');
  sheet:=excelfile.workbooks[1].sheets[1];
  sheet1:=excelfile.workbooks[1].sheets[2];
  sheet.cells[2,2]:='11';
  sheet1.cells[5,6]:='56';
    excelfile.workbooks[1].sheets[1].saveas(str+'2.xls');