Свойство возвращает или устанавливает значение, которое определяет, какой режим, ручной или автоматический, будет использоваться при операции перетаскивания.
Синтаксис
object.DragMode [= number]
Части синтаксической последовательности для свойства DragMode приведены в таблице:
|
Часть
|
Описание
|
| object | Объектное выражение. |
| number |
Целое значение, которое определяет режим перетаскивания.
Допустимые значения приведены в таблице установок.
|
Установки
Возможные установки для параметра number:
|
Константа
|
Значение
|
Описание
|
| vbManual | 0 |
(Установка по умолчанию) Ручное перетаскивание. Требует
использования метода Drag для вызова операции перетаскивания исходного
элемента управления.
|
| vbAvtomatic | 1 | Автоматическое перетаскивание. Щелчок элемента управления автоматически вызывает операцию перетаскивания. |
Примечания
Когда значение свойства DragMode равно 1 (автоматическое перетаскивание),
элемент управления обычно не реагирует на события мыши. Для определения начала
и завершения операции перетаскивания следует использовать значение 0 (ручное
перетаскивание). Этот режим можно использовать для вызова операции перетаскивания
в ответ на нажатие клавиш на клавиатуре или на выбор команды меню, а также для
разрешения исходному элементу управления получать событие MouseDown до
начала выполнения операции перетаскивания.
Когда указатель мыши находится на объекте или форме назначения во время операции перетаскивания, щелчок мыши вызывает событие DragDrop объекта назначения. Это завершает операцию перетаскивания. Кроме того, операция перетаскивания может вызывать событие DragOver.
Замечание Во время перетаскивания элемент управления не может получать другие события мыши и клавиатуры, вызываемые пользователем (KeyDown, KeyPress, KeyUp, MouseDown, MouseMove и MouseUp). Тем не менее, элемент управления может получать события, вызываемые программой или обменом DDE.