JS+
Усиленный язык сценариев для Windows
с возможностью встраивания
в ваши приложения
О языке JS+ Справочник Скачать JS+ DLL
Контакты
СПРАВОЧНИК ПО ЯЗЫКУ JS+ Содержание

TColor

- тип данных
Тип данных Number
Определяет 32-битное число, представляющее 24-битный цвет. Младшие 3 байта представляют красную, зеленую и синюю составляющие цвета, например:
0x000000FF-чистый красный цвет
0x0000FF00-чистый зеленый цвет
0x00FF0000-чистый синий цвет

Старший байт определяет используемую цветовую палитру:

0x00-цвет соответствует системной цветовой палитре Windows
0x01-цвет соответствует текущей цветовой палитре
0x02-цвет соответствует ближайшему цвету логической палитры текущего устройства отображения

Доступны также следующие цветовые константы:

Список цветовых констант
Константа Описание
clNone нет цвета
clAqua голубой
clBlack черный
clBlue синий
clCream кремовый
clDkGray темно-серый
clFuchsia сиреневый
clGray серый
clGreen зеленый
clLime лимонно-зеленый
clLtGray светло-серый
clMaroon темно-бордовый
clMedGray средний между серым и темно-серым
clMoneyGreen серо-зеленый
clNavy темно-синий
clOlive оливково-зеленый
clPurple пурпурный
clRed красный
clSilver серебряный
clSkyBlue небесно-синий
clTeal цвет морской воды
clWhite белый
clYellow желтый
Цвета интерфейса Windows
clActiveBorder цвет рамки активного окна
clActiveCaption цвет заголовка активного окна
clAppWorkSpace цвет рабочей области приложения
clBackground цвет рабочего стола Windows
clBtnFace цвет поверхности кнопки
clBtnHighlight цвет поверхности выделенной кнопки
clBtnShadow цвет тени от кнопки
clBtnText цвет текста кнопки
clCaptionText цвет текста в заголовке активного окна
clDefault цвет по умолчанию
clGradientActiveCaption цвет градиента в заголовке активного окна
clGradientInactiveCaption цвет градиента в заголовке неактивного окна
clGrayText цвет текста недоступных элементов
clHighlight цвет фона выделенного текста
clHighlightText цвет выделенного текста
clHotLight цвет "горячих" элементов при наведении курсора мыши
clInactiveBorder цвет рамки неактивного окна
clInactiveCaption цвет заголовка неактивного окна
clInactiveCaptionText цвет текста в заголовке неактивного окна
clInfoBk цвет фона подсказки
clInfoText цвет текста подсказки
clMenu цвет фона меню
clMenuBar цвет строки меню
clMenuHighlight цвет выделенной строки меню
clMenuText цвет текста меню
clScrollBar цвет ползунка полосы прокрутки
clSystemColor цвет фона системного сообщения
clWindow цвет фона окна
clWindowFrame цвет рамки окна
clWindowText цвет текста окна

Собственные методы
Метод Описание
bValue возвращает синюю составляющую цвета в формате TColor
gValue возвращает зеленую составляющую цвета в формате TColor
rValue возвращает красную составляющую цвета в формате TColor
toHColor возвращает строковое значение цвета в шестнадцатеричном написании
toRGB возвращает цвет в формате RGB Windows API (COLORREF)
Пример (JS+)
var Clr_Lst=new Array(
  "clActiveBorder",
  "clActiveCaption",
  "clAppWorkSpace",
  "clAqua",
  "clBackground",
  "clBlack",
  "clBlue",
  "clBtnFace",
  "clBtnHighlight",
  "clBtnShadow",
  "clBtnText",
  "clCaptionText",
  "clCream",
  "clDefault",
  "clDkGray",
  "clFuchsia",
  "clGradientActiveCaption",
  "clGradientInactiveCaption",
  "clGray",
  "clGrayText",
  "clGreen",
  "clHighlight",
  "clHighlightText",
  "clHotLight",
  "clInactiveBorder",
  "clInactiveCaption",
  "clInactiveCaptionText",
  "clInfoBk",
  "clInfoText",
  "clLime",
  "clLtGray",
  "clMaroon",
  "clMedGray",
  "clMenu",
  "clMenuBar",
  "clMenuHighlight",
  "clMenuText",
  "clMoneyGreen",
  "clNavy",
  "clNone",
  "clOlive",
  "clPurple",
  "clRed",
  "clScrollBar",
  "clSilver",
  "clSkyBlue",
  "clSystemColor",
  "clTeal",
  "clWhite",
  "clWindow",
  "clWindowFrame",
  "clWindowText",
  "clYellow"
);

// Главная форма
frm=new TForm();
frm.Caption="JS+ - тип данных TColor";
frm.Height=500;
frm.Font.Name="Courier New";
frm.Font.Size=10;

// Строка состояния
stb=new TStatusBar(frm);
stb.SimpleText=' Список цветовых констант';

// Панель прокрутки
scb=new TScrollBox(frm);
scb.BorderStyle=bsSingle;
scb.Color=0xF9F9F9.toTColor();
scb.SetBounds(10,10,frm.ClientWidth-20,stb.Top-20);

dx=frm.TextWidth("clGradientInactiveCaption");
dy=frm.TextHeight("Q");
dc=frm.TextWidth("0xAAAAAA");
for (i=y=0;i<Clr_Lst.length;i++,y+=dy) {
  // Название цвета
  ed1=new TEdit(scb);
  ed1.ReadOnly=true;
  ed1.Color=scb.Color;
  ed1.Text=Clr_Lst[i];
  ed1.Left=4;
  ed1.Top =y;
  ed1.Width =dx;
  ed1.Height=dy;

  // Цветная панель
  pnl=new TPanel(scb);
  pnl.Color=eval(ed1.Text);
  pnl.Left=ed1.Left+ed1.Width+4;
  pnl.Top =ed1.Top;
  pnl.Width =dx;
  pnl.Height=ed1.Height;

  // Шестнадцатеричное значение цвета
  ed2=new TEdit(scb);
  ed2.ReadOnly=true;
  ed2.Color=ed1.Color;
  ed2.Text=pnl.Color.toHColor();
  ed2.Left=pnl.Left+pnl.Width+4;
  ed2.Top =ed1.Top;
  ed2.Width =dc;
  ed2.Height=ed1.Height;
}

// Подогнать размер формы под размер панели прокрутки
scb.ClientWidth=ed2.Left+ed2.Width+4;
frm.ClientWidth=scb.Width+scb.Left*2;

frm.ShowModal();
Примечание
Значения цветов интерфейса Windows зависят от текущей версии системы и выбранной цветовой схемы.
Совместимость
C++ Builder/Delphi
JS+Руководство пользователя
Адрес этой страницы: https://jsplus.ru/MANUAL/JSPlus/DataType/Number/TColor.htm
© 2024-2025,