引入单元文件XLSReadWriteII5,Xc12Utils5;
在代码中设置属性
XLSReadWriteII5使用参考
xls: TXLSReadWriteII5
xls.Filename 文件名
xls.Read 开始读取
xls.Count sheet总数
xls.Sheets[i].Name sheet名
xls.Sheets[0].LastRow 最后一行
xls.Sheets[0].LastCol 最后一列
xls.Sheets[0].AsString[Col, Row] 取文本值
XLSRW1: TXLSReadWriteII5;
XLSRW1:=TXLSReadWriteII5.Create(nil);
XLSRW1.Version:=xvExcel97;
//或 XLSRW1.Version:=xvExcel2007;
XLSRW1[0].CalcDimensions;
Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号
执行时间: 0.16114497184753 seconds