Du kannst doch auch einer Variable bei der Definition einen Wert zuweisen:
Delphi-Quellcode:
tclass=class
var
rarity:integer=400;
color:tcolor=clgray;
end;
oder doch nicht...
Jetzt hab ich es gerade getestet...
aber ein Konstanten-Array ginge:
Delphi-Quellcode:
type
trune=class
rarity:integer;
color:tcolor;
end;
const
runen=array[1..300] of trune =
(rarity=1;color=clblack,
rarity=2;color=clred,
rarity=1390;color=$ABCDEF,
...
);