24. Запрограмуйте кнопку переходу на попередній запис «Попередній».

procedure TpagesDlg.Button1Click(Sender: Tobject);

begin

if ComboBox1.ItemIndex = 0 then {Зациклюємо список}

ComboBox1.ItemIndex := N-1

Else { У середині списку показник зменшується на одиницю}

ComboBox1.ItemIndex := ComboBox1.ItemIndex - 1;

NewEdit(ComboBox1); { Оновлюємо панель «Знайдений запис»}

end;

25. Аналогічно запрограмуйте кнопку «Наступний».

Програмний код створеної процедури запишіть в звіт.

26. Збережіть програму і переконайтеся в правильності її роботи.

27. Запустіть програму, прочитайте з диска файл телефонного довідника, виберіть будь-яке прізвище в комбінованому списку і поміняйте його в полі редагування «Прізвище». Переконайтеся в тому, що синхронні зміни відбуваються і в комбінованому списку. Збережіть зміни і використовуйте кнопки «Попередній» і «Наступний» для навігації по записах, переконайтеся в зацикленні списку. Відредагуйте дані в таблиці, збережіть довідник у файлі на диску, прогляньте вікно «Про програму», закінчите роботу з програмою.

28. Створіть ехе-файл програми.

29. Закрийте Delphi, запустіть створену програму .

30. Продемонструйте створену форму викладачеві.

31. Виконайте додаткові завдання .

№ п/п	Завдання
	Запрограмуйте кнопку «Видалити» так, щоб після натиснення на ній видалялися дані з панелі «Знайдений запис» і з комбінованого списку
	Запрограмуйте кнопку «Знайти» так, щоб на панелі «Знайдений запис» відображалася інформація про особу, прізвище якої вказане в полі редагування Edit5 «Введіть прізвище». Якщо такого прізвища немає, то виведіть повідомлення про це в окремому вікні.
	Запрограмуйте команди підміню «А—>Я>> і «Я—>А» пункту головного меню «Сортувати» так, щоб прізвища в таблиці і комбінованому списку були відсортовані в алфавітному або зворотному порядку.
	Видаліть команду «Зберегти зміни в списку записів» з головного меню і забезпечте збереження змін у момент редагування таблиці і полів на панелі «Знайдений запис».
	У разі спроби відкрити неіснуючий файл телефонного довідника забезпечте появу вікна з відповідним повідомленням.
	У момент виходу з програми забезпечте появу вікна для збереження файлу телефонного довідника у випадку, якщо в нім були зроблені зміни

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

7