Hola,
Bienvenido al ClubDelphi. Por favor, revisa la
guía de estilo de estos Foros y no dejes de utilizar el
buscador de los mismos. Por ejemplo, el tema que te preocupa ha sido tratado en más de una ocasión, como podrás comprobar.
Puedes utilizar la función "Mouse_Event" del API de Windows, básicamente:
Código Delphi
[-]
begin
Mouse_Event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
Mouse_Event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
end;