Mail

В этот день много лет назад...
17 октября. В 1651-10-17 году (374 года назад) - Разбитый Кромвелем в сентябре в битве при Вустере и вынужденный после этого шесть недель скрываться от преследования, Карл Стюарт (будущий король Англии Карл II) бежит во Францию под вилом слуги. Ему суждено пробыть на континенте восемь лет, пока в Англии не будет восстановлена монархия.

Turbo Pascal Documentation

Процедура HighVideo
Модуль Сrt

     Функция: Устанавливает для символов подсветку.
     Описание: HighVideo
     Примечания: В модуле Сrt  имеется  байтовая  переменная
ТехtАttr,  которая используется для хранения текущих атрибу-
тов изображения. Процедура HighVideo устанавливает для цвета
символов  переменной  ТехtAttr бит подсветки. Таким образом,
цвета 0..7 отображаются в цвета 8..15.
     Отличия: В версии 3.0 процедура HighVideo всегда  выби-
рала  желтый цвет на черном фоне (белый на черном фоне в мо-
нохроматическом режиме и в видеорежимах ВW80).
     Прочее: См. также процедуры NomVideo, LowVideo, TextCo-
lor, TextBackGround.
     Пример:

uses Crt;
begin
   TextAttr := LightGray;
   HighVideo;                   { цвет становится белым }
end;