| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Нажать кнопку мыши в окне чужого приложения [D7, Win2k]
alex732 © (2004-01-31 16:15:00)Добрый день... Возникла насущная проблема проэмулировать нажатие левой кнопки мыши в окне чужого приложения...
Пишу:
procedure TForm1.Timer1Timer(Sender: TObject);
var
Wnd: THandle;
begin
Wnd := findWindow(0,'C:\FriendProg.exe');
if Wnd = 0 then
MessageBox(Application.handle,'Окно не найдено','Ошибка',MB_OK)
else
begin
PostMessage(Wnd, WM_RButtonDown,1,1);
PostMessage(Wnd, WM_RButtonUP,1,1);
end;
end;
Подразумеваю, что мышь нажимается где-то не там, т.е. не правильно передаются координаты.... но как их передать праильно не знаю.... Или в чем то другом моя ошибка?... Подскажите!!!
alex732 (2004-02-02 10:05:00) [1]Помогите нажать кнопку мыши!!! :-)
alex732 (2004-01-31 16:43:00) [2]Ай... Ошибся... Это я эксперементировал, думал, мож правая кнопка нажмется :-)) и в тексте потом не изменил... Читать WM_RButtonDown
WM_RButtonUP
Извиняюсь :-)
| |
