**********
SVGMouse
**********
Модуль поддержки мыши в 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. Но вы можете сами все модифицировать.
В общем ладно. Пишите на 2:5020/308.84 если найдете баг или вдруг захочется
пожелать что-нибудь. :)
|