Как получить координаты щелчка мыши, Как получить координаты щелчка мыши? Опции

[Cube]

Вы не подскажите можно ли и как можно если можно в графическом режиме проверять в каком мести щелкнула мышка то есть кардиналы получить?

Добавлено через 4 мин.
Сначала спросил…. Потом нашёл МЫШЬ. Все о программировании мыши. надеюсь мне это поможет извините за беспокойство

[Cube]

Прочитал но не совсем понял что делать )) могли бы пояснить мне надо взять нужную функция вписать к себе в программу?

[Ozzя]

Uses Graph, Crt, Mouse;
{...}
  VAR 
     KoordX,KoordY:Word 
  {...}
 begin
 {...}
 If InitMouse then
 begin
  {мышь инициализированна}
  ShowMouse;{отображение указателя}
  if ButtonPressed=1 {нажата левая кнопка мыши} then
     GetMouseXY(KoordX,KoordY); {в KoordX,KoordY хранятся координаты х,у соответственно }
  {...}
  HideMouse; {сокрытие указателя}
 end else {мыши нет или не поддерживается}
 {...}

Сообщение отредактировано: Ozzя - 28.11.2008 11:22