Робота з файлами в delphi

Пойменована область пам'яті на зовнішньому носії (диску) називається файлом. У будь-якого файлу є ім'я. Інформація. яка зберігається в файлі, являє собою безліч елементів одного типу. Розмір файлу, як правило, обмежений лише розміром пристрої, на якому він зберігається, що дозволяє обробляти великі обсяги інформації.

Опис текстового файлу:

var ім'я_змінної: TextFile;

ім'я_змінної: file of тип;

У нетипізований файлах інформація зчитується і записується у вигляді блоків певного розміру, в них можуть зберігатися дані будь-якого виду і структури. Опис нетипізованого файлу:

var ім'я_змінної: file;

Для доступу до файлів використовують спеціальну файлову змінну.

c: file of integer;

Для зв'язку файлової змінної з файлом на диску примняются процедуру:

тут змінна - ім'я змінної будь-якого файлового типу, имя_файла - рядок символів, що містить повне ім'я файлу (якщо шлях до файлу не вказано, мається на увазі, що він знаходиться в поточному каталозі).

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

тільки типи виразів при записі і читанні повинні відповідати оголошеному типу файлу. Процедури Writeln і Readln до типізованим файлів не застосовують.

Для переміщення по типізований файл використовують процедуру:

Ця процедура дозволяє перейти до елементу з зазначеним номером, тобто здійснює прямий доступ до компонентів файлу. При прямому доступі компоненти файлу нумеруються від 0 до n-1, де n - число компонентів у файлі.

Так само для прямого доступу до компонентів типізованого файлу можна застосовувати функції:

filesize (змінна) - повертає число реальних компонентів у відкритому файлі, пов'язаному з файловой_переменной (для порожнього файлу функція поверне 0);

filepos (змінна) - повертає значення поточної позиції у відкритому файлі, пов'язаному з файлової змінної (якщо файл тільки що відкрився, то функція поверне нуль, після прочитання останнього компонента з файлу значення функції збігається зі значенням filesize, що вказує на досягнення кінця файлу).

Процедура Seek і функції filesize і filepos з текстовими файлами не працюють. Наступні підпрограми працюють як з типізований, так і з текстовими файлами:

перейменовує закритий файл, пов'язаний з файлової змінної, згідно з ім'ям зазначеним в рядку ім'я файлу;

Erase (змінна) - видаляє закритий файлу, пов'язаний з файлової змінної;

Eof (змінна) приймає значення істина (true), якщо досягнуто кінець файлу, пов'язаного з файловой_переменной, і брехня (false) в іншому випадку;

procedure TForm1.Button1Click (Sender: TObject);