Registriert seit: 1. Jan 2009
Ort: Kenzingen, Südbaden
99 Beiträge
Delphi 10.4 Sydney
|
AW: Verwendung von Aufzählungstypen
16. Feb 2011, 08:30
Tut mir leid, dass ich das gestern zu ungenau ausgedrückt habe. Es soll die Häufigkeit des Auftretens von Mitgliedern der Kategorien A, B etc. herausgefunden werden.
KategorieA
- Unterkategorie Aa
- Unterkategorie Ab
- Unterkategorie Ac
...
KategorieB
- Unterkategorie Ba
- Unterkategorie Bb
- Unterkategorie Bc
...
Tritt also Unterkategorie Ba auf, soll die Häufigkeit der Kategorie B um 1 erhöht werden usw.
Lösen wollte ich so:
type TUnterA = (Unterkategorie Aa, Unterkategorie Ab, Unterkategorie Ac);
type TUnterB = (Unterkategorie Ba, Unterkategorie Bb, Unterkategorie Bc);
.
.
case KatString of
Unterkategorie Aa, Unterkategorie Ab… : Inc(Häufigkeit KategorieA);
Unterkategorie Ba, Unterkategorie Bb… : Inc(Häufigkeit KategorieB);
@Sir Rufo
GetEnumValue war mir noch nicht bekannt. Die Anzahl der möglichen Kombinationen ist übrigens bekannt.
Ich möchte einfach eine unübersichtliche If...then-Orgie vermeiden.
Ich hoffe, es ist jetzt klarer.
Oswald
|