您好,欢迎来到爱玩科技网。
搜索
您的当前位置:首页XLSReadWrite使用杂记

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’

1

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行。

删除工作表中的某一列:

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处插入一个新的工作表。

3

因篇幅问题不能全部显示,请点此查看更多更全内容

Copyright © 2019- aiwanbo.com 版权所有 赣ICP备2024042808号-3

违法及侵权请联系:TEL:199 18 7713 E-MAIL:2724546146@qq.com

本站由北京市万商天勤律师事务所王兴未律师提供法律服务