Procedure GetPalette (Var Palette : PaletteType) ;
GetPalette returns in Palette the current palette.
None.
GetPaletteSize, SetPalette