Основные процедуры и функции модуля 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 |
