Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лаб 10.doc
Скачиваний:
3
Добавлен:
29.08.2019
Размер:
146.94 Кб
Скачать

Порядок виконання операцій при роботі з файлами

Можливість використання методів доступу до кожного різновиду файла за наступною схемою:

Для роботи з фізичним файлом, що знаходиться на якомусь носії, необхідно спочатку зв’язати його із файловою змінною (логічним файлом), з допомогою якої буде здійснено доступ до цього фізичного файла. Зв’язування фізичного і логічного файлів виконується за допомогою процедури Assign(f,’MyFile.Dat’), яка може використовуватися тільки для закритого файла.

Першим параметром є файлова змінна, а другим - рядкова константа або ідентифікатор рядкової змінної, значенням якої має бути ім’я фізичного файла, наприклад:

Name:=’a:\Papka\MyFile.Dat’;

Assign(f,Name);

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

Відкриття файлів виконується процедурами Reset(f) та Rewrite(f), а закриття – процедурою Close(f).

Процедура Reset відкриває існуючий фізичний файл, який має бути пов’язаний із файловою змінною f. Якщо f – текстовий файл, то він буде відкритий тільки для читання при послідовному доступі до елементів, якщо f - типований файл, то він буде відкритий і для читання і для запису при послідовному доступі і при прямому. При відкритті файлу вказівник поточної позиції встановлюється на його початок.

Якщо виконується спроба читання із неіснуючого файла, то виникає помилка , яка може бути повідомлена програмі ненульовим значенням вбудованої функції IORESULT.

Наприклад, наступний фрагмент програми дозволяє встановити, чи існує потрібний файл на диску.

Var f: of char;

Begin

Assign(f,’myfile.dat’);

{SI-} {Відключає контроль помилок введення-виведення}

Reset(f);

{$I+} { Включає контроль помилок введення-виведення }

If ioresult<>0 then

…….. {Файл не існує}

else

……. { Файл існує}

end.

В цьому фрагменті з допомогою директиви компілятора {$I-} відключається автоматичний контроль введення-виведення. Якщо цього не виконати, то відсутність файла призведе до аварійного завершення програми.

Процедура Rewrite створює новий фізичний файл, ім’я якого зв’язано із файловою змінною f. При відкритті файлу вказівник поточної позиції встановлюється на його початок.

Функція Eof(f) повертає значення True, якщо вказівник поточної позиції у файлі знаходиться за останнім елементом файла, або, якщо файл пустий. У іншому випадку вона повертає значення False.

Процедури роботи з каталогами

Для роботи з каталогами використовуються такі процедури :

ChDir (<шлях>)- зміна поточного каталогу. <Шлях> - рядковий вираз, що містить шлях до каталогу, який встановлюється за замовченням.

MkDir (<каталог>) – створення нового каталогу на вказаному диску. <Каталог>-вираз типу STRING, що задає шлях до каталогу.

RmDir (<каталог>) – знищує каталог, який має бути пустим.

GetDir (<пристрій>,<каталог>) – визначає ім’я поточного каталогу. <Пристрій>-вираз типу WORD, що містить номер пристрою: 0-пристрій за замовченням, 1-диск А, 2-диск В, тощо. <Каталог> - змінна типу STRING, в яку повертається шлях до поточного каталогу на вказаному диску.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]