[pascal]
const Colors : array [1..6] of TColorVector = (
{clrCoral} (1, 0.498039, 0.0, 1),
{clrScarlet} (0.55, 0.09, 0.09, 1),
{clrSeagreen} (0.137255, 0.556863, 0.419608, 1),
{clrSlateBlue} (0, 0.498039, 1, 1),
{clrTurquise} (0.678431, 0.917647, 0.917647, 1),
{clrCornFlowerBlue} (0.258824, 0.258824, 0.435294, 1));
[/pascal]

It needs to be TColorVector.

For the other part, GLShape[] was of type TDodecahedron, and should be of type TGLBaseSceneObject.[/code]