99ea0f1a

Использование стандартных элементов управления 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. Закройте приложение.
  9. > Использование элемента управления 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. Сохраните и протестируйте внесенные изменения.


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

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

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

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


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