GetColorBlue

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

GetColorBlue(Color): Integer
Color: Integer	Числовой код цвета, либо наименование цветовой константы
Функция возвращает количество синего цвета в указанном цвете

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

{Pascal Script}
Var
    res : Integer;

Begin
     res := GetColorBlue(clPurple);
     AddToDebugLog('Доля синего цвета в "clPurple" = ' + intToStr(res));
end.

Подробную информацию об "Окне отладочной информации" можно почитать здесь.