Функция для получения размера файла на диске в байтах.
function FileSize(sFileName:string): ibt64;
Параметр |
Тип |
Значение |
---|---|---|
sFileName |
string |
имя файла и полный путь к нему. |
Результат |
Значение |
---|---|
-1 |
указанный файл или путь не существует; |
>0 |
точный размер файла в байтах. Корректно определяются размеры файлов >2GB на файловой системе NTFS. |
begin
mLogScript('MyChat Server core files size:', '');
mLogScript('mcserv.exe - ' + IntToKbyte(FileSize(mGetServerServiceFolder(3) + 'mcserv.exe')), '');
mLogScript('mcserv.db - ' + IntToKbyte(FileSize(mGetServerServiceFolder(1) + 'db\mcserv.db')), '');
mLogScript('history.db - ' + IntToKbyte(FileSize(mGetServerServiceFolder(1) + 'db\history.db')), '');
end.
[19:56:52] (Log "FileSize"): MyChat Server core files size:
[19:56:52] (Log "FileSize"): mcserv.exe - 14.4 MB
[19:56:52] (Log "FileSize"): mcserv.db - 9.03 MB
[19:56:52] (Log "FileSize"): history.db - 112 MB
[19:56:52] (Run "FileSize"): Время выполнения скрипта: 3 мс
[19:56:52] (Run "FileSize"): Скрипт выполнен успешно.