Первоначально при запуске программы на экране остается информация от предыдущих действий, для очистки экрана используется процедура
ClrScr;
При этом курсор помещается в верхний левый угол. Операторы Write и Writeln начинают вывод информации с текущей позиции курсора. Поэтому, если управлять положением курсора, то нет необходимости несколько раз использовать оператор Writeln или заключать в апострофы строки пробелов. Для установки курсора в точку с координатами X, Y используется процедура
GoToXY (X,Y:byte);
Для того чтобы узнать, где в текущий момент находится курсор, используются функции
WhereX: byte;
WhereY: byte;
Например:
Var A,B:byte;
Begin
......
A:=WhereX;
B:=WhereY;
Write('Курсор находится в столбце ',А,
' и строке ',B);
......
Чтобы установить цвет символов и фона, соответственно используются процедуры
TextColor (Color:byte);
TextBackGround (Color:byte);
Они изменяют дальнейший выводимый цвет символов и полей знакомест.
Первоначально ОС сама устанавливает цвета, обычно черный фон и светло-серые символы, но их можно изменить этими процедурами. Если сделать фон и символы одинакового цвета, то они становятся невидимыми. Для закраски всего экрана одним цветом после установки цвета очищается экран:
TextColor (White);
TextBackGround (Blue);
ClrScr;
GoToXY (35,13);
Write (‘Середина экрана’);
В модуле Crt существуют и другие способы и процедуры для работы с режимами, цветами и курсором на экране.