摘要:
uses Excel2000,ComObj;procedure F_Form.Button1Click(Sender: TObject);var myExcel:TExcel; Int_i,Int_j,rowCount,columnCount:Integer; ExcelId:Variant;begin try ExcelId:=CreateOleObject('Excel.Application'); except on Exception do raise Exception.Create('无法创建报表,请确认是否安装EXCEL'); end; if DB 阅读全文
摘要:
在把数据保存为excel时 会报这个错:OLE Error 800A03EC一般是由下面几个造成的:1、缺少这个:use ComObj, 没有引用单元文件;2、没有创建OLE对象直接引用了,应该这样:MyExcel:=CreateOleObject(Excel.Application);3、对单元格赋值或赋表达式不正确导致的,或超出excel可识别值的范围;如:XlsSheet.Cells[i,j].Value := Cells[j,i]; 当cell[0,0]就会报这个错,因为excel单元格不是从[0,0]开始的; 阅读全文