Hallo alle
Danke erst einmal für die zahlreichen Antworten. Also mein Integer kann nur Werte von -1..10 annehmen (ich weiss ich hätte dafür nicht unbedingt einen Integer verwenden müssen). Mit der Lösung von NicoDE und Khabarakh hab ich's probiert und das würde gehen. Jedoch bin ich jetzt auch nicht mehr sicher ob ich das wirklich so machen soll...
Also mein Fehler war:
tMyMenge = set of(cEins,cHundert,cTausend);
statt
Delphi-Quellcode:
tMyEnum = (cEins,cHundert,cTausend);
tMySet = set of tMyEnum;
Ob ich nun CASE verwende oder doch engine's Lösung weiss ich noch nicht...
Danke und Gruss
Tom