Mail

В этот день много лет назад...
1 марта. В 1872 году (154 года назад) - Американские палеонтологи Эдуард Дринкер Коп и Отниэл Чарльз Марш были заклятыми врагами. Они оба проводили экспедиции в предгорьях Скалистых гор, где обнаружили останки более сотни новых древних ящеров. Если кому-то из них не удавалось самому выкопать интересный экземпляр, они приказывали разбить или взорвать обнаруженный скелет. Спор продолжался и на страницах научных изданий. В этот день Коп читал в Американском философском обществе в Филадельфии свой доклад об обнаруженной рептилии с гигантскими крыльями, которую назвал Ornithochirus. Но Марш опередил его всего на несколько дней, опубликовав в журнале American Journal of Science свой отчет, в котором дал твари имя Pterodactylis, которое и прижилось.

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;