Имитация клика мыши

[CRASH009]

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

 

[morpheus]

Можно просто нажимать на кнопку в чужом приложении

 

[CRASH009]

Да, спасибо. Но мне нужно было немного другое:

procedure TForm1.Timer1Timer(Sender: TObject);
var
p: TPoint;
begin
GetCursorPos(p);
form1.Caption := '(' + IntToStr(p.X) + ',' + IntToStr(p.Y) + ')';
end;

Вот Спасибо за участие.