Функция для получения размера файла на диске в байтах.

 

Синтаксис

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"): Скрипт выполнен успешно.

 

Ещё посмотреть

IntToKbyte

mGetServerServiceFolder

mLogScript