Verwende doch eine Aufzählung:
Delphi-Quellcode:
TWert = (wNetwerk, wWLAN, wHauptspeicher, wScreenX, wScreenY); // die Aufzählung
TValues = record // Datentypen sollen immer mit T.... beginnen !
ValueFrom : string; // vielleicht sollte man hier den Prefix "Value" weglassen; zuviel Schreibarbeit
ValueFromType : string;
ValueTo : string;
ValueToType : string;
ValueSectionA : string;
ValueSectionB : string;
ValueSectionC : string;
ValueSectionD : string;
end;
TValueArray = array[wNetzwerk..wScreenX] of TValues;
var
MyValues : TValueArray;
...
MyValues[wWLAN].ValueFrom := '1 MBit';
MyValues[wWLAN].ValueTo := '54 MBit';