できますた。

var i:TColor
for i:=low(TColor) to High(TColor) do

なんの役にたつかは知らんが。