Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
18. Jun 2009
ja, sind aber "nur" 456 Bytes :roll:
und wenn du man das Array andersrum (siehe dein Code) anlegt, dann muß man erst das Array durchsuchen und so den Wert darin finden ... so könnte man aber direkt über den Wert umrechnen.
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
18. Jun 2009
ich würde das Array dann nur andersrum anlegen
TMeinTypInternal = 1..25;
cMeinTypOrdinal:*array 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;