Краткая справка по языку программирования Turbo Pascal


Модуль Graph - часть 2


/p>

Модуль CRT

Интерфейс

Назначение

Установка режимов и окон

Procedure AssignCrt(File : Text); Связывает окно дисплея с текстовым файлом, что позволяет ускорить вывод на экран
Procedure CIrScr; Очищает экран и помещает курсор в верхний левый угол
Procedure TextMode(Mode: integer);

Mode - номер текстового режима или соответствующая константа

Выбор текстового режима
Procedure Window(X1, Y1, Х2, Y2 : byte);

(Х1 ,Y1) и (X2.Y2) - координаты верхнего левого и нижнего правого углов окна

Определяет окно вывода в текстовом режиме

Управление цветом текста и фона

Procedure HighVideo; Устанавливает высокую яркость выводимых символов
Procedure LowVideo; Устанавливает низкую яркость выводимых символов
Procedure Norm Video; Возвращает цвет символов и фона, свойственный данному графическому режиму по умолчанию
Procedure TextBackground(Color: byte);

Color - код цвета или соответствующая константа

Выбор цвета фона
Procedure TextColor

(Color : byte);

Color - код цвета или соответствующая константа

Выбор цвета символов

Управление выводом текста

Procedure CIrEol; Стирает все символы от текущей позиции курсора до конца строки
Procedure DelLine; Удаление линии, в которой находится курсор
Procedure InsLine; Вставляет новую строку текста перед строкой, где находится курсор

Работа с клавиатурой

Function KeyPressed

: boolean;

Значение функции true, если нажата клавиша, и false, если нет

Определяет, была ли нажата клавиша на клавиатуре
Function ReadKey

: char;

Значение функции - код символа клавиши, нажатой на клавиатуре

Чтение символа из буфера клавиатуры

Управление курсором

Procedure GotoXY( X, Y : integer);

X, Y - координаты курсора

Перемещает курсор в указанные координаты окна вывода
Function WhereX: integer;

Значение функции - координата X курсора

Возвращает текущую координату Х курсора
Function WhereY: integer;

Значение функции - координата Y курсора

Возвращает текущую координату Y курсора

Управление звуком

Procedure NoSound; Выключает звук динамика
Procedure Sound(Hz: word);

Hz - частота звука в герцах

Включает звук динамика с заданной тональной частотой

Управление временем

Procedure Delay(MS : word);

MS - значение задержки в миллисекундах

Задержка исполнения программы на заданное число миллисекунд
<


- Начало -  - Назад -  - Вперед -



Книжный магазин