GetColorGreen

Функция возвращает долю зеленого цвета в указанном цвете в абсолютных цифрах. Цвет может указываться цифровым значением или наименованием цветовой константы (например, "clSilver").

Синтаксис
GetColorGreen(Color: Integer): Integer
Входные параметры
Имя параметра	Тип параметра	Описание
Color	Integer	Числовой код цвета, либо наименование предопределенной цветовой константы: clLime, clSilver, ...
Выходные параметры
Тип параметра		Описание
Integer		Количество зеленого цвета в указанном цвете

Пример вызова:

Var
    res : Integer;

Begin
     res := GetColorGreen(clPurple);
     WriteValue('Virtual channel 99', res);
end.