1type
2  XlPageOrientation = (xlPortrait = 1, xlLandscape = 2);

Или

1type
2  XlPageOrientation = TOleEnum;
3const
4  xlPortrait = $00000001;
5  xlLandscape = $00000002;

Элементы перечисления:

Имя	Значение	Назначение
xlPortrait	1
xlLandscape	2