Уроки по Delphi



         

Пример MDI-приложения. - часть 2


6.   Выбираем мышкой форму MainForm. В Object Inspector в свойстве WindowMenu устанавливаем их ниспадающего списка пункт меню WindowMenu. Теперь во время работы приложения все дочерние окна будут списком отображаться в меню "Окна".

7.   Поскольку дочерних окон в этом приложении будет много и по внешнему виду они будут подобные, то нет смысла проектировать каждое окно отдельно. Спроектируем одно. Для помещения в проект новой формы выбираем из меню "File" пункт "New Form".

8.   Устанавливаем размеры окна Form2 меньшими главного родительского окна.

9.   Переименовываем свойство Name для этого окна из Form2 в ChildForm.

10.                    Устанавливаем свойство дочернего окна для MDI-приложения FormStyle в fsMDIChild.

11.                    Выбираем из палитры компонентов Memo

3.gif (357 bytes)
и устанавливаем его в дочернюю форму ChildForm.

12.                    Меняем свойство Align для этого компонента на alClient. Он немедленно расширяется на все доступное пространство окна.

13.                    Далее будем писать событие выбора пункта меню "Новый". При нажатии на него должно появляться дочернее окно. Поступаем следующим образом. Поскольку дочерних окон будет множество, то мы программа должна их автоматически при необходимости создавать. По умолчанию Delphi устанавливает автоматическое создание окна во время запуска приложения. Это избавляет программиста от написания некоторых команд. В данном случае мы все сделаем сами. Выбираем из меню "Project" пункт "Options…". На вкладке Forms снимаем установку "Auto-create forms" для окна ChildForm. Для этого выбираем его и перегоняем одинарной стрелкой в сторону "Available forms". Нажимаем кнопку OK.




Содержание  Назад  Вперед