End Sub. FrmMDIParent . Arrange vbCascade

FrmMDIParent. Arrange vbCascade

MDI - формы

Модальность формы.

End Sub

Form1. Show

End Sub

Form2. Show

End Sub

Private Sub Form2_QueryUnload (Cancel as Integer, UnloadMode as Integer)

End Sub

End

Unload Me

Cancel = True

Private Sub cmdForm1Shift_Click ()

Form2. Left = Form2.Left-75

Private Sub cmdForm2Act_Click ()

В некоторых программах пользователь не должен перейти к другому окну, пока текущее окно не будет скрыто или выгружено. Такие формы называются модальными. Как только модальная форма появляется на экране, пользователь теряет возможность установить фокус на другое окно. В частности, на события клавиш или мыши другие окна не реагируют. Обычно на такой форме есть командная кнопка по умолчанию (OK или Cancel).

Чтобы сделать форму модальной, достаточно записать:

Form1. Show 1, где 1 - параметр.

Диалоговая панель - обычно модальная форма с двойной фиксированной рамкой.

Многодокументный интерфейс - оконная среда, в которой одно окно - MDI - контейнер (родительская форма MDI) создает множество других окон (дочерних). Родительская MDI форма позволяет пользователю работать с несколькими отдельными окнами в одном приложении. Можно иметь только одну родительскую форму MDI, и она будет начальной. Многие приложения Windows (Winword, Excel) используют технологию MDI.

Чтобы создать родительскую форму MDI, нужно выбрать Project | Add MDIForm. Затем создаются, как обычные, дочерние формы, если свойство MDIChild = TRUE.

После запуска проекта все дочерние формы далее будут показаны (с помощью метода Show) и изображены внутри родительской формы. Кроме того, если дочерняя форма свернута в значок, ее значок будет находиться внутри родительской формы. Нельзя ни скрывать, не запрещать дочерние формы.

Если дочернее окно имеет свое меню, то при переводе фокуса на это окно изменяется меню родительской формы. Каждое приложение, использующее MDI, должно иметь меню Window, позволяющее выводить дочерние окна методами Arrange и Cascade, как это делает сама Windows. Меню Window должно создать список дочерних окон MDI.

Список дочерних окон можно поместить в меню так: установить флажок WindowList в окне Tools | Menu Editor, после этого Visual Basic будет автоматически выводить на экран список дочерних форм MDI, а также поставит метку, указывающую последнее использовавшееся дочернее окно.

Для активизации пунктов Tile (черепица), Cascade (каскад), Arrange (расположить значки) в меню Window можно использовать следующий фрагмент кода:

Sub mnuCascadeForms_Click ()

Здесь используется константа vbCascade совместно с методом Arrange. Другие аналогичные константы: vbTileHorizontal, vbArrangeIcons.

Дата добавления: 2014-12-10