Komunikat WM_LBUTTONDOWN - pytanie

Jak wyslac do jakiejs aplikacji komunikat WM_LBUTTONDOWN tak, aby "kliknac" w jakims konkretnym miejscu?
Tylko mala uwaga - w tej aplikacji nie ma przyciskow jako - takich :P Dajmy na to, ze chcialbym za pomoca komunikatu WM_LBUTTONDOWN klikac na kartach w windowsowym Pasjansie :)
Najlepszym rozwiazaniem dla mnie byloby, gdyby mozna bylo podawac wspolrzedne miejsca w ktorym ma to zostac wykonane... :)

Najlepszym rozwiazaniem dla mnie byloby, gdyby mozna bylo podawac wspolrzedne miejsca w ktorym ma to zostac wykonane... :)

procedure MouseClick(X, Y: Integer);
var
  P: TPoint;
begin
  GetCursorPos(P);
  SetCursorPos(X, Y);
  mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0);
  mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0);
  SetCursorPos(P.X, P.Y);
end;

Ech... w sumie spodziewalem sie ze ktos poda takie rozwiazanie :P Ale jest w nim jeden minus... taka procedurka powoduje ze podczas klikania cale dziadostwo "skacze" - tak jakby to bylo gdyby naprawde wciskac przyciski na myszce... no a chodzi mi o to zeby tak nie bylo :)