String fra Liste

HEj

Jeg skal String-initialisere 100 Strings. Har prøvet INI-filer men det kører a helvitica til, så jeg vil over omkring XML:

Havde tænkt mig følgende:

Jeg har t0 lister med 100 strings:

Component Liste1:
String11, string12, string13 ..... string1100 ; (List med navne på alle strings )

LISTE2:

Data11, Data12, Data13, .... data1100;  (indlægges i en TMemo eller noget lignende)

Data21 = 'String11';
Data22 = 'string12';
Data23 = 'String13',
....
Data2100 = 'string1100';

(altså liste 2 er navnene på de anvendte strings som strings )

Liste 3
'hugo', 'børge', 'frederik' .... 'jens';


Det jeg ønsker at kunne konvertere disse STRING-navne fra Liste2 til en aktiv String (med length, Uppercase .. osv)

altså noget lignende:

Component(List21[I].Items)2String := := Liste3[I];

Teksten(String21) omformes til en AKTIV string med navn String21 med teksten Liste3(i);

Efter kørslen vil String21 indeholde 'hugo' hvis I = 1;

(da der er 100 styk må det kunne laves maskinelt (fremfor jeg laver 100 styk linie-kopieringer.... !)

Kristian