Методы доступа к файлам T String

Диалоги Open File и Save File.

Вывод или запись последовательных файлов.

Текстовые файлы.

Файлы.

Существует два типа файлов по структуре записи:

1) текстовые

2) двоичные

Также существуют два основных метода доступа к файлам:

1) последовательный

2) прямой

Procedure

Assign (файл, имя:string) – связать имя конкретного файла и файловой переменной.

Файл: Text File; - описание файловой переменой.

В модуле System описаны все процедуры работы с файлами.

System. Assign (файл, имя).

Открытие последовательного файла.

1) Reset (файл);(открыть существующий файл).

2) Rewrite (файл);(для перезаписи, т. е. если файл существует, то очищается.).

3) Append (файл);(добавить в файл, файл должен существовать).

4) Close (файл); (для закрытия файла).

Для записи существуют процедуры:

1. Write(файл, arg 1 (при выводе каждому аргументу можно указать целую константу), arg 2,...); - эта процедура переводит в символьное представление.

2. Write ln (файл, arg 1,...); - для разбиения значений.

Для чтения:

1. Read (файл, arg 1,...); - после прочтения переходит на другую строку.

2. Read ln (файл, arg 1,...);

Целая константа – это спецификатор ширины.

4.14.1.2. Пример:

Var

Fi, fo: Text File;

S: string

begin

system. Assign (fi, ‘IN. TXT’);

system. Assign(fo, ‘OUT. TXT’);

system. Reset(fi);

system. Rewrite(fo);

while eof (fi) begin

system. Read ln(fi; s);

system. Write ln(fo;s);

system. Close(fi);

system. Close(fo);

eof (файл); boolean – возвращает false, если текущий указатель положения не перед концом файла, и возвращает true, если перед концом файла.

4.14.2.1. Свойства:

1) Name.

2) Title: string(заголовок окна).

3) File Name: string.

4) Initial Dir: string. (начальная директория, которая будет открыта в диалоговом окне).

5) Filters:

Name	Filter
Все файлы	*. *
Текстовые файлы	*. TXT

Filter Index: integer

Options:

Func …Execute: boolean;

Cancel

OKK

И

True False

Fo D – Name

If fo D. Execute then begin

System. Assign(fi, fo D. File Name);

…

end;

…

T List Box Items

T Combo Box

T Meme

Lb Res. Items

Save to file (имя файла)

Лекция №11.