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处插入一个新的工作表。
posted @ 2015-12-15 10:01  小宇飞刀  阅读(569)  评论(0编辑  收藏  举报