Delphi - Como hago pa q el raton haga un click???

Como puedo hacer para q se haga click en unas determinadas coordenadas, se hacer q el raton vaya a un determinado punto de la pantalla, pero no q haga click en el, soy un novato, decidme el codigo por favor, ya q si me decis q utilice la funcion no se cuanto no me voy a enterar...
Muchiiiiiisimas gracias,
Jose Luis
PD: Si no lo sabeis; pero sabeis mas o menos por donde va la cosa decidlo, q ya intentare hacer pruebas a ver si...

Hola, Jose Luis.
Supongo que si ya tienes decididas unas coordenadas, es porque quieres colocar el raton en ese punto, que si no me equivoco, es un objeto (ya puede ser un boton, una imagen o lo que sea). Bien, pues únicamente tienes que poner :
Nombre_del_objeto.click despues de hacer el SetCursorPos, es decir: si el objeto es un boton, y se llama button1, pon: button1.click; y ya estaría... Creo que es eso lo que quieres, ¿no?, aunque me parece a mí que es demasiado sencillo.
Si lo que quieres es hacer únicamente un mousedown, debes de poner : button1.perform(wm_lbuttondown,CoordenadaX,CoordenadaY), y asignarle el evento onmousedown o mousemove del control.
Creo que es lo que preguntabas, ¿no es así?. Hazmelo saber.. Si no es lo que buscas, preguntalo por ahí, porque no sabría decirte. Un saludo.

Lo q quiero no es simular un click sobre un objeto de mi programa, lo q quiero es q el programa haga un click en unas coordendas de la pantalla, este o no mi programa ahi, una vez q se las coordenadas de por ejemplo la X de cerrar las ventanas, mando el raton alli, y le digo q haga click, asi, la ventana q este abierta se cerrara..., se cerrara independientemente de q mi programa se este viendo en ese momento..., hacer lo q hacemos todos en la pantalla, hacer clicks, solo q de forma programada, en unas coordenadas, aunque el programa este minimizado... supongo q me entendereis...
Gracias,
JL.

Para simular acciones del ratón se usa la API mouse_event. Por ejemplo:

procedure TForm1.Button1Click(Sender: TObject);
var
P: TPoint;
begin
GetCursorPos(P);
mouse_event(MOUSEEVENTF_ABSOLUTE + MOUSEEVENTF_MOVE,
(400 * 65535) div 800, (595 * 65535) div 600, 0, 0);
mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
mouse_event(MOUSEEVENTF_ABSOLUTE + MOUSEEVENTF_MOVE,
(P.X * 65535) div 800, (P.Y * 65535) div 600, 0, 0);
end;

Supuestamente ese código simula un click en la posición (400, 595).

En lugar de los "números mágicos" 800 y 600, deberías llamar a SystemParametersInfo para obtener la resolución de la pantalla.

Espero que te sirva

Ernesto