Текущий архив: 2002.06.27;
Скачать: CL | DM;

Вниз

Как можно   Найти похожие ветки 

← →
Transnet.   (2002-06-13 04:51) [0]

Очень надо!!!!
мне надо как бы сэмулировать клик мышкой
HELP!!! PLIZ!!!!!!!!!!

---

← →
Song ©   (2002-06-13 08:15) [1]

Mouse_event()

---

← →
Sava ©   (2002-06-13 08:53) [2]

Если надо эмулировать клик мышкой в своей программе, то можно сделать следующим способом:

...
private
procedure wmmousemove(var message: TMessage);
message wm_mousemove;
...
implementation
...
procedure Tform1.wmmousemove(var message: TMessage);
begin
case message.WParam of
mk_control: form1.button1.perform(BM_click,0,0);
// клик по кнопке при нажатие CTRL
mk_shift: form1.button2.perform(BM_click,0,0);
// клик по кнопке при нажатие SHIFT
end;
end;
...

Если в чужой то необходимо использовать PostMessage или SendMessage.

---

← →
VID ©   (2002-06-14 00:28) [3]

А если так:
Мне не известно окно, над которым находится указатель мышки, я просто хочу эмулировать левый клик (так если бы, я с закрытыми глазами, просто взял и кликнул бы). Что надо делать в таком случае ?

---

← →
Song ©   (2002-06-14 08:42) [4]

WM_LBUTTONDOWN

---

Страницы: 1 вся ветка

Текущий архив: 2002.06.27;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.018 c