"justify">
Закриття файлу Закриття здійснюється за допомогою процедури CloseFile (<файлова змінна>).
Ця процедура закриває файл, але закриває зв'язок файлової змінної з ім'ям файлу. При створенні нового або розширенні старого файлу процедура CloseFile забезпечує збереження всіх нових записів у файлі і реєструє файл у каталозі. p align="justify"> При нормальному завершенні роботи програми всіх дій, що виконуються цією процедурою, проводяться автоматично для всіх відкритих файлів.
Процедури і функції для роботи з файлами:
Eof (<файлова змінна>); - повертає true якщо досягнуто кінець файлу;
Eoln (<файлова змінна>); - повертає true якщо досягнуто кінець рядка;
SeekEof (<файлова змінна>); - повертає true якщо до кінця файлу залишилися тільки символи роздільники ( , tab);
SeekEoln (<файлова змінна>); - повертає true якщо до кінця рядка залишилися тільки символи роздільники ( , tab);
AssignPRN (<файлова змінна>); - процедура присвоює дескриптор текстового файлу принтера;
Erase (<файлова змінна>); - процедура стирає файл (перед стиранням необхідно закрити файл);
Flush (<файлова змінна>); - процедура очищає внутрішній буфер файлу (при цьому всі зміни зберігаються на диску);
ReName (<файлова змінна>, <нове ім'я>), - процедура перейменовує файл ...
Процедури читання записів:
Read (<файлова змінна>, <список виведення>); - читає інформацію з файлу;
ReadLn (<файлова змінна>, <список виведення>); - читає інформацію з файлу;
Write (<файлова змінна>, <список введення>); - записує інформацію у файл;
WriteLn (<файлова змінна>, <список введення>); - записує інформацію у файл.
Г? Текстові файли.
Текстові файли зв'язуються з файловими змінними, що належать стандартному типом TextFile, використовуються для зберігання текстової інформації. У файлах такого типу так само можуть зберігатися цілі речові числа. Запис текстового файлу має змінну довжину, тому файли такого типу відносяться файлів послідовного доступу. При створенні текстового файлу, в кінці кожного рядка автоматично ставиться спеціальний символ, який називається EoLn, який складається з 2-х байтів. p align="justify"> У кінці файлу ставиться спеціальний символ Eof.
Текстові файли відкриваються за допомогою трьох процедур:
Reset - для читання;
RewRite - для запису;
Append - для додавання.
Читання здійснюється за допомогою процедури Read і ReadLn, запис - Write і WriteLn.
Приклад:
WriteLn (f, ABC ; 12; x , 0,5), [ABC12x5E-1]
При перекладі змінних типу String кількість зчитувальних процедурою і поміщених у рядки символів дорівнює максимальній довжині рядка, якщо раніше не зустрінеться ознака EoLn; ця ознака в рядок не поміщається. Якщо кількість символів у вхідному потоці даних більше максимальної довжини рядка, то зайві символи відкидаються. При введенні числових змінних процедура Read працює наступним чином: усі провідні знаки роздільники й ознаки кінця рядків пропускаються до появи першого значущого символу (і навпаки: будь-який з перелічених символів, а так само ознака кінця файлу вважається кінцем підрядка). Виділена таким чином підрядок розглядається як рядковий вираз числової змінної, потім вона конвертується у внутрішнє представлення числа і результат привласнюється змінній. br/>
Ansistr = 256 символів.
WriteStr = 4 Гб.
abc EoLn 209 EoLn 2 3 a5 2,5 Eof Var: TextFile;: string;: string [2];, b, c: integer ;: real, (f,
