Variable soll nur bestimmte Werte annehmen dürfen - wie?

[Duke_2004]

Ich hab das bei mir so gemacht...

type
TFormat = (Querformat, Hochformat);

..
var
Variable:TFormat;
begin
..


Somit kann "Variable" nur die angegebenen Werte annehmen...
Korrigiert mich bitte, falls ich mich irre...