ImageEn, unit hyieutils

TImageEnPaletteDialog.SetPalette

TImageEnPaletteDialog.SetPalette


Declaration

procedure SetPalette(var Palette: array of TRGB; NumCol: integer);


Description

Sets palette to show in the dialog.


Example

var
  palDlg: TImageEnPaletteDialog;
Begin
  palDlg := TImageEnPaletteDialog.Create(self);
  palDlg.SetPalette(ImageEnView1.IO.Params.ColorMap^, ImageEnView1.IO.Params.ColorMapCount);
  if palDlg.Execute then
    Panel1.Color := palDlg.SelCol;
  palDlg.free;
End;


See Also

◼CreateRGB
◼TRGB2TColor
◼TColor2TRGB