Основные процедуры и функции модуля CRTРефераты >> Кибернетика >> Основные процедуры и функции модуля CRT
И константы, и переменные становятся глобальными и доступными программе, использующей модуль CRT, и их не надо описывать среди прочих идентификаторов. Так, например, в модуле CRT определена переменная DirectVideo типа Boolean, и ее стартовое значение равно True. Если надо сменить определяемый ею режим работы устройства CRT, то необходимо вставить в программу строку
USESCRT; { модуль CRT подключен }
. . . { раздел прочих описаний }
BEGIN
DirectVideo: = False ; { <- - смена режима CRT}
. . . { собственно программа }
END.
Но если определить в программе такую же переменную, то доступ к оригиналу из CRT будет заблокирован. Теперь, чтобы все-таки сменить значение системной переменной, надо указывать ее принадлежность в виде определяющего поля:
USESCRT; { Модуль CRT подключен. }
VAR
DirectVideo : Boolean ; { Переопледеление системной }
{переменной. Тип может быть и любым другим }
BEGIN
DirectVideo : = False ; { не влияет на работу СRT }
CRT. DirectVideo : = False; { Режим работы CRT меняется. }
. . .
END.
Процедуры и функции модуля CRT.
Реализованные в модуле процедуры и функции сведены в таблице:
Процедуры и функции |
Назначение |
Работа с экраном в целом | |
Window ( X1, Y1, X2, Y2, : Byte ) |
Задание текущего окна на экране |
ClrScr |
Очистка текущего окна на экране |
TextMode (M: Word) |
Установка текстового режима |
Позиционирование курсора | |
GotoXY (X,Y :Byte) |
Установка курсора в столбец Х, строку Y |
WhereX : Byte |
Выдача номера текущего столбца |
WhereY : Byte |
Выдача номера текущей строки |
Работа со строками | |
ClrEOL |
Стирание всех символов в строке, начиная от текущего и до конца строки |
InsLine |
Вставка пустой строки на место текущей |
DelLine |
Удаление текущей строки |
Настройка цвета | |
TextColor(C: Byte) |
Выбор цвета символов на экране |
TextBackGround (C: Byte) |
Выбор цвета фона под символами |
HighVideo |
Включение яркости цвета символов |
LowVideo |
Выключение яркости цвета символов |
NormVideo |
Восстановление цветного режима |
Подача звукового сигнала | |
Sound (Hz: Word) |
Включение звука с частотой тона Hz в герцах |
NoSound |
Выключение звука |
Использование встроенного таймера | |
Delay ( ms : Word ) |
Задержка процесса (пауза) в ms миллисекунд |
Опрос клавиатуры | |
KeyPressed: Boolean |
Логическая функция для анализа нажатия клавиши |
ReadKey : Char |
Функция, возвращающая символ нажатой клавиши |
Переназначение стандартных файлов | |
AssignCRT(VAR f : Text) |
Связь текстового файла f с устройством CRT |