Clearviewport/0 Графика

Назначение Чистит текущее окно

Обращение clearviewport

Домены Нет

Шаблоны описания Нет

аргументов

Описание clearviewport чистит окно и передвигает текущую

позицию в точку (0,0) в текущем окне.

Пример

setviewport(30, 30, 130, 130, 0),

outtextxy(10, 10,

"Нажмите любую клавишу для чистки окна."),

readchar(_), /* Взять ключ */

clearviewport.

/* Чистить окно, когда нажата клавиша */

clearwindow/0

Назначение Чистит текущее окно

Обращение clearwindow

Описание clearwindow чистит текущее текстовое окно путем

заполнения его фоновым цветом. Курсор выставляется в

позицию (0,0).

Неудачное Никогда не дает.

завершение

Ошибки Отсутствуют.

Пример

goal

makewindow(1,7,7,"контрольное окно",1,1,20,70),

cursor(5,20), write("Привет"),

cursor(10,10), write("Нажмите любую клавишу для",

" чистки окна"),

readchar(_),

clearwindow,

write("Курсор выставлен на (0,0)"),

readchar(_).

closefile/1

Назначение Закрывает файл

Обращение closefile(ИмяФайлСимв)

Домены (file)

Шаблоны описания (вх)

аргументов

Описание closefile закрывает файл, открытый с именем

ИмяФайлСимв. closefile согласовывается, даже если

файл не был открыт.

Неудачное Никогда не дает.

завершение

Ошибки Отсутствуют.

Пример

domains

file = myfile

goal

openwrite(myfile,"dd.txt"),

writedevice(myfile),

write("Файл из одной строки\n"),

closefile(myfile).