IPB

> FileSize (функция)
Чат
Форум
Загрузка...
 

Язык:
Русский
English

 FileSize   (функция)


Возвращает текущий размер файла.

Объявление

 Function FileSize(Var F) : Longint;

Режим

Windows, Real, Protected

Замечания

Параметр F - файловая переменная. FileSize(F) возвращает число компонентов в F. Если файл пустой, то FileSize(F) возвращает нуль.

В режиме {$I-} функция IOResult вернет нуль, если операция была успешна, иначе она вернет отличный от нуля код ошибки.

Ограничения

Не может использоваться для текстовых файлов. Файл должен быть открыт.

См. также

Пример

Язык:
Русский
English


 { Пример программы для функций FilePos, FileSize и процедуры Seek }

uses Crt;

var
  F    : file of Byte;
  Size : LongInt;

begin
 { Get File name from command line }
  Assign(F, ParamStr(1));
  FileMode := 0;
 Reset(F);
  Size := FileSize(F);
 WriteLn('Размер файла : ', Size, ' байт.');
 WriteLn('Установка указателя позиции на середину файла...');
 Seek(F, Size div 2);
 WriteLn('Текущая позиция : ', FilePos(F));
 Close(f);
end.
 
 К началу страницы 
Тэги: FileSize
 

Код для вставки: :: :: :: ГОСТ ::
Поделиться: //
 



-
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"