懂VB和delphi的大虾请进！

Question

怎样将下列VB的语句翻译成delphi的语句？
Dim Colors(5) As Long
Colors(0) = RGB(188, 188, 65)
Colors(1) = RGB(213, 204, 187)
Colors(2) = RGB(255, 255, 65)
Colors(3) = RGB(128, 180, 128)
Colors(4) = RGB(144, 127, 97)
A = colors()

Answer 1

var
  mycolor:array[0..4] of tcolor=(RGB(188, 188, 65),RGB(213, 204, 187),RGB(255, 255, 65),RGB(128, 180, 128),RGB(144, 127, 97));用的时候就用mycolor[i],i 可以取0到4