Перечисления в Delphi (аналог enum)

Освежал память про перечисления в Delphi

Помогла статья

http://www.delphibasics.co.uk/Article.asp?Name=Sets