Delphi 快速获取文件大小

Posted 朝闻道

tags:

篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了Delphi 快速获取文件大小相关的知识,希望对你有一定的参考价值。

复制代码
function GetFileSize(const fName: AnsiString): Int64;
var
  hFile: THandle;
begin
  hFile := _lopen(PAnsiChar(fName), OF_READ);
  Result := FileSeek(hFile, Int64(0), 2);
  _lclose(hFile);
end;
复制代码

 

此函数可以快速获取文件大小,即使文件已经被其它程序锁定。

http://www.cnblogs.com/yangyxd/p/7602402.html

以上是关于Delphi 快速获取文件大小的主要内容,如果未能解决你的问题,请参考以下文章

分享几个实用的代码片段(第二弹)

分享几个实用的代码片段(第二弹)

Delphi - URL 的文件大小 - 错误 12150

delphi:窗体大小如何根据电脑屏幕自动调整窗体大小?

delphi中如何编程获取其它程序窗口的大小?

delphi打开时窗体大小怎以设置