Delphi-Quellcode:
type
TSuit = (Hearts=13, Diamonds, Clubs=22, Spades);
Bei Delphi 5 ist es leider nicht möglich, die Werte bei einem Aufzählungstyp vorzugeben.
Workaround:
Delphi-Quellcode:
const
Hearts=13;
Diamonds=14;
Clubs=22;
Spades=23;
type
TSuit = Integer;
Das kann natürlich im Code weitere Änderungen nötig machen.