For-Schleife in Tabelle

[Luckner]

Hallo, ich schreibe hier mal kurz ein Bespiel auf, was nicht funktioniert aber möglicherweise meine Absicht besser erklärt.

Delphi-Quellcode:

       for i := 1 to StrToInt(ComboBoxNumerierungAnzahl.Text) do
         begin
           oEdit := FindComponent('ComboBoxNummerierung' + IntToStr(i)) as TJvValidateEdit;
           oEdit.Text := DataModuleArtikel.ArtikelreferenzNUMMERIERUNG(i).AsString;
           i := i +1;
         end;

DataModuleArtikel.ArtikelreferenzNUMMERIERUNG(i) funktioniert nicht, aber wie könnte man das Lösen. Würde mir menge Programmzeilen ersparren.

Danke, Luckner