Array oder wie kann ich es ablegen ?

[Bernd Nowak]

Hallo,
habe viele Verweise gefunden aber nix was annährend das Thema beinhaltete, das ich suche. Also frage ich mal lieber die Gurus hier.

Ich habe eine Zuweisung von 16 Farben, die ein Programm in den Werten 0 - 16 erwartet. In Delphi habe ich die entsprechenden Farbwerte (im Hex Format). Dies ist eine statische Zuordnung also immer gleich.

Habe jetzt eine Krücke in diesem Format mit 2 Arrays:

Delphi-Quellcode:

  ColorsHex: array[0..15] of String = (
    '000000', //black
    '00286B', //blue dark
    '2169A5', //blue light
    '39459C', //blue medium
    '9C7139', //gold
    '7B7D7B', //grey light
    '101010', //grey medium
    '104508', //green dark
    '428A39', //green light
    '6B3C6B', //lavender
    'BD2000', //orange
    'A5417B', //pink
    '734194', //purple
    'A51818', //red
    'C6CBD6', //white
    'CEBA00'  //yellow
    );
  ColorsName: array[0..15] of String = (
    'Black',
    'Blue Dark',
    'Blue Light',
    'Blue Medium',
    'Gold',
    'Gray Light',
    'Gray Medium',
    'Green Dark',
    'Green Light',
    'Lavender',
    'Orange',
    'Pink',
    'Purple',
    'Red',
    'White',
    'Yellow'
    );

Da die Namen direkt zu den Farbwerten gecodet werden (Programm Zuordnung über Array Index 0 - 15) wäre ein Array oder was auch immer natürlich schöner aber weiss nicht wie