ColorPalette.Add (gb.form)
Sub Add ( Color As Integer )
Insert the
Color color at the end of the palette.
If the color was already present, it is moved at the end of the list.
If there is more than 32 colors in the palette, the surplus colors are removed.