Программирование на языке Турбо-Пролог 2.0. Николаев В.Г - 29 стр.

UptoLike

- 29 -
shiftwindow(WindowNo) (integer) - (i) (o)
Устанавливает в качестве текущего активного окна окно с но-
мером WindowNo или считывает номер активного окна
gotowindow(WindowNo) (integer) - (i)
Устанавливает в качестве активного окно с номером WindowNo
resizewindow
Изменяет размер текущего окна в интерактивном режиме
resizewindow(StartRow,NoOfRows,StartCol,NoOfCols)
(integer,integer,integer,integer) - (i,i,i,i)
Предикат изменения размеров окна по заданным параметрам:
StartRow, StartCol - координаты верхнего левого угла окна
NoOfRows, NoOfCols - высота и ширина окна
colorsetup(Main_Frame) (integer) - (i)
Предикат для изменения цвета текущего окна, где:
Main_frame = 0 Изменение цвета в окне.
= 1 Изменение цвета рамки окна.
existwindow(WindowNo) (integer) - (i)
Проверяет, существует ли окно с заданным номером
removewindow удаляет текущее окно
removewindow(WindowNo,Refresh) (integer,integer) - (i,i)
Предикат удаления окна с параметрами, где:
WindowNo - номер окна
Refresh = 0 Без отчистки фона.
= 1 C отчисткой фона.
clearwindow очистить текущее окно
window_str(ScreenString) (string) - (i) (o)
Выводит строку в текущее окно или считывает строку из теку-
щего окна