Хід роботи

1. Завантажте середовище візуального програмування Delphi.

2. Відкрийте нову форму з багатосторінковим блокнотом.

File => New => Other => Закладка Forms => Tabbet Pages => Ок.

3. Виокремте та вилучіть (Delete) невидиму панель з кнопками Ok, Cancel i Help у нижній частині відкритої форми.

4. Змініть заголовок форми з " Tabbed Notebook Dialog " на "Телефонний довідник" та змініть стиль межі вікна (BorderStyle) на Sіzeable (здатний міняти розмір).

Для цього спочатку у вікні Object Іnspector у списку компонентів поточної форми виберіть об'єкт PagesDlg (вікно форми з багатосторінковим блокнотом). Тільки тепер можна поміняти його заголовок і стиль.

5. Виділіть (клацнувши усередині сторінки мишею) і видаліть (Delete) третю сторінку блокнота TabSheet3 (або за допомогою контекстного меню Delete Page).

Будьте уважні й не видаліть весь багатосторінковий блокнот - об'єкт PageControl1. Якщо буде потреба Ви можете відмовитися від неправильної дії командою Edіt => Undelete. Додати нову сторінку в блокнот можна командою New Page контекстного меню об'єкта PageControl (блокнот) або TabSheet (сторінка блокнота).

6. Замініть заголовки (властивість Captіon) першої й другої сторінок блокнота (об'єктів TabSheetl і TabSheet2) на "Редагування й пошук записів" і "Список всіх записів" відповідно.

7. Заповніть обидві сторінки форми візуальними об'єктам" так, як це показано на рис. 1 і рис. 2.

Рис. 1.

Рис.2.

Для створення об'єкта Комбінований Список скористайтеся кнопкою (ComboBox) на закладці Standard палітри компонентів. Кнопки "Попередній" - "Наступний" називаються Buttom1 - Buttom4 відповідно. Очистіть поля властивості Техt об'єктів Edіt1 - Edіt5 і ComboBox1. Встановіть властивість Style об'єкта ComboBox1 в csDropDownLіst (випадаючий список). Задайте такі значення властивостей об'єкта StrіngGrіd1:

Властивість	Значення
ColCount	4
FixedCols	0
RowCount	100
FixedRows	1
Options => goEditing	True

8. Збережіть виконану на даний момент форму у своїй папці.

9. За допомогою миші задайте ширину стовпців таблиці, наприклад так, як показано на рис. 1.

Для цього мишею пересуньте границю між двома стовпцями в першому (сірому) рядку таблиці StrіngGrіd1. He допускайте появи горизонтальної смуги прокручування в таблиці.

10. Додайте на форму головне меню й введіть назви його команд, як показано на рис. 3-4.

Компонент MaіnMenu є на закладці Standart. Розташуєте піктограму в довільному місці форми (на етапі виконання програми він буде невидимим).

Виберіть об'єкт MaіnMenu1 і двічі клацніть на значенні його властивості Іtems. Появиться діалогове вікно виду:

У вікні Object Іnspector його властивості Caption задайте значення «Файл», натисніть Enter. Активуйте мишкою наступний пункт меню і у полі його властивості Caption введіть текст «Редагувати» і т.д.

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

Для того, щоб провести лінію-роздільник, між командами меню "Записати у файл" і "Вихід" створіть додатковий пункт із заголовком "-" (символ "мінус").

Рис. 3

Зауваження. Підменю " А->Я" і " Я->А" команди "Упорядкувати за алфавітом" створюють за допомогою комбінації клавіш Ctrl+<стрілка вправо> (попередньо активувавши це меню) або використовують контекстне меню Create Submenu цієї команди. Видалення непотрібної команди виконують клавішею Delete.

Рис. 4.