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


         

с текстовым файлом, что позволяет


/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 - значение задержки в миллисекундах
Задержка исполнения программы на заданное число миллисекунд
<

Содержание  Назад  Вперед