type
TDirection = (North, South, East, West);

На базе типа TDirection можно объявить переменную Direction и присвоить ей значение:
var
Direction: TDirection;
begin
Direction := North;
end.

На самом деле за идентификаторами значений перечисляемого типа стоят целочисленные константы. По умолчанию, первая константа равна 0, вторая - 1 и т.д. Существует возможность явно назначить значения идентификаторам:

type
TSizeUnit = (Byte = 1, Kilobyte = 1024 * Byte, Megabyte = Kilobyte * 1024,
Gigabyte = Megabyte * 1024);