Учебное пособие: Обєктно-орієнтоване програмування МП Delphi

Мета: освоїти розробку додатків з використанням меню.

Хід роботи:

I .Створення головного меню.

1. Відкрити новий додаток (проект).

2. АктивізуватиFORMу , змінити значення властивості Caption на МMenu ,а Name - на Mform.

3. Зберегти проект { File - Save Project As - з'явиться діалогове вікноSave Unit 1 As - створюємо

нову папку , вибравши осмислену назву проекту (наприклад ЛР_6_7).Розкриваємо створену папку

у поле Ім'я файлу - дати ім'я програмного модуля- Зберегти . Відкриється діалогове вікно

Save Project As . (зберегти проект). У поле Ім'я файлу - і м'я файлу проекту(LR 6-7).

Розширення файлу модуля -.pas, файл проекту -.dpr}

4. На формі в лівому верхньому куткурозмістити компонент TMainMenu з Standard (це не візуальний

компонент, тобто його піктограма не відповідає явному виду, а миша показує його наявність.

Настроювання його ведеться за допомогою спеціального редактора Menu Designer , що викликається

Подвійним клацанням на об'єкті MainMenu1).

5. Створити пункт головного меню F ile { в Menu Designer змінити властивість Caption на & F ile і ,таким

чином визначили клавішу швидкого виклику (Мнемонічного доступу), тобто <ALT>+<F>} .

6. Внести підпункти меню S ave і e Х it { змінюючи Caption на & Save та e & xit } .

7. Вибрати клавішні еквіваленту F 2 і F 3 { властивість ShortCu t - вибрати відповідні F? чи

набрати їх у віконці } .

8. Анологічно створити пункт гол. меню H elp (праворуч від File) і його підпункти ? I nfo ( F 1)

таE xit .

9. Вставити між ? таExit розділову лінію { у властивості Caption у першій позиції набрати “дефіс– “}.

10 .Відзначити пункт Save символом √ .

11 .Розробити код обробки подій, що виникають при виборі пунктів меню, наприклад – Exit.

У редакторі меню подвійним клацанняммиші на пункті Exit визиваємо редактор коду

Procedure TMForm.Exit1Click(Sender:Tobject);

Begin

If CloseQuery then Close; {чи Close}

End ;