Что нового

[Мышь, клавиатура] Перетаскивание мышкой drag&drop

Leanna

Новичок
Сообщения
25
Репутация
3
Подскажите пожалуйста, как можно сделать drag&drop перетаскивание мышкой т.е взял на координате х1 у1 - отпустил на кординате x2 y2?
 

Viktor1703

AutoIT Гуру
Сообщения
1,535
Репутация
413
Код:
#Include <GUIConstantsEx.au3>
#Include <WindowsConstants.au3>

$hForm = GUICreate('',  200, 200, -1, -1, -1, $WS_EX_ACCEPTFILES)
$iInputDrag = GUICtrlCreateLabel('', 0, 0, 200, 200)
GUICtrlSetState(-1, 136)
GUISetState ()

While 1
   Switch GUIGetMsg()
	  Case $GUI_EVENT_DROPPED
		 MsgBox(0, '', @GUI_DRAGFILE)
      Case $GUI_EVENT_CLOSE
		 Exit
   EndSwitch
WEnd


Опишите конкретней свою задачу, откуда и что нужно перенести с помощью Drag&Drop.
 
Автор
Leanna

Leanna

Новичок
Сообщения
25
Репутация
3
Есть координата экрана x1 y1 определяемая по PixelSearch. Надо что бы мышка выполнила "схватить" на x1 y1 и сделала "отпустить" на координатах x2 y2. Наверное это не drag&drop называется....
 

Viktor1703

AutoIT Гуру
Сообщения
1,535
Репутация
413
Код:
MouseDown('left') ;~ Схватить
MouseUp('left') ;~ Отпустить
 

AZJIO

Меценат
Меценат
Сообщения
2,903
Репутация
1,200
Leanna
Смотри MouseClickDrag
 
Автор
Leanna

Leanna

Новичок
Сообщения
25
Репутация
3
Спасибо большое! Всё получилось :smile:
 
Верх