Making new types

[Killerdou]

how would i make a new type that consists of different characters but not all and only one(so not an array like strings) so for example it could have the following values : T(rue) F(alse) M(aybe)

[SKy Scripter]

Like....


type
TBoolean = (True, False, Maybe);

var
TypeBoolean : TBoolean;

begin
TypeBoolean := Maybe;

end.