zoukankan      html  css  js  c++  java
  • 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处插入一个新的工作表。
  • 相关阅读:
    webapi支持session
    webapi返回数据同时支持xml与json
    webapi权限控制
    Asp.net 将js文件打包进dll 方法
    All Media to FLV asp.net在线视频自动转换并截图调试成功!
    未能从程序集“System.ServiceModel
    [javascript]浮动广告
    [python]multi thread tcp connect port scanner
    [vc]让你Y的用YY
    [python]扫描网站后台脚本
  • 原文地址:https://www.cnblogs.com/xieyunc/p/9126519.html
Copyright © 2011-2022 走看看