Почему не выходит?

← →
progger © (2002-09-24 20:26) [0]

Добрый вечер. ув. знатоки, посмотрите пожалуйста: я использую седующий код для нажатия курсором мыши на гипперссылку в Microsoft Internet Explorer, но в результате мышь не хочет кликать на ссылку...
p.X:=250; // координаты гипперссылки
p.Y:=433;
SetCursorPos(p.x, p.y);
Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_MOVE,
p.x, p.y, 0, 0);
Application.ProcessMessages;
sleep(100);
Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTDOWN,
p.x, p.y, 0, 0);
Application.ProcessMessages;
sleep(300);
Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_LEFTUP,
p.x, p.y, 0, 0);

Подскажите в чем дело?

← →
Song © (2002-09-24 20:39) [1]

Mouse_Event(MOUSEEVENTF_ABSOLUTE or MOUSEEVENTF_MOVE,
p.x, p.y, 0, 0); - не надо вообще,

MOUSEEVENTF_ABSOLUTE - уберите из всех оставшихся строк.

Почему не выходит? Найти похожие ветки