Does anyone know of a cool way to enumerate all of the members of Color?

So, for example, a routine that would display:

AntiqueWhite [ ]
Aqua [ ]
...
YellowGreen [ ]

Where the contents of the [ ] has a background colour matching the Color member?