ImageEn, unit iexColorPalette |
|
TIEColorPalette
Properties · Methods · Events · Demos · Examples
Declaration
TIEColorPalette = class(TCustomControl);
Description
TIEColorPalette displays a color palette and allows selection of a specific color.
Note: You can use
clTransparent to include a transparent/alpha value
| Demos\Other\ColorPalette\ColorPalette.dpr |
| Demos\ImageAnalysis\Palette\Palette.dpr |
// Display a color set
ColorPalette1.Colors.text := 'clRed' + #13#10 +
'clYellow' + #13#10 +
'clBlue' + #13#10 +
'clWhite' + #13#10 +
'clBlack' + #13#10 +
'clGray';
// Display colors of an image
ImageEnView1.IO.LoadFromFile( 'C:\Image.jpeg' );
// Convert to 8bit Palette for display
if ImageEnView1.IEBitmap.PixelFormat <> ie8p then
ImageEnView1.IEBitmap.PixelFormat := ie8p;
IEColorPalette1.AssignPalette( ImageEnView1 );
DisplayColor SetSelectionOtherEvents