Презентация на тему Файлы

в которой хранится некоторая информация
Логический файл – представление физического

тип
Файловый тип – произвольная последовательность элементов, длина которой заранее

На физическом уровне существуют файлы, но для работы с ними на уровне программ определяются т.н. файловые переменные, имеющие файловый тип (сорри за тавтологию).

того, чтобы обратиться к n-ному элементу файловой переменной, необходимо

(File of )
Файлы без типа (File)
File
of

Text

файла, текущая позиция файла
Определяет позицию доступа (элемент файла, с

нет
Работа с файлами осуществляется с помощью процедур и

string);
Связывает файловую переменную F с файлом FileName
function FileExists (FileName

Проверяет, существует ли файл

AssignFile(F, 'C:\Мои документы\Мои рисунки\FileName.ini'); AssignFile(F, 'FileName.ini');

If FileExists('FileName.ini') then
begin
bla-bla-bla;
end;

word]); открывает файл для чтения
procedure Rewrite (var F : File;

Две последние процедуры связывают файловую переменную F с файлом FileName
RecSize – необязательный параметр, задаёт размер элемента файла в байтах
Если файл до этого был открыт, то он закроется и откроется заново в заданном режиме

(var F : File) : boolean;
Проверяет, является ли текущая

while (not EOF(F)) do
begin
…
end;

в соответствующие переменные
procedure Write (F : File, V1..Vn);
Записывает в

Var
F : file of integer;
value : integer;
begin
…
read(F, value); write(F, value);
end;

: integer [; var Done : integer]);
Считывает не более

procedure BlockWrite ( - // - );

Записывает не более count компонентов в файл F из переменной buf. Необязательный параметр Done – реально записанное количество.

longInt);
Перемещает указатель файла F в позицию N
function FilePos (var

Возвращает текущее положение указателя в файле F

function FileSize (var F : File) : integer;

Возвращает размер файла в компонентах

integer;
currPosition : longInt;
begin
AssignFile (F, FILE_NAME);
if fileExists (FILE_NAME) then
begin
Reset (F)
while

В файле хранятся 4-байтовые числа.
Программа меняет знак каждого на противоположный и перезаписывает число в файл

file of char (также, как string не эквивалентно array

procedure Append (var F : Text);
Открывает существующий файл для

самое, что и в бинарном
Eoln ([var F : Text])

Flush() – записывает данные, которые остаются в буфере в файл