在delphi中怎样控excle,且在基中写入数据

Question

在delphi中怎样控excle,且在基中写入数据

Answer 1

var
    ExcelApp: OleVariant;
begin
    ExcelApp := CreateOleObject('Excel.Application');
    c:=ExcelApp.Sheets[j].UsedRange.Columns.Count;  //列
    r:=ExcelApp.Sheets[j].UsedRange.rows.Count;  //行
    ExcelApp.WorkBooks.Open(myFileName);
    ExcelApp.WorkSheets[1].Activate;
    ShowMessage(ExcelApp.Cells[18, 4]);
    excelapp.quit;
end;

Answer 2

出错提示：
     undeclared  identifier:'createoleobject'