本文整理自网络，侵删。
获取程序自身大小的函数
function GetExeSize: Int64;var SearchRec: TSearchRec;begin Result := -1; if FindFirst(Application.ExeName, faAnyFile, SearchRec) = 0 then Result := SearchRec.Size;end;
相关阅读 >>
Delphi的idhttp报iohandler value is not valid错误的原因
Delphi strtofloat 将“字符型”转换成“浮点型”
更多相关阅读请进入《Delphi》频道 >>
