本文整理自网络，侵删。
获取程序自身大小的函数
function GetExeSize: Int64;var SearchRec: TSearchRec;begin Result := -1; if FindFirst(Application.ExeName, faAnyFile, SearchRec) = 0 then Result := SearchRec.Size;end;
相关阅读 >>
Delphi cannot find implementation of method formcreate 解决办法
Delphi 判断字符是否是汉字,bytetype字符串中判断是否英文
Delphi http 常见异常状态及Delphi idhttp 控件处理方式
更多相关阅读请进入《Delphi》频道 >>
