Информационный сервер для программистов: Исходники со всего света. Паскальные исходники со всего света
  Powered by Поисковый сервер Яndex: Найдется ВСЁ!
На Главную Pascal Форум Информер Страны мира
   Мышинное Программирование    >>    m_sharp
   
 
 Mouse-Sharp 2.01 - Модуль для Работы с Мышкой   Ivan Kalininskiy 14.07.1997

Модуль для поддержки работы с мышкой. Координаты в функциях "мыши" задаются в виртуальных координатах: для X от 0 до 639, а для Y от 0 до 199. Приведен пример использования и краткое описание функций.



20k 
 

+-------------------------------------------------------------------------+ | SHARP (2.01) | | Библиотеки для работы с PCX файлами, EMS, XMS памятью и "мышью". | | из программ на Turbo / Borland Pascal 7.0 | | All right reserved | | -= FreeWare Release =- | +-------------------------------------------------------------------------+ | Описание функций библиотек: | ++-------------------------------------------------------------------------++ | MOUSE-SHARP | | Библиотека для работы с манипулятором "мышь" | +---------------------------------------------------------------------------+ | Переменные используемые в библиотеке: | | | | MouseX, MouseY, LeftKey, RightKey, MiddleKey : integer; | | Status, KeyNumber, HorizMove, VertMove, DSpeed : integer; | | ButtonNum, ButtonX, ButtonY, HorizCount, VertCount : integer; | | | | Описание процедур: | | | | Procedure MouseInit; | | Инициализация манипулятора "мышь", в Status дается 0 если все хорошо | | или -1 если ошибка, а в KeyNumber дается кол-во кнопок "мыши". | | | | Procedure MouseGoToXY(GoX, GoY : integer); | | Установка курсора "мыши" в заданные координаты.