Цитата Creat0R:
всё ровно юзер может двигать мышку до клика, и помешать этому »
|
Теперь вижу, спасибо.
Тогда так:
Код:
Func _MouseClick($iX, $iY)
Local $aMouse, $i
Do
$i += 1 ; счетчик попыток
MouseMove($iX, $iY, 1)
$fMouseMoveBlocked = True ; Блокируем перемещение
$aMouse = MouseGetPos() ; Определяем координаты
If @error Then
$fMouseMoveBlocked = False
Return
EndIf
If $aMouse[0] = $iX And $aMouse[1] = $iY Then
Sleep(10) ; Время нахождения курсора над элементом перед щелчком.
MouseClick("left", $iX, $iY, 1, 1)
Sleep(10) ; ждем
MouseUp("left") ; форсируем отжатие
$fMouseMoveBlocked = False ; Разблокировка
ExitLoop
EndIf
$fMouseMoveBlocked = False
Until $i > 5
EndFunc
P.S. Юзер все ещё сможет случайно помешать, для большей надежности можно просто увеличить число попыток.