Программирование для карманных компьютеров

2. В группе Project Types можно выбрать тип создаваемого проекта. Для Pocket PC можно создать проекты только двух типов – Visual Basic и Visual C#. Группа Templates содержит набор шаблонов, на основе которых создается проект выбранного типа. И для проектов типа Visual Basic, и для проектов тип Visual C# приложения для Pocket PC создаются на основе шаблона Smart Device Application. В поле Name указывается имя создаваемого проекта. Путь к каталогу, в котором будет размещаться проект, указывается в поле Location.

3. В окне Project Types нужно указать тип проекта Visual Basic, а затем выбрать в окне Templates шаблон Smart Device Application. Проект должен получить имя Simple, а путь можно выбрать любой. После нажатия кнопки OK, на экран будет выведено окно мастера, позволяющего более точно указать настройки будущего проекта (рис. 6.3).

Рис. 6.3. Окно мастера создания проекта Smart Device Application.

4. В верхней части окна нужно выбрать значение Pocket PC, а в нижней части окна – Windows Application. После нажатия кнопки OK в среде разработки будет открыт готовый шаблон проекта для создания приложения Pocket PC. Этот проект представляет из себя одну форму, с размещенным на ней пустым шаблоном главного меню (рис. 6.4).

Рис. 6.4. Шаблон проекта Windows Application.

5. Щелкнуть на компоненте MainMenu1 на панели невидимых компонентов в нижней части окна проекта. В окне редактирования формы проявится линейка главного меню, как это показано на рис. 6.5. Нужно щелкнуть на первом пункте меню и ввести слово Меню.

Рис. 6.5. Редактирование пунктов главного меню.

6. После этого, щелкая на области с надписью Type Here выше этого пункта, нужно последовательно ввести названия команд Акварель, Масло, Гуашь (рис. 6.6).

Рис. 6.6. Редактирование команд главного меню.

7. Двойным щелчком на пункте меню Акварель следует открыть окно кода с шаблоном обработчика события и ввести код, приведенный в листинге 6.1. Листинг 6.1

Private Sub MenuItem2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs)

Handles MenuItem2.Click

MsgBox(«Акварель», MsgBoxStyle.Information, «Акварель»)

End Sub