Im Array besonders schnell suchen???

[himitsu]

ich würde das Array dann nur andersrum anlegen

Delphi-Quellcode:

TMeinTypInternal = 1..25;
cMeinTypOrdinal:*array[0..455] of TMeinTyp
   = (0,1,0,0,0,0,0,...,0,0,0,2,0,...,0,3,...25);
//      ^1                    ^15       ^35  ^455
TMeinTyp = Set of TMeinTypInternal;

in cMeinTypOrdinal müssen dann nur an den entsprechenden Stellen (entsprechend der Zahlen seiner Varianten) durchnummeriert die Werte des Sets stehen

und dann
if cMeinTypOrdinal[zahl] in cMeinTyp then