case mit einem in einem String gespeicherten Variablennamen

[stho]

warum machst du keine Function draus?
Als eingabewert kannst du ja einen Integer nehmen und als ausgabe TColor hoffe ich hab dich richtig verstanden ^^