Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как симулировать нажатие правой кнопки мыши с помощью WM_RBUTTOND [D6, D7, WinXP]


Dzuk ©   (2003-05-06 21:21:00) 

Как симулировать нажатие правой кнопки мыши с помощью отправки сообщения WM_RBUTTONDOWN и WM_RBUTTONUP????


Morfein   (2003-05-12 02:52:00) [1]

Эээ... видишь ли, я не говорил, что щелчок делается на позиции курсора! Я подумал, что нужен код для имитации щелчка по кнопке... ну да ладно...:

procedure PushRButtonEx(Handle, x, y : dword);
begin
SendMessage(Handle, WM_RBUTTONDOWN, 0, MAKELONG(x, y));
SendMessage(Handle, WM_RBUTTONUP, 0, MAKELONG(x, y));
end;

Чё за параметры X и Y понятно?


Dzuk   (2003-05-11 21:32:00) [2]

как будто он щелкает правой кнопкой в вверхнем левом углу и неотпуская передвигает курсор где он щас находится.....


Dzuk   (2003-05-06 22:40:00) [3]

как то неправильно работает. попробуй так не десктопе щелкнуть(меню должно появится там где сейчас курсор: WindowFromPoint(myPoints)). что вышло?


nikkie   (2003-05-06 22:02:00) [4]

а ты не поленись руками набрать :)


Dzuk   (2003-05-06 21:49:00) [5]

не работает.
[Error] prog.pas(47): Illegal character in input file: " " ($A0)
и выделяет "SendMessage(Handle, WM_RBUTTONDOWN, 0, MAKELONG(2, 2));" красным цветом

?????????


Morfein   (2003-05-06 21:40:00) [6]

Ты сам и ответил :)


procedure PushButton(Handle : dword);
begin
SendMessage(Handle, WM_RBUTTONDOWN, 0, MAKELONG(2, 2));
SendMessage(Handle, WM_RBUTTONUP, 0, MAKELONG(2, 2));
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо