Форум: "Основная";
Текущий архив: 2002.06.27;
Скачать: [xml.tar.bz2];
Вниз
Как можно Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.005 c
