SETAREA (установить размер виртуального экрана)
SETAREA(строк,столбцов)
| Числовая константа, которая задает число строк на виртуальном экране. Максимум - 255. Тем не менее, произведение СТРОК и СТОЛБЦОВ НЕ должно превышать 32767. |
| Числовая константа, которая задает число столбцов на виртуальном экране. Максимум - 255. Тем не менее, произведение СТРОК и СТОЛБЦОВ НЕ должно превышать 32767. |
SETAREA задает размер области памяти для виртуального экрана. Она определяет область, в пределах которой может перемещаться физический экран. SETAREA ничего не выводит, так что ее можно использовать, когда экран уже открыт. Оператор имеет доступ только к той части экрана, которая попадает в заданную область.
SETAREA требуется, когда открытый экран (без параметров строк/столбцов) имеет размер больше, чем ранее определенный виртуальный экран, или больше чем 25 x 80. Если SCREEN(строк,столбцов) больше, чем размер виртуального экрана, то виртуальная область автоматически переопределяется, настраиваясь на больший размер. Однажды установленный размер виртуальной области, остается без изменений, пока его не переопределит больший экран или процедура SETAREA.
Если задать SETAREA с размером меньшим, чем у текущего экрана, все, что не попадает в новую, меньшую, область, становится недоступным оператору для ввода. Если затем задать SETAREA с нормальными параметрами, то поля, отсеченные ранее, вновь станут доступны. Тем не менее, все рамки, цвета и надписи сотрутся.
Пример:
Screen SCREEN,PRE(Scr),COLOR(1) !Экран 50строк на 160 столбцов
описания полей для этого экрана
.
CODE
SETAREA(50,160) !Установить размер виртуального экрана
OPEN(Screen) ! и открыть его
