Синтаксис:
procedure Window(xl,yl,x2,y2: byte);
Действие:
Определяет окно — область экрана. Параметры xi,yi задают координаты левого верхнего угла окна, а параметры х2,у2 — правого нижнего угла.
Синтаксис:
function WhereY: byte;
Действие:
Возвращает координату y курсора в текущем окне, заданном процедурой window.
Синтаксис:
function WhereX: byte;
Действие:
Возвращает координату х курсора в текущем окне, заданном
Процедурой Window.
Синтаксис:
procedure TextColor(Цвет; byte);
Действие:
Устанавливает цвет символов сообщений, выводимых инструкциями write и writein. В качестве параметра цвет может использоваться одна из перечисленных ниже именованных констант.
Константа |
Цвет |
Номер цвета |
Black |
Черный |
0 |
Blue |
Синий |
1 |
Green |
Зеленый |
2 |
Cyan |
Бирюзовый |
3 |
Red |
Красный |
4 |
Magenta |
Сиреневый |
5 |
Brown |
Коричневый |
6 |
LightGray |
Белый |
7 |
DarkGray |
Серый |
8 |
LightBlue |
Голубой |
9 |
LightGreen |
Светло-зеленый |
10 |
LightCyan |
Светло-бирюзовый |
11 |
LightRed |
Светло-красный (алый) |
12 |
LightMagenta |
Светло-сиреневый |
13 |
Yellow |
Желтый |
14 |
White |
Белый,яркий |
15 |
Синтаксис:
procedure TextBackGround(Цвет: byte);
Действие:
Задает цвет фона сообщений, выводимых инструкциями write и writein. В качестве параметра цвет может использоваться одна из перечисленных ниже именованных констант.
Константа |
Цвет |
Номер цвета |
Black |
Черный |
0 |
Blue |
Синий |
1 |
Green |
Зеленый |
2 |
Cyan |
Бирюзовый |
3 |
Red |
Красный |
4 |
Magenta |
Сиреневый |
5 |
Brown |
Коричневый |
6 |
LightGray |
Белый |
7 |
Синтаксис:
function ReadKey : char;
Действие:
Возвращает символ, соответствующий нажатой клавише. Используя функцию Ord, можно получить код нажатой клавиши.
Если нажата служебная клавиша (например, клавиша перемещения курсора), то функция ReadKey возвращает символ с кодом 0. В этом случае для идентификации служебной клавиши следует еще раз вызвать функцию ReadKey, которая теперь вернет код служебной клавиши.
Ниже приведены коды некоторых часто используемых клавиш.
Клавиша |
Код |
<Esc> |
27 |
<Backspace> |
8 |
<Enter> |
13 |
<Space> |
32 |
<Kypcop вверх> |
0;72 |
<Kypcop вниз> |
0;80 |
<Kypcop влево> |
0;75 |
<Kypcop вправо> |
0;77 |
Синтаксис-
function ParamStr (A/: word): string
Действие:
Возвращает параметр командной строки, номер которого указан при обращении к функции. Значением ParamStr(O) является путь к файлу выполняемой программы и его имя (например, c:\\my.exe).
Синтаксис:
function ParamCount: word;
Действие:
Возвращает количество параметров командной строки.
Синтаксис:
procedure New(var р) ;
Действие:
Выделяет память для динамической переменной и присваивает указателю р адрес выделенной области.
Синтаксис:
procedure Halt [ (КодЗавершения: word) ];
Действие:
Завершает выполнение программы и передает управление операционной системе.