STYLES (возвращает внутренний массив Цветовых Стилей)
STYLES()
Функция STYLES возвращает 256-байтную строку, содержащую текущие значения внутреннего массива кодов цветовых стилей.
Внутренний массив кодов цветовых стилей - 256-байтный массив, хранящий текущие коды цветовых стилей. Его элементы нумеруются от 0 до 255. Каждый элемент, изначально, имеет значение, равное его номеру (эл-т[0]=0, эл-т[1]=1..эл-т[255]=255). Каждый атрибут и оператор, использующий коды цветовых стилей, обращается к этому массиву и определяет цвета для конкретного кода цветового стиля.
Массивы Кларион нумеруются начиная с единицы, а внутренний массив кодов цветовых стилей нумеруется с нуля. Поэтому, первый элемент строки соответствует НУЛЕВОМУ элементу массива, второй первому и т.п.
Возвращаемый тип данных: STRING(256)
Пример:
StyleCodes STRING(256) !Программный массив стилей
StyleArray BYTE,DIM(256),OVER(Sty]eCodes)
!Рассматриваем строку как массив
Screen SCREEN,COLOR(0) !Цвет по умолчанию черный на черном
ROW(2,3) ENTRY(@N4),USE(Fieldl),COLOR(0,1,2)
ROW(3,3) ENTRY(@N4),USE(Field2),COLOR(0,1,2)
.
CODE
StyleCodes = STYLES() !Получить текущие стили
StyleArray[1] = 31 !ЯркоБелый на Синем - код стиля: 0
!Элемент программного массива #1 соответствует элементу #0
!внутреннего массива
StyleArray[2] = 48 !Черный на Салатном - код стиля: 1
StyleArray[3] = 23 !Белый на Синем - код стиля: 2
SETSTYLES(StyleCodes) !Перезаписать массив стилей
OPEN(Screen) !Экран будет ЯркоБелый на синем. Полей
!черное на салатном (активное)
DISABLE(?Field2) !Field2 белое на синем (затененное)
См. также: , ,
