ImageEn, unit iexColorPalette

TIEColorPalette.AppendColorLuminancePalette

TIEColorPalette.AppendColorLuminancePalette


Declaration

procedure AppendColorLuminancePalette(Color: TColor; ColorCount: Integer = 256; MinL : Integer = 10; MaxL : Integer = 240);


Description

Append a set of all luminance value (in the range MinL to MaxL) for a color.

Note: Colors are appended, so use Clear if you wish to replace the existing colors.


Example

// Display all shades of blue
ColorPalette1.Clear();
ColorPalette1.AppendColorLuminancePalette( clBlue, 100 );


See Also

GenerateColorLuminancePalette
GenerateHuePalette
AppendGradientPalette
AppendHuePalette