Скачать SVGMouse - Модуль Мыши SVGA/256 для BP7

02.01.1997
Скачать файл (19,27 Кб)

Модуль поддержки мыши в 256-цветных режимах SVGA для Borland Pascal 7.0 Автор: Жучков Антон (Zhuchkov Anton 2:5020/308.84)

Здравствуйте, коллеги - паскалисты!

Вот, вашему вниманию представляется модуль SVGMouse. Написан он был мною ввиду того, что стандартные обработчики мыши меня совсем не устраивали. Одно из достоинств данного юнита - то, что ему вовсе не нужен загруженный в память драйвер мыши. Кроме того, перемещение по экрану весьма плавное, возможно определение пользовательских процедур обработки нажатий клавиш и установка чувствительности мышки.

В комплект поставки должен входить драйвер SVGA256.BGI, используемый мною. Он неплох, дает возможность использовать режимы от 320х200 до VESA 1280x1024 при 256 цветах. Поддерживает VESA и некоторые карты. Также, я прилагаю TPU и мою программу по превращению PCX-файлов в паскалевские Image. Правда, немного глюкава - не хочет правильно конвертить, если ширина - нечетное число. Так времени и не было разобраться с ней :( Кстати, курсор по умолчанию - размер 20х20. В качестве бонуса (что-то я добрый сегодня, рад, что мышь получилась) даю вам юниты по загрузке/использованию этих палитр и спрайтов. Кстати в SVGA256.BGI есть интересный режим для PutImage. Он называется TRANS_COPY_PUT (не забудьте SVGA_PUT.INC) и позволяет сделать точки с цветом 0 прозрачными. Также в VVGA вы найдете медленное гашение экрана и изменение палитры. Правда вынужден вас огорчить - это все не работает в Protected Mode. Но вы можете сами все модифицировать.