如何在程序运行过程中,得知程序文件本身的大小?

tianyu717 2003-02-27 12:38:24
如何在程序运行过程中,得知程序文件本身的大小?
...全文
29 7 打赏 收藏 转发到动态 举报
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
tianyu717 2003-02-28
  • 打赏
  • 举报
回复
3q
bluemeteor 2003-02-27
  • 打赏
  • 举报
回复
使用filesizeByName()函数

uses IdGlobal

showmessage(inttostr(filesizebyname(Application.ExeName)));

单位是字节,自己转化一下

sysu 2003-02-27
  • 打赏
  • 举报
回复
var
sr: TSearchRec;
begin
if FindFirst(Application.ExeName, faAnyfile, sr) = 0 then
ShowMessage(IntToStr(sr.Size));
end;
qiume 2003-02-27
  • 打赏
  • 举报
回复
I am learning
presario 2003-02-27
  • 打赏
  • 举报
回复
学习.
fancier 2003-02-27
  • 打赏
  • 举报
回复
gz
jenemery 2003-02-27
  • 打赏
  • 举报
回复
学习

1,184

社区成员

发帖
与我相关
我的任务
社区描述
Delphi Windows SDK/API
社区管理员
  • Windows SDK/API社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧