1. Управление режимами вывода данных на экран дисплея

В понятие «удобство работы с пользовательским интерфейсом» входят:

• шрифтовое оформление информации, представленной на экране;

• расположение различных частей информации, относительно друг друга;

• цветовое оформление информации, представленной на экране.

Шрифт в текстовом режиме устанавливает операционная система. Изменить его нет возможности, но можно менять расположение информации на экране и цветовое оформление.

1.1. Управление положением курсора на экране монитора

Инструкции Write и WriteLn выводят информацию, начиная с той позиции экрана, в которой находится курсор. Положение курсора на экране определяется номером строки и номером позиции в строке, которые можно рассматривать как координаты курсора. В стандартном режиме на экране могут быть отображены до 25 строк текста длиной до 80 символов.

X - это горизонтальная координата, которая меняется от 1 до 80 (определяет номер позиции в строке).

Y - это вертикальная координата, которая меняется от 1 до 25 (определяет номер строки). За начало координат принят левый верхний угол экрана (рис. 8). Левая верхняя точка экрана имеет координаты (1,1), правая нижняя -(80,25). Процедура GoTo (X,Y) позволяет вывести текст с определенной позиции экрана.

Процедура в общем виде выглядит так: GoToXY(координата X, координата Y), где координата X, координата У – выражения целого типа, значения которых задают новое положение курсора. К примеру, инструкции

GoToXY(34,13); write(Turbo Pascal');

выводят сообщение примерно в середине экрана, в 34-й строке с 13-й позиции.

1.2. Стандартный модуль crt. Подключение модулей с помощью Uses. Процедура очистки экрана дисплея ClrScr. Функция ReadKey

Процедуры, управляющие представлением информации на экране в текстовом режиме, собраны в стандартном модуле CRT (Cathod ray tube -электронно-лучевая трубка), который необходимо подключить к программе в разделе подключения модулей Uses.

Процедура ClrScr

ClrScr - сокращение от англ. Clear Screen («очистить экран»). Результатом работы данной процедуры является удаление всех символов с экрана и перемещение каретки в левый верхний угол.

Функция ReadKey

ReadKey в переводе с английского означает «читать клавишу». ReadKey позволяет дождаться нажатия пользователем какой-либо клавиши, после чего определяется код нажатой клавиши. С ее помощью можно организовать паузу в программе, так как программа приостанавливается до нажатия клавиши.

Задача 4

Подключение к программе модуля CRT и очистка экрана:

Program Lab2_4;

Uses CRT;

Begin

ClrScr;

Writeln ('Нравится чистый экран?');

ReadKey;

End.

1.3. Процедуры работы с цветом (TextColor,TextBackground)

В любой момент времени выполнения программы экран в текстовом режиме имеет две цветовые характеристики:

• текущий цвет выводимого текста;

• текущий фон выводимого текста.

В табл.4 мы видим цвета, используемые для вывода информации на экран, и соответствующие им константы модуля CRT.

Таблица 4.

Цвет	Код	Константа модуля CRT
Черный	0	Black
Синий	1	Blue
Зеленый	2	Green
Морской волны	3	Cyan
Красный	4	Red
Фиолетовый	5	Magenta
Коричневый	6	Brown
Светло-серый	7	LightGray
Темно-серый	8	DarkGray
Светло-синий	9	LightBlue
Светло-зеленый	10	LightGreen
Светлый морской волны	11	LightCyan
Светло-красный	12	LightRed
Светло-фиолетовый	13	LightMagenta
Желтый	14	Yellow
Белый	15	White

Для изменения цвета символов используется процедура TextColor – цвет текста, имеющая следующий вид:

TextColor(< цвет >).

В качестве параметра «цвет» можно использовать код цвета (0..15) или именованную константу. Для всех возможных цветов в модуле CRT описаны константы.

Обратим внимание на то, что процедура TextColor устанавливает цвет только тех символов, которые будут выводиться после ее выполнения. Символы, уже находящиеся на экране, сохранят свой цвет.

Вторая цветовая характеристика выводимого на экран текста - текущий цвет фона. Для изменения текущего цвета фона используется процедура TextBackground (англ.) – фон текста, имеющая следующий вид:

TextBackground (< номер цвета >).

Для цвета фона могут использоваться первые восемь цветов (0..7) из 16 доступных в текстовом режиме.

Задача 5

Вывести на экран дисплея на светло-сером фоне красными буквами текст «Goodbye!».

Program Lab2_5;

Uses CRT;

Begin

ClrScr;

TextColor(Red);

TextBackGround(LigtCray);

Writeln ('Goodbye!');

ReadKey;

End.

Задача 6

Названия пунктов меню вывести на синем фоне светло-серым цветом, а номера пунктов меню – ярко-белым цветом.

Program Lab2_6;

Uses CRT;

Begin

ClrScr;

TextBackGround(Blue);

TextColor(15);

WriteLn('l');

TextColor (7);

Write ('Вывод на экран');

TextColor (15);

WriteLn ('2');

TextColor (7);

Write ('Вывод на принтер');

ReadKey;

End.