Eigener Datentyp und nur bestimmte Werte

[Keks]

Wahrscheinlich sind das absolute Grundlagen, aber ich bin bislang irgendwie drumherumgekommen, denke aber nun, dass das häufig sinnvoll wäre, deshalb hoffe ich hier auf Hilfe...

Ich möchte eine eigene Prozedur beispielsweise so aufrufen:

Delphi-Quellcode:

myProcedure(tnKatze);
//[...]
procedure myProcedure(meinTier : TTierName);
begin
  if meinTier = tnHund then
  //..
  else if meinTier = tnKatze then
  //..
end;

Ich muss ja dann TTierName als Datentyp deklarieren. Aber wie lege ich dann die möglichen Werte (tnHund, tnKatze, ...) fest?

Sollte ja machbar sein, oder? Bitte ein kurzes Beispiel wie das geht. Danke!