Отследить щелчок мыши

[ZvEr_HaCkEr]

Всем привет.Необходимо отследить щелчок мыши в любом месте экрана(не на форме).Как

[artemavd]

Так можно получить координаты указателя мыши относительно формы:

procedure TForm1.FormClick(Sender: TObject);
var
  MyMouse: TMouse;
begin
  Form1.Caption := inttostr(MyMouse.CursorPos.x) + 'Х ' +
  inttostr(MyMouse.CursorPos.y);
end;

а так можно узнать текущие координаты мышки:

procedure Form1.Button1Click(Sender: TObject);
var
  foo: TPoint;
begin
  GetCursorPos(foo);
  ShowMessage('(' + IntToStr(foo.X) + ' ,' + IntToStr(foo.Y) + ')');
end;

[ZvEr_HaCkEr]

Да нет нельзя.Мне необходимо именно отследить клик и выполнить действие(в данном случаи воспроизвести mp3 файл)

[artemavd]

Тогда глянь тут, тут и тут

[BOBAH13]

Нужен глобальный хук на мышь (WM_LBUTTONDOWN + WM_LBUTTONUP). После отлова сообщения в длл, слать сообщение (RegisterWindowsMessage) к своему приложению и выполнять нужные действия

[ex.cluz]

Интересно, ZvEr_HaCkEr, это вам тоже нужно, чтоб над "ламерами" прикалываться?
Вам бесплатно дают знания, а как вы их используете? Для унижения других?

[ZvEr_HaCkEr]

Сообщение от ex.cluz

Интересно, ZvEr_HaCkEr, это вам тоже нужно, чтоб над "ламерами" прикалываться?
Вам бесплатно дают знания, а как вы их используете? Для унижения других?

Нет, не над "ламерами" издеваться,но вобще вы угадали. Загорелся идеей сделать что-то подобное(во вложении)