Clicar sem usar mouse

procedure TForm1.TimerTimer(Sender: TObject);
var Pos:TPoint;
begin
GetCursorPos(Pos);
Label1.Caption := IntToStr(Pos.X) + ´ , ´ + IntToStr(Pos.y);
end;

Voce pode colocar assim

Pos.x := 100;
Pos.y := 100;
Aki vc coloca o quer q o mouse faça...

tem q descobrir em q ponto esta o q vc quer clicar...

Para obter os valores das coordenadas do mouse de qualquer parte da tela, basta que se utiliza a função da API do Windows GetCursorPos. Esta função é interessante pois oferece ao programador os valores (x,y) de qualquer ponto da tela e não somente da aplicação.

Para implementação, esta função pode ser utilizada da seguinte maneira:

procedure TForm1.Timer1Timer(Sender: TObject);
var
pt: TPoint;
begin
GetCursorPos(pt); // Pega a posição atual do mouse;
//Mostra os valores das coordenadas do mouse
label1.caption := IntToStr(pt.x) + ´,´ + IntToStr(pt.y);
end;

Esta é mais uma das milhares de funções da API do Windows.

Abraços,