Typen-Problem

[CalganX]

Hi,
ich weiß nicht, wie ich das in einem Wort fassen kann...
Naja, zumindest habe ich folgenden Typ:

Delphi-Quellcode:

type
  TVierEckTyp = (vet_Parallelogramm, vet_Quadrat, vet_Trapez, vet_Rechteck);

Nun wird während der Laufzeit die Variable VTyp vom Typ TVierEckType gesetzt. Das Problem: am Ende soll im Label LabelErg das Ergebnis stehen. Beispiel:

Wenn das Viereck ein Rechteck ist (also VTyp ist dann vet_Rechteck), dann soll im Label stehen:

Zitat:

Das Viereck ist ein Rechteck

Wie kann ich das so machen, dass ich also nur den "hinteren" Teil bekomme?

Chris