var xlsto:TXLSReadWriteII5;
begin
xlsto:=TXLSReadWriteII5.Create(xlsto);
xlsto.Filename:='c:\t.xlsx';
xlsto.Password:='aaa';
xlsto.Read;
ShowMessage(IntToStr(xlsto.Sheets.Count));
xlsto.Free;
end;
Copyright © 2014 DelphiW.com 开发 源码 文档 技巧 All Rights Reserved
晋ICP备14006235号-8 晋公网安备 14108102000087号
执行时间: 0.051140069961548 seconds