Архитектура Microsoft Windows для разработчиков

         

Реализация функции OLE Drag-and-Drop


В этом упражнении Вы средствами Visual Basic создадите приложение, которое поддерживает механизм перетаскивания объектов.

> Добавление средств поддержки перетаскивания

  1. Запустите Visual Basic и создайте новый проект типа Standard EXE.
  2. Поместите на форму два элемента управления-рисунка.
  3. Назначьте свойствам OLEDragMode и OLEDropMode обоих элементов управления значение Automatic.
  4. Добавьте растровое изображение в элемент управления Picture1.
  5. Запустите приложение и перетащите изображение из Picturel в Picture2.
  6. > Поддержка перетаскивания объектов из одного приложения в другое

    1. Остановите приложение и добавьте в форму текстовое поле.
    2. Присвойте свойству Multiline поля Text1 значение True.
    3. Очистите текстовое поле.
    4. Присвойте свойствам OLEDragMode и OLEDropMode текстового поля значе ние Automatic.
    5. Запустите приложение.
    6. Запустите Microsoft Word и создайте новый документ.
    7. Расположите окна так, чтобы Вы могли видеть их оба.
    8. Наберите в документе Word строку Привет!.
    9. Выделите текст и перетащите его в текстовое поле формы Visual Basic.
    10. Перетащите изображение из элемента управления Picturel в документ Word.
    11. Остановите приложение Visual Basic.
    12. Закройте Word и Visual Basic.


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