Процедуры и функции модуля Сrt

Дата добавления: 2014-11-27; просмотров: 499; Нарушение авторских прав

Название	Назначение	Пример
ClrEOL	Удаление символов, начиная с позиции курсора, до конца строки.	ClrEOL;
ClrScr	Очистка экрана.	ClrScr;
Delay (Ms)	Задержка выполнение программы на указанное в миллисекундах время, Ms – тип: Word	Delay (10000);
DelLine	Удаление строки, в которой находится курсор. Следующие строки сдвигаются вверх.	DelLine;
Goto XY (x,y)	Позиционирование курсора на экране. Координаты экрана в стандартном режиме: X (тип: integer) – от 1 до 80; Y (тип: integer) – от 1 до 25. (1, 1) – левый верхний угол экрана (80, 25) – правый нижний угол экрана	GotoXY (9, 3);
HighVideo	Повышенная яркость символов.	HighVideo;
InsLine	Вставка пустой строки перед строкой, на которой расположен курсор.	InsLine;
LowVideo	Выключение повышенной яркости символов.	LowVideo;
NormVideo	Стандартная яркость символов.	NormVideo;
KeyPressed	Возвращение значения True, если на клавиатуре нажата клавиша (в противном случае – False).	Repeat Write (‘a’); Until KeyPressed;
NoSound	Отключение динамика.	NoSound;
Read Key	Считывание символа с клавиатуры (тип функции: char).	a:=Read Key;
Sound(Z)	Включение динамика Значение Z – тип: word. Частоты нот гаммы: 262, 294, 330, 349, 392, 440, 494, 524.	Sound(440); Delay (1000); NoSound;
TextBack – Ground(F)	Установка цвета фона. Значение F: 0 – Black (черный), 1 – Blue (синий), 2 – Green (зеленый), 3 – Cyan (голубой), 4 – Red (красный), 5 – Magenta (фиолетовый), 6 – Brown (коричневый), 7 – LightGray ( светло – серый).	TextBack – Ground(5); TextBack – Ground(Magenta);
Text Color(C)	Установка цвета символов. Значение С: 0 – 7 (см. выше) 8 – DarkGray (темно – серый), 9 – LighBlue (светло – синий), 10 - LighПкуут (светло – зеленый), 11 – LighCyan (светло – голубой), 12 – LighRed (светло – rhfcysq), 13 - LighMagenta (светло – фиолетовый), 14 – Yellow (желтый), 15 – White (белый), 128 - Blink (мерцание).	Text Color(15); Text Color(White); Text Color(Blue + Blink);
Window(x1,y1,x2,y2)	Отображение на экране текстового окна. Окно становится текущим, т.е. позиция с координатами (1,1) является левым верхним углом окна, а не экрана.	Window(10,5,70,9);
WhereX	Текущая координата X курсора	WriteLn(WhereX);
Where Y	Текущая координата Y курсора	WriteLn(Where Y);

<== предыдущая лекция	\|	следующая лекция ==>
Специальные процедуры и функции	\|	Сообщения об ошибках компиляции