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