кординаты х,у

[Obey177]

Надо чтобы по клику на экране мышко кордината мышки х вводилась в эдит1 а у в эдит 2 как реализовать подскажите...

[Shouldercannon]

procedure TForm1.FormClick(Sender: TObject);
var
  P: TPoint;
  x, y: Integer;
begin
  x := GetSystemMetrics(Sm_CXscreen);
  y := GetSystemMetrics(Sm_CYscreen);
  GetCursorPos(P);

  Edit1.Text := IntToStr(P.X);
  Edit2.Text := IntToStr(P.Y);
end;

P.S. На экране монитора, а не формы?

[Obey177]

ну монитора да там и по форме надо

[Stilet]

ну монитора да там

Тебя не зря спросили какие клики отлавливать. Каждому окну приходят свои клики. Ты не можешь отловить клик за пределами окна в твоем приложении стандартными средствами - для отлова кликов во всех окнах и координатах нужно ставить хук на WH_MOUSE