Створення MDI - додатки

Для створення MDI - додатки необхідно мати як мінімум дві форми - батьківську (контейнер) і дочірню (внутрішню). Щоб працювати з дочірніми формами різних типів, необхідно включити в проект додаткові форми. Проте для простого MDI - проекту однієї форми цілком достатньо. Проект створюється так:

1. Створіть новий проект командою File > - New Project. Якщо у вас включений Project Wizard, виберіть тип проекту Standard EXE.

2. У створеному проекті спочатку є присутній одна форма. Задайте її властивості Name значення frmChild, а властивості Caption - Дочірня форма MDI.

3. Щоб створити батьківську форму MDI, клацніть правою кнопкою миші на теці Forms у вікні проекту і виконаєте команду Add > MDI Form. Коли на екрані з'явиться вікно Form Wizard, виберіть в нім MDI Form.

4. Задайте властивості Name значення frmMDI, а властивості Caption - значення Батьківська форма MDI

5. Клацніть правою кнопкою миші на рядку Project1 у вікні проекту і виберіть з контекстного меню команду Project1 Properties. Виберіть із списку Startup Object рядок frmMDI. Якщо не зробити цього, на початку роботи вашого застосування відображуватиметься дочірня форма.

6. Виберіть у вікні проекту рядок frmChild. Задайте властивості MDI Child значення True - тепер дочірня форма знаходитиметься усередині батьківської.

7. Виберіть у вікні проекту рядок frmMDI.

8. Запустіть редактор меню командою Tools > Menu Editor. З'являється вікно, зображене на мал. 2.8.

У своєму прикладі ми обмежимося дуже простим меню. Не турбуйтеся про технічні подробиці роботи з редактором меню - вони будуть розглянуті в уроці 5, «Створення і використання меню і панелей інструментів».

1. Введіть & File в поле Caption.

2. Введіть mnuFile в поле Name.

3. Натисніть кнопку Next.

4. Натисніть кнопку із стрілкою управо - у команди меню з'являється відступ.

5. Введіть & New Form в поле Name.

6. Введіть mnuFileNew в поле Name.

7. Закрийте редактор меню кнопкою ОК.

8. У формі frmMDI повинне з'явитися меню File. Виконаєте команду File > New, і на екрані з'явиться вікно програми.

9. Вставте в процедуру події mnuFileNew_Click() наступний фрагмент:

Dim frm As New frmChild

frm.Show

10. Збережете і Запустіть проект. На малюнку показаний зразковий вид вікна MDI - додатки.

Доданий нами фрагмент створює нову копію форми frmChild і відображує її. Це відбувається при кожному виконанні команди File > New. Спробуйте відкрити і закрити декілька дочірніх вікон; як бачите, ми побудували цілком робоче MDI - додатки.