HOME ПРИМЕРЫ THANKS НОВИЧКАМ ДОКИ LINKS JavaScript Mail


 
В этот день много лет назад...
2 декабря. В 1960 году (63 года назад) - При приземлении погибают участники второй экспедиции живых существ в космос - русские собаки Пчелка и Мушка.
 
 

Turbo Pascal Documentation

Процедура CrlEol

Модуль Сrt


     Функция: Стирает все символы, начиная от позиции курсо-
ра, до конца строки. Курсор при этом не перемещается.
     Описание: ClrEol
     Примечания: Все позиции символов заполняются пробелами.
При этом используется  текущее определение текстовых атрибу-
тов.  Таким образом,  если в  ТехtВаckground не задан черный
цвет, то в позициях, начиная от курсора и до правой границы,
экран приобретает фоновый цвет.
     Эта процедура зависит от используемого окна. Например:

Window(1,1,60,20);
ClrEol;

установит для текущей позиции курсора вместо значений (1,1)
значения (60,1) (то есть правая граница активного окна).
     Прочее: См. также процедуры ClrScr, Window.
     Пример:

uses Crt;
begin
   TextBackGround(LightGray);
   ClrEol;   { для очищенных позиций устанавливается светло-
                серый фоновый цвет }
end.




HOME