Delphi 快速获取文件大小(使用_lopen和FileSeek,此函数可以快速获取文件大小,即使文件已经被其它程序锁定)


本文整理自网络,侵删。

 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;
 
来源:https://www.cnblogs.com/findumars/p/7841231.html

相关阅读 >>

Delphi 实现一个程序在另一个程序内运行

Delphi xe7实现的登录窗体的正确用法示例

Delphi 获取所有磁盘盘符列表

Delphi url取得文件名

Delphi 仿dbnavigator方式

Delphi之完美splash方案

Delphi xe2模拟键盘按键

Delphi xe7 up1 调用android振动功能

Delphi 操作sql 插入一万条数据 三种方式速度测试

Delphi执行cmd命令和bat文件

更多相关阅读请进入《Delphi》频道 >>



打赏

取消

感谢您的支持,我会继续努力的!

扫码支持
扫码打赏,您说多少就多少

打开支付宝扫一扫,即可进行扫码打赏哦

分享从这里开始,精彩与您同在

评论

管理员已关闭评论功能...