эмуляция щелчка мыши

← →
Azeem © (2006-02-18 15:45) [0]

Здравствуйте, мастера ! Подскажите как виртуально кликнуть мышью по компоненту чужого приложения (известны дескриптор окна и координаты компонента) ?

← →
HF-Trade © (2006-02-18 16:08) [1]

Var
MousePoint: TPoint;
Coord:Integer;
App:HWnd;
Begin
App:=FindWindow("Искомое окно",nil); //Ищем окно
GetCursorPos(MousePoint); //Получаем координаты курсора
Windows.ScreenToClient(UO,MousePoint); //Координаты курсора относительно окна
Coord:=MakeLong(MousePoint.X,MousePoint.Y);

PostMessage(UO,WM_LBUTTONDOWN,0,Coord); //Нажмаем левую кнопку мыши
PostMessage(UO,WM_LBUTTONUP,0,Coord); //Отпускаем

эмуляция щелчка мыши Найти похожие ветки