DelPhi统计文件比特算法实现
//DELPHI 读取文件的方法(可以读取大于4G的文件)
Private
FsFile : string; //文件名
FiSize : Int64; //文件大小(字节数)
FiCount: Int64; //bit统计的累计值
Var
iFile : Integer;
High, Low : DWORD; //DWORD为32位整数
FileSize : Int64;
begin
iFile := FileOpen(FsFile...
原创
2021-07-13 11:40:02 ·
709 阅读 ·
2 评论