XLSReadWrite使用

在DELPHI中使用XLSReadWrite操作Excel简便快捷，软件可在本机未安装Office的前提下读取Excel文件，网上资料较少，现将自己的学习杂记做一记录，Delphi的不同版本，需要不同版本的XLSReadWrite来支持，自己用的Delphi2010，使用XLSReadWriteII4破解版本。
定义一个控件变量
xls:XLSReadWriteII4
文件名指向
xls.FileName:=’D:\测试.xls’
文件读取
xls.Read
文件存取
xls.Write
文件密码设定：若在存取前设定密码，则在下次读取前需指定密码方能正确打开，否则将产生错误！
密码设定-xls.PassWord:=’12345’
  xls.Write
文件打开- xls.FileName:=’D:\测试.xls’
xls.PassWord:=’12345’
xls.Read
文件密码清除
xls.PassWord:=’’
xls.Write
单元格赋值-XLSReadWrite中，表格的行号、列号以及工作表序号，均是从0开始计数。
Xls.Sheet[0].AsString[0,0]:=’测试’-将xls文件中工作表0的0行0列单元格赋值为‘测试’。
读取单元格
Memo1.Text:= Xls.Sheet[0].AsString[0,0]。
删除工作表中的某一行：
Xls.Sheet[0].DeleteRows(0,0)-删除xls文件中工作表0的第0行。
删除工作表中的连续多行：
Xls.Sheet[0].DeleteRows(0,2)-删除xls文件中工作表0的第0、1、2行。
删除工作表中的某一列：
Xls.Sheet[0].DeleteColumns(0,0)-删除xls文件中工作表0的第0列。
删除工作表中的连续多列：
xls.Sheet[0].DeleteColumns(0,2)-删除xls文件中工作表0的第0、1、2列。
文件中工作表数量读取：
Memo1.Text：=StrToInt(xls.Sheets.Count)
文件中工作表名称修改：
xls.Sheet[0].Name:='测试'
新增工作表：
Xls.Sheets.Insert[2]-在工作表2处插入一个新的工作表。

转载于:https://www.cnblogs.com/xieyunc/p/9126519.html