yeah, that would give you
bmiColors.rgbBlue[0]
to
bmiColors.rgbBlue[255]
You want
Type RGBQUAD
Field rgbBlue:Byte
Field rgbGreen:Byte
Field rgbRed:Byte
Field rgbReserved:Byte
End Type
Global bmiColors:RGBQUAD[] = New RGBQUAD[256]
note the extra pair of square brackets after RGBQUAD. There are 256 entries in the palette, not 255.
You could also do
Global bmiColors:RGBQUAD[256]
Jim