Index von "Datentypen"

[haentschman]

Hallo alle miteinander... :hi:

gegeben (vereinfacht, gekürzt):

Delphi-Quellcode:

DataState = (dsNormal,dsNew,dsEdit,dsModified,dsDeleted,dsUnknown);
.
.
// irgendeine Klasse
property State: DataState read FState write FState;

... nun enthält ein Object als State den Wert dsModified.

Da ich diesen Wert in der DB ablegen möchte dachte ich an den Index. Vorwärts gehts ja leicht

Delphi-Quellcode:

DataState(aIndex)

und wie geht es Rückwärts ? :gruebel:

Bitte um Stichworte oder bessere Ideen als den Index... Danke

[blauweiss]

Zitat:

Zitat von haentschman (Beitrag 1145834)

und wie geht es Rückwärts ? :gruebel:

mit ord(State) ?

Gruss,
blauweiss

[haentschman]

8-) genau so... Danke

[himitsu]

Ord ist einfacher, aber man kann auch direkt einen anderen gewünschten ordinalen Typen verwenden.
Muß dabei aber auf die Größe achten.

SizeOf(MyEnumType) = SizeOf(MyOrdinalType)

Hier also Byte, da weniger als 256 Werte (bei einem Set weniger als 8 Werte).