p>
Задає колір фону. Color-задається колір фону. /Td>
procedure TextColor (Color) Byte;
Задає колір сімволов.Color-задається колір символів.
procedure TextMode (Mode: word);
Встановлює текстовий режим, збільшує поточне вікно до цілого екрану, встановлює змінним DirectVideo і CheckSnow значення true.Помещает значення поточного режиму в змінну LastMode, запускає процедуру NormVideo. Mode- необхідний текстовий режим.
procedure Window (X1, Y1, X2, Y2: Byte);
Задає розміри вікна на екрані і поміщає курсор у лівий верхній кут вікна з координатами (1,1)
X1, Y1- координати лівого верхнього кута екрану
X2, Y2- координати правого нижнього кута екрану.
Якщо хоча б одна з координат неприпустима, то процедура не виконується.
Function KeyPressed: boolean;
Аналізує натискання клавіші клавіатури (за винятком допоміжних клавіш- Shift, Alt, NumLock і т.п.). Результат - true, якщо клавіша на клавіатурі натиснута і false - у протилежному випадку.
function Readkey: char;
Зчитує символ з клавіатури і звільняє буфер клавіатури від ліченого символу.
function WhereX: Byte;
Повертає поточну координату X курсору
function WhereY: byte:
Повертає поточну координату Y курсору
Приклад програми, виконує висновок на екран дисплея меню такого вигляду:
Виберіть режим
Введення і коректування даних
Розрахунок властивостей
Вибір складу
Графка
program menu;
uses Crt; label 1,2;
type
mas = array [1 .. 4] of string [33];
const Stor: mas = ("Введення і коригування даних ',);
'Р а з ч е т з в про і с т в',
'В и б о р з о с т а в а',
('Г р а ф і к а');
В
Вибір конкретного режиму з цього меню здійснюється за допомогою клавіш
При натисканні цих клавіш генерується звук, тривалістю 0.5 сек.
При цьому рядок, на яку падає вибір, виділяється кольором і фоном.
Вибір фіксується за допомогою клавіші ENTER
Після цього видається повідомлення про обраний режим.
У програмі використовуються повертаються коди клавіатури:
клавіша
код
пѓ§
0 75
пѓЁ
0 77
пѓ©
0 72
пѓЄ
0 80
enter
13
Коди квітів
Ім'я
Значення
Призначення
Black
0
Чорний
Blue
1
Синій
Green
2
Зелений
Cyan
3
Блакитний
Red
4
Червоний
Magenta
5
Фіолетовий
Brown
6
Коричневий
LightGray
7
Світло-сірий
DarkGray
8
Темно-сірий
LightBlue
9
Світло-синій
LightGreen
10 /Td>
Світло-зелений
LightCyan
11
Світло-блакитний
...
