16.35.14. function GetFileSize
function GetFileSize(AFileName : string) : integer;
Возвращает размер файла с указанным именем в байтах. В случае ошибки (файл не найден, ошибка доступа) возвращается размер "-1".
В имени файла допустимо указывать макросы, подробнее см. в разделе "макросы, допустимые в именах файлов"
Пример:
begin
AddToLog(IntToStr(GetFileSize('%System32%\notepad.exe')));
end.