| Class TColorPalette (unit ColorPalette) |
TComponent
| Constructors |
constructor Create( AOwner: TComponent );| Functions |
procedure Assign( Source: TPersistent );
destructor Destroy;
procedure Refresh;
function GetPaletteEntry( n: byte ): TPaletteEntry;
function IsIdentityPalette: boolean;
procedure Loaded;
procedure SetBadEntry( str: TStrings );
procedure SetEntries( str: TStrings );
procedure SetFlag( f: TPalEntryFlag );
procedure SetImage( im: TImage );
procedure SetPaletteEntry( n: byte; pal: TPaletteEntry );
procedure PaletteEntriesToStrings;
procedure SetPaletteHandle( bStoreStrings: boolean );| Properties |
property BadEntries : TStrings
property IdentityPalette : boolean
property ImagePalette : TImage
property PalEntryFlag : TPalEntryFlag
property PaletteEntries : TStrings
property Palette : HPALETTE
property PaletteEntry : TPaletteEntry| Events |
| Variables |
bDummy : boolean;
bEntries : boolean;
FBadEntries : TStrings;
FEntries : TStrings;
FFlag : TPalEntryFlag;
FFlag_ : byte;
FImage : TImage;
FPalette : HPALETTE;
nDummy : integer;
pal : TPAL;| Constructors |
constructor Create( AOwner: TComponent );| Functions |
procedure Assign( Source: TPersistent );
destructor Destroy;Fill the rest of the entries with grayscale
procedure Refresh;
function GetPaletteEntry( n: byte ): TPaletteEntry;
function IsIdentityPalette: boolean;************************************************** Check the middle 236 colors against the first 10 system colors.
procedure Loaded;
procedure SetBadEntry( str: TStrings );
procedure SetEntries( str: TStrings );************************************************** The user has modified the string list!
procedure SetFlag( f: TPalEntryFlag );
procedure SetImage( im: TImage );************************************************** Set the palette entries based on the TImage component
procedure SetPaletteEntry( n: byte; pal: TPaletteEntry );
procedure PaletteEntriesToStrings;
procedure SetPaletteHandle( bStoreStrings: boolean );| Properties |
property BadEntries : TStrings
property IdentityPalette : boolean
property ImagePalette : TImage
property PalEntryFlag : TPalEntryFlag
property PaletteEntries : TStrings
property Palette : HPALETTE
property PaletteEntry : TPaletteEntry| Events |
| Variables |
bDummy : boolean;
bEntries : boolean;
FBadEntries : TStrings;
FEntries : TStrings;
FFlag : TPalEntryFlag;
FFlag_ : byte;
FImage : TImage;
FPalette : HPALETTE;
nDummy : integer;
pal : TPAL;