В Delphiтип TColor определяет цвет объекта. Он используется свойством color многих компонентов и другими свойствами, которые определяют значения цвета.
Графический блок содержит определения полезных констант для TColor. Например, clBlue отображается синим цветом, clRed - красным.
Больше значений "CL" = больше цветов
Вы можете указать TColor как 4-байтовый шестнадцатеричное число вместо использования констант, определенных в графическом блоке. Три младших байта представляют интенсивность цвета RGB (красный, зеленый, синий) для синего, зеленого и красного соответственно. Обратите внимание на инверсию от типичного шестнадцатеричного цвета: для TColor последовательность сине-зелено-красная.
Например, красный может быть определен как TColor ($ 0000FF).
Конвертировать RBG в TColor
Если у вас есть значения для интенсивности красного, зеленого и синего (число от 0 до 255 - «байтовый» тип), вот как получить значение TColor:
вар r, g, b: байт; цвет: TColor; начать r: = StrToInt (ledRed. Текст); g: = StrToInt (ledGreen. Текст); b: = StrToInt (ledBlue. Текст); цвет: = RGB (r, g, b); Shape1.Brush. Цвет: = цвет;
конец; «LedRed», «ledGreen» и «ledBlue» - это три элемента управления редактированием, используемые для определения интенсивности каждого компонента цвета. Shape1 является элементом управления TShape Delphi.
Delphi подсказки навигатора:
Как разобрать файлы с разделителями табуляции в Delphi
«IsDirectoryEmpty - функция Delphi для определения, является ли каталог пустым (без файлов, без подпапок)