Thema: Delphi enum-Typ und array

Einzelnen Beitrag anzeigen

Benutzerbild von p80286
p80286

Registriert seit: 28. Apr 2008
Ort: Stolberg (Rhl)
6.659 Beiträge
 
FreePascal / Lazarus
 
#1

enum-Typ und array

  Alt 10. Mai 2017, 12:35
hallo zusammen,
ich steh mir gerade selbst auf den Füßen.
Für einen Enum-Typen möchte ich auch gleich den Klartext zur Hand haben:
Delphi-Quellcode:
type
 tEVType = (EVUndef,EVAusz,EVPausch,EVProduct);

const
  cEVType:array [min(tEVType)..max(tEVType)]=('EVundef','EVAusz','EVPausch','EVProduct');

var
  myev : tEVType;

....

 writeln(cEVTYPE[myEV]);
.....
Geht das überhaupt?

Gruß
K-H
Programme gehorchen nicht Deinen Absichten sondern Deinen Anweisungen
R.E.D retired error detector
  Mit Zitat antworten Zitat