Sets the current drawing color, using the palette.
procedure SetColor(Color: Word);
SetColor(5) makes the fifth color in the palette the current drawing color. Drawing colors can range from 0 to 15, depending on the current graphics driver and current graphics mode.
GetMaxColor returns the highest valid color for the current driver and mode.
Must be in graphics mode.