enum (перечисление)

Кто-нибудь разбираеться с перечислениями enum?
Расскажите, пожалуйста, по подробнее, что там к чему.

В исходнике, с которым я хочу разобраться, есть enum и меня интересует, во что и как я могу преобразовать.

Enum - это пользовательский тип данных, в определении которого явно перечисляются все возможные значения. Перечисление может быть в явном виде:

Код:


ENUM TDayOfWeek
mon
tue
wed
thu
fri
sat
sun
END ENUM


либо в виде констант:

Код:


ENUM TColor
Red = 1
Green = 2
Blue = 3


Различия этих объявлений только в том, что в первом случае значениям будут сопоствленны целые числа в порядке перечисления (1, 2, 3 и т.д.), а во втором - конкретные значения, выбранные программистом.
После объявления перечисляемого типа можно обычным образом объявлять переменные:

Код:

DIM AS TDayOfWeek ThisDay, LastDay
DIM rgb AS TColor


и пользоваться ими обычным образом, помня, что переменная может принимать только значения, перечисленные в объявлении типа:

Код:


ThisDay = wed
INPUT LastDay
IF LastDay > ThisDay THEN PRINT "Ошибка, прошедший день должен бытт меньше текущего"
SELECT CASE LastDay
CASE mon
CASE tue
END SELECT
ThisDay = LastDay + 1
PRINT ThisDay


Так как перечисляемые значения фактически являются именованными константами, следующие выражения эквивалентны:
ThisDay = wed и ThisDay = 3
rgb = Green и rgb = 2
Соотвественно, переменными перечисляемого типа можно пользоваться как обычными переменными типа INTEGER в рамках области перечисленных целочисленных значений.

Респект! Понял. Всё элементарно.