Zitat von
Chakotay1308:
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
Ich verstehe dein Problem nicht ganz. Du deklarierst ja einen Aufzählungstyp, der nur vier Werte haben kann. Also entweder
vet_Paralellogramm,
vet_Quadrat,
vet_Trapez oder
vet_Rechteck, sonst nichts. Das kannst du ganz normal abfragen, als wären es beispielsweise Konstante:
if Eck = vet_Rechteck then Label1.Caption := 'Das Viereck ist ein Rechteck';