Нажатие кнопок мыши

[zzzzz]

Можно ли программным образом имметировать нажатие кнопок мыши? Про клавиатуру я нашёл, а вот про мышь хотелось бы узнать!!!!!

[Kostia]

var
pPoint: TPoint;
hPointWnd: HWnd;
begin
pPoint.X := 15;
pPoint.Y := Screen.Height-20;
SetCursorPos(pPoint.X, pPoint.Y);
hPointWnd := WindowFromPoint(pPoint);
SendMessage(hPointWnd, WM_LBUTTONDOWN, MK_LBUTTON, MAKELONG(1, 1));
SendMessage(hPointWnd, WM_LBUTTONUP, 0, MAKELONG(0, 0));
end;

[zzzzz]

Спасибо!!!

[Stanislav]

Сообщение от Kostia

var
pPoint: TPoint;
hPointWnd: HWnd;
begin
pPoint.X := 15;
pPoint.Y := Screen.Height-20;
SetCursorPos(pPoint.X, pPoint.Y);
hPointWnd := WindowFromPoint(pPoint);
SendMessage(hPointWnd, WM_LBUTTONDOWN, MK_LBUTTON, MAKELONG(1, 1));
SendMessage(hPointWnd, WM_LBUTTONUP, 0, MAKELONG(0, 0));
end;

А если я хочу нажать на другую кнопку что для этого не обходимо знать координаты кнопки?

[Kostia]

Этот код я использовал для нажатия мышью в произвольной точки, т.е. вы должны либо заранее знать куда хотите нажать либо узнать координаты той кнопки по которой вы хотите нажать.

[Stanislav]

Сообщение от Kostia

Этот код я использовал для нажатия мышью в произвольной точки, т.е. вы должны либо заранее знать куда хотите нажать либо узнать координаты той кнопки по которой вы хотите нажать.

Спасибочки......

[zzzzz]

Что-то не получается таким образом работать на рабочем столе, каждый раз появляется рамка!!!! Подскажите как это иправить.

[sr_lexx]

Сообщение от zzzzz

Можно ли программным образом имметировать нажатие кнопок мыши? Про клавиатуру я нашёл, а вот про мышь хотелось бы узнать!!!!!

Скинь на почту sr_lexx@mail.ru исходник по клавиатуре!!!
т.е. эмитация нажатия клавиш на клавиатуре!!!

А вообще господа может кто нибудь подсказать:
Вообщем необходимо написать прогу которая будет считывать числа из файла и вставлять их в другую программу, т.е. необходимо сделать так что бы как будто человек сидит и сам забивает эти числа в прогу!!!
На данном этапе необходима программа по эмуляции (иммитации) нажатия клавиш в Delphi!
Помогите ПЛЗ кто чем может!