Координаты xyz на PascalABC - Pascal ABC

Узнай цену своей работы

Формулировка задачи:

Недавно видел программу для определения координат, данные показывались на лево-верхнем углу. Сейчас нужна для проекта, модуля Events

Решение задачи: «Координаты xyz на PascalABC»

textual
Листинг программы
uses graphABC,Events;
procedure MouseMove(x,y,mb:integer);
begin
clearwindow;
textout(10,10,'x='+inttostr(x)+'  y='+inttostr(y));
end;
begin
onmousemove:=MouseMove;
end.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

10   голосов , оценка 3.7 из 5
Похожие ответы