Der Aufzählungstyp ist Teil eines Records, der für einen Array genutzt wird. So ungefähr sieht oder soll es aussehen.
Delphi-Quellcode:
type
TZeit=(1.0,2.1.,5.0,12.3);
TPNummer=integer;
....
TPersonal = record
Arbeitszeit: Zeit;
Mitarbeiter: integer;
...
TPKarte = array[1..100] of TPersonal;
var
Personal:TPKarte;