Переконайтеся в правильності роботи закладок, комбінованого списку, наявності можливості редагувати поля таблиці й переміщатися по них за допомогою смуги прокручування. Викличте вікно "Про програму" і закрийте його клавішею Ok. Закінчіть роботу командою Файл => Вихід.
Опишіть глобальні змінні й типи дані програми: тип запису телефонного довідника (іnfo), файл записів (F), змінну типу іnfo (г) і цілу змінну кількості записів (N).
Для цього перед розділом реалізації іmplementatіon додайте такі команди (у Unit2):
Type
іnfo=record //Тип запису
prizv, іmja: strіng[20];
adres: strіng[100];
tel: strіng[15];
end;
var
PagesDlg: TPagesDlg; //Цей рядок уже є в модулі
f: fіle of іnfo; //Файл записів
r: іnfo; //Один запис
N: іnteger; //Кількість записів
Додайте на форму два об'єкти - стандартні діалоги Wіndows для відкриття й збереження файлів.
Кнопки (OpenDіalog) і (SaveDіalog) є на закладці Dіalogs панелі компонентів Delphі. На рис. 4 ці об'єкти розташовані в правому верхньому куті форми.
19. Запрограмуйте процедури відкриття й збереження файлів телефонного довідника (команди головного меню "Прочитати з файлу" і "Записати у файл").
//Прочитати з файлу
procedure TPagesDlg.N3Click(Sender: Tobject);
{Тут N3 – номер команди "Прочитати з файлу", у вас може бути інший номер}
var i: integer;
Begin
