如何取得文件的大小(50分)

  • 主题发起人 主题发起人 ArmyGuo
  • 开始时间 开始时间
A

ArmyGuo

Unregistered / Unconfirmed
GUEST, unregistred user!
Delphi自己有个函数是FileSize,但是必须得是取打开文件的大小而且取出来的大小好像总是不能跟文件实际大小一支,请问Filesize取出来的大小是什么?字节?KB?M?<br>除此之外还又没有其他取文件大小的办法呢?
 
取出的是記錄文件的記錄數。<br><br>用API:getfilesize
 
FileSize取出的大小是 &nbsp;字节。<br>var<br>&nbsp;M:TMemoryStream;<br>beign<br>&nbsp;M:=TMemoryStream.Create;<br>&nbsp;M.LoadFromFile(FileName);<br>&nbsp;~~~ := M.Size; &nbsp;//文件大小<br>&nbsp;M.Free;<br>end;
 
function FSize(FileName: string): LongInt;<br>var<br>&nbsp; F: File;<br>begin<br>&nbsp; AssignFile(F, FileName);<br>&nbsp; reset(F,1);<br>&nbsp; Result := FileSize(F);<br>&nbsp; CloseFile(F);<br>end;<br><br>单位: byte
 
OK,解决!
 
OK,解决!
 
OK,解决!
 
后退
顶部