- procedure WaitForMouseEvent(milliseconds : Cardinal = INFINITE);
Ждет, пока произойдет событие, связанное с мышью: нажатие левой клавиши или перемещение указателя.
Параметр milliseconds — необязательный: если его не передавать, то ожидание может продлиться сколь угодно долго (пока пользователь не нажмет клавишу или не передвинет указатель мыши), если передать число N, то ожидание продлится не дольше N миллисекунд.
- function MousePressed : Boolean;
Возвращает true, если нажата левая клавиша мыши.
- function GetMouseX : Integer;
Возвращает координату X курсора мыши
- function GetMouseY : Integer;
Возвращает координату Y курсора мыши
|
|