원하는곳에 마우스 포인터 지정하고 클릭한것처럼 꾸미기.

var
  Old_Point, T_Point: TPoint;
  R: Integer;

begin
  T_Point.x := 요기에 원하는 x 좌표를 넣습니다.
  T_Point.y := 요기에 원하는 y 좌표를 넣습니다.

  GetCursorPos(Old_Point);
  // 마우스 좌표를 저장합니다.
  T_Point := ClientToScreen(T_Point);
  // 현재 좌표를 Windows Screen Area의 좌표로 변환.
  SetCursorPos(T_Point.x, T_Point.y);
  // 좌표로 이동합니다.
  mouse_event(MOUSEEVENTF_LEFTDOWN, 0, 0, 0, 0  );
  mouse_event(MOUSEEVENTF_LEFTUP, 0, 0, 0, 0  );
  SetCursorPos(Old_Point.x, Old_Point.y);
  // 원상태 복귀.