Информационный сервер для программистов: Исходники со всего света. Паскальные исходники со всего света
  Powered by Поисковый сервер Яndex: Найдется ВСЁ!
На Главную Pascal Форум Информер Страны мира
   Экранные Средства    >>    vcrt
   
 
 VCRT - Модифицированный модуль CRT   Виктор Вагнер 12.01.1995

Модуль представляет собой модифицированный стандартный модуль CRT для Turbo Pascal 6.0,5.5 в который не добавлено практически ни одной новой функции, но работа некоторых весьма стандартных функций изменена так, как это казалось автору более логичным. Кроме того ряд внутренних функций выведен в интерфейс.



13k 
 

Модуль VCRT Модуль предсавляет собой модифицированный стандартный модуль CRT для Turbo Pascal 6.0,5.5 в который не добавлено практически ни одной новой функции, но работа некоторых весьма стандартных функций изменена так, как это казалось автору более логичным. Кроме того ряд функций, бывших внутренними выведен в интерфейс. Изменение первое - драйвер текстовых файлов : 1. В графических режимах CGA 320x200, EGA и VGA атрибуты символов обрабатываются так же как и в текстовых. 2. Процедуры READ и READLN допускают редактирование с помощью стрелок, клавиш Home, End, BackSpace и Delete. 3. Процедуры READ и Readln в графических режимах эмулируют курсор Изменуние второе: Процедуры InsLine, DelLine, ClrEol, ClrScr обрабатывают атрибуты во всех графических режимах Изменение третье Добавлены процедуры ReInitCrt - инициализация внутренних переменных необходимо вызывать после изменения режима экрана не средствами VCRT для корректной работы. ReadKeyWord - возвращает двухбайтовый код нажатой клавиши Старший байт - скэнкод. Beep - выдает стандартный звуковой сигнал. Эквивалент Write(#7) Изменение третье: Переменная DirectVideo инициализируется в False, если текущий режим графический. Ограничения: 1. Вывод на экран всегда через Bios, независимо от значения DirectVideo 2. Процедура Readln не позволяет вводить строки, превышающие расстояние до правой границы экрана. Модуль VCRTEXT Содержит расширения CRT, весьма полезные и отчасти повторяющие процедуры tpCrt и opCrt (Copyright by TurboPower Software), но, как и VCRT, корректно работающие в графике. Procedure FrameWindow(X1,Y1,X2,Y2) - рисует рамку. Символы задают