获取文件大小的函数 在不打开该文件的情况下,根据文件路径获得文件大小的函数是什么?thanks。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 file:=TFileStream; file:=TFileStream.create('','') file.size 就是文件大小 用FileSize函数。你可查看Delphi的帮助,有例子。 GetFileSize最直接SetFilePointer移动文件指针到文件尾,EAX寄存器中就是大小或者var Fi: BY_HANDLE_FILE_INFORMATION; H: HWND;begin H := FileOpen(Trim(ParamStr(0)), fmShareDenyNone); if GetFileInformationByHandle(H, Fi) then ShowMessage(IntToStr(Fi.nFileSizeLow));end; excel问题 如何使cxDBTreeList中的记录移动到指定的行、列? idmessage 中如何設置才能在outlook中顯示收件人而不是一串mail地址(急) 关于数据库操作的问题,请大家帮帮忙,十分奇怪 我怎样根据系统时间得出今天是星期几? 求做报表的源代码 请求帮助 dbgrid问题? 如何计算两个日期时间型数据之间相差的小时和分钟 请教delphi中不固定参数的用法。 D6开发的程序在XP下为啥显示的不是XP风格? 推荐一个超好的bt下载网站http://www.manfen.net/forum/btsubsystem.php?type=4
file:=TFileStream;
file:=TFileStream.create('','')
file.size 就是文件大小
Fi: BY_HANDLE_FILE_INFORMATION;
H: HWND;
begin
H := FileOpen(Trim(ParamStr(0)), fmShareDenyNone);
if GetFileInformationByHandle(H, Fi) then
ShowMessage(IntToStr(Fi.nFileSizeLow));
end;