Процедура HighVideo

Модуль CRT

Включает высокую интенсивность символов.

Объявление:

Procedure HighVideo;

Режим:

Real, Protected

Замечание:

В модуле Crt есть переменная TextAttr, в которой хранится текущий видео атрибут. HighVideo поднимает бит высокой интенсивности цвета символов в TextAttr, таким образом переводит цвета от 0 до 7 на цвета от 8 до 15.

Пример:

{ Пример программы для процедуры HighVideo }

Uses Crt;

Begin
 TextAttr:=LightGray; { Серый цвет }
 HighVideo;           { Белый цвет }
End.