Использование стандартных элементов управления Microsoft Windows

В этом упражнении Вы встроите различные компоненты Microsoft Windows Common Controls в приложение на Visual Basic. Средствами элемента управления Animation отобразится содержимое выбранного пользователем AVI-файла, а панель инструментов станет альтернативой кнопке формы.

> Использование элемента управления Animation

1. Создайте в Visual Basic новый проект типа Standard EXE.
2. Добавьте в проект библиотеки Microsoft Windows Common Controls 5.0, Microsoft Windows Common Controls-2 5.0 и Microsoft Common Dialog Control 5.0.
3. Поместите на пустую форму элементы управления Animation и Common Dialog, а также кнопку.

   Сделайте элемент управления Animation достаточно большим для того, чтобы в нем мог нормально отображаться AVI-файл.

4. Присвойте кнопке имя cmdPlay и название Play.
5. Добавьте следующий код в событие для нажатия кнопки cmdPlay:

   With CommonDialog1

   .Filter = "avi (*.avi)¦*.avi"

   .ShowOpen

   End With

   With Animation1

   .AutoPlay = True

   .Open CommonDialog1.filename

   
   
   
   

   End With

6. Сохраните проект в каталоге WA\Practice\Chl2 и запустите приложение.
7. Нажмите кнопку Play и выберите в каталоге c:\Program Files\DevStudio\Vb\ Graphics\AVIs файл filedel.avi.
8. Закройте приложение.

> Использование элемента управления Toolbar

1. Поместите на форму frmMain элементы управления Toolbar и ImageList.

   Панель инструментов следует расположить в верхней части формы. Если понадобится, переместите уже имеющиеся на форме элементы управления.

2. Щелкните правой кнопкой ImageList и выберите пункт Properties.
3. Установите размер изображения 16 Х 16.
4. Выберите вкладку Images.
5. Щелкните Insert Picture и выберите файл open.bmp из каталога c:\Program Files\DevS4udio\Vb\Graphics\Bitmaps\Outline.
6. Нажмите ОК, чтобы закрыть панель свойств ImageList.
7. Щелкните правой кнопкой Toolbar и выберите пункт Properties.
8. В области ImageList укажите ImageList 1.
9. Откройте вкладку Buttons и щелкните Insert Button.
10. Присвойте свойству Image значение 1.
11. Нажмите ОК, чтобы закрыть панель свойств Toolbar.


12. Дважды щелкните Toolbar и добавьте следующий код:
    
    If Button.Index = 1 Then
    
    Play_Click
    
    End If
    
    
13. Сохраните и протестируйте внесенные изменения.


Стандартные диалоговые окна Windows

Диалоговые окна Windows 95 и Windows NT для стандартных операций открытия, сохранения и печати файлов предоставляют дополнительные функциональные возможности и обеспечивают более тесную интеграцию приложения с операционной системой. В силу этих причин следует, по возможности, пользоваться именно этими диалоговыми окнами.

Примечание Более подробную информацию Вы найдете в статье Using the Common Dialogs Under Windows 95 библиотеки разработчика Microsoft Development Library.

В состав библиотеки Microsoft Common Dialog Control 5.0 для Visual Basic входят несколько стандартных диалоговых окон.


Содержание раздела






---