Das mit der function hatte ich schon überlegt. Hoffe aber, dass es etwas Neues gibt, was Ich noch nicht kannte.
Vielen Dank für die Hilfe. Für meine Belange habe ich es erst einmal so gemacht:
Delphi-Quellcode:
x := 0;
varx[doInc(x)].a := 'Bla 1'; //x = 1
varx[x].b := 'Bla 1 b';
inc(x,1);
varx[doInc(x)].a := 'Bla 2'; //x = 2
Macht es etwas einfacher.
LG