Для обробки даних вводу з клавіатури можна також використовувати спеціальні змінні модуля Crt: CheckBreak і CheckEOF.

Змінна CheckBreak задає режим перевірки використання комбінацій клавіш [Ctrl+Break] під час виконання операцій вводу-виводу буде перевіряти роботу програми. В решта випадках натиснення [Ctrl+Break] ніяк не буде впливати.

Якщо значення змінної CheckBreak рівне False, переривання роботи програми при натисненні комбінації клавіш [Ctrl+Break] стає неможливим.

Якщо на клавіатурі немає клавіші [Break], то її, найчастіше, замінює клавіша [ScrollLock], і, відповідно, комбінацією клавіш, яка здійснює переривання роботи програми, буде [Ctrl+ScrollLock].

Інша змінна CheckEOF, задає режим вводу з клавіатури ознаки кінця файлу (#26). Цей код записується в буфер при натисненні комбінації клавіш [Ctrl+Z].

По замовчуванню значення CheckEOF рівне False, при натисненні [Ctrl+Z] в кінець рядка буде записаний символ #26 і він не буде інтерпретований як ознака кінця файлу. Якщо встановити значення CheckEOF рівним True, то можна організувати ввід текстових файлів з клавіатури, закінчуючи їх ввід ознакою кінця файлу.

ПРОЦЕДУРИ УПРАВЛІННЯ КОЛЬОРОМ

Процедура

TextColor (Color: BYTE);

Встановлює колір відображених на екрані символів, а процедура

TextBackground (Color: BYTE);

Встановлює колір фону. Для цих процедур визначений набір констант кольорів

ім’я	числове значення	Колір	використовується процедурами
Black		Чорний	TextColor, TextBackground
Blue		Синій	TextColor, TextBackground
Green		Зелений	TextColor, TextBackground
Cyan		Голубий	TextColor, TextBackground
Red		Червоний	TextColor, TextBackground
Magenta		Фіолетовий	TextColor, TextBackground
Brown		Коричневий	TextColor, TextBackground
LightGrey		Світло-сірий	TextColor, TextBackground
DarkGrey		Темно-сірий	TextColor
LightBlue		Світло-синій	TextColor
LightGreen		Світло-зелений	TextColor
LightCyan		Світло-голубий	TextColor
LightRed		Світло-червоний	TextColor
LightMagenta		Світло-фіолетовий	TextColor
Yellow		Жовтий	TextColor
White		Білий	TextColor
Blink		Мерехтіння	TextColor

Константа Blink задає мерехтіння відображених символів і звичайно використовується в процедурі TextColor в якості доданка:

TextColor (Blue + Brink);

Дія процедур TextColor і TextBackground зводяться до запису в спеціальну змінну TextAttr модуля Crt відповідних значень. Ця змінна має тип BYTE і може приймати значення від 0 до 255. Значення змінної визначає поточний колір фону, символів і режим мерехтіння символів. Кожний з восьми бітів змінної TextAttr може містити наступну інформацію

Змінну TextAttr необхідно застосовувати, використовуючи наступну формулу:

TextAttr: = <колір символів> + <колір фону> [+мерехтіння];

Номер біта	призначення в кольоровому режимі	призначення в монохромному режимі
	синій компонент кольору символів	Підкреслення (1 – є, 0 – немає)
	зелений компонент кольору символів	колір символу
	червоний компонент кольору символів	колір символу
	яскравість символів (1 – є, 0 – немає)	Аналогічно кольоровому режимові
	синій компонент кольору фону	колір фону/ Інверсія
	зелений компонент кольору фону	колір фону/ Інверсія
	червоний компонент кольору фону	колір фону/ Інверсія
	мерехтіння (1 – є, 0 – немає)	Аналогічно кольоровому режимові

Колір символів може змінюватися в межах 0..15, а колір фону – в межах 0..7. атрибуту мерехтіння відповідає значення 128. Квадратні дужки для нього означають, що цей атрибут необов’язковий. Замість конкретних значень можна використовувати ті ж константи кольорів, що і в процедурах TextColor і TextBackground.

В загальному кажучи, змінну TextAttr можна використовувати замість процедур TextColor і TextBackground, але на практиці буває значно простіше встановлювати колір фону і символів окремо один від одного, не піклуючись про те, щоці дії впливають на решта бітів змінної TextAttr.

Для монохромних моніторів управління кольором дещо складніше, так як завжди на них відображається лише чорний, білий і яскраво-білий кольори. Які, в залежності від типу монітора, можуть замінюватися зеленими чи червоними кольорами. Крім того, для цих моніторів вводиться режим підкреслювання символів.

Правила кодування бітів в монохромному режимі складні і не зовсім очевидні. Підкреслення використовується тільки при відображені білих чи яскраво-білих символів на чорному фоні. Якщо в бітах кольору фону є хоча б одна одиниця, а в бітах кольору символів всі нулі, встановиться інверсний колір: чорні символи на білому фоні. Якщо в бітах кольору символів встановлена хоча б одна одиниця, встановлюється неяскравий білий колір на білому фоні. А якщо при цьому біт яскравості рівний одиниці, встановлюється яскраво-білий колір на білому фоні.

Процедури HighVideo і LowVideo не мають параметрів. Вони так, як процедури TextColor і TextBackground, виробляють установку значення змінної TextAttr. Процедура HighVideo встановлює значення біта яскравості змінної TextAttr рівним 1 (режим підвищеної яскравості). А процедура LowVideo, навпаки, перевертає це значення в нуль (режим нормальної яскравості).

<== попередня сторінка	\|	наступна сторінка ==>
Функція	\|	Процедура NormVideo відновлює той кольоровий режим (колів фону, символів і мерехтіння), який був встановлений до моменту початку роботи програми.

Не знайшли потрібну інформацію? Скористайтесь пошуком google:

Генерація сторінки за: 0.004 сек.