Как подставить значение переменной

[sodd]

Вообщем такая ситуация:
for i:=1 to 3 do
item вставить переменную i :=listbox вставить переменную i .ItemIndex;

Подскажите как можно вставить значение переменной между слово, в конце слова ?

[Lokos]

вам нужен перебор 3-х компонентов ListBox ?
Например так

for i:=0 to ComponentCount-1 do

if Components[i] is TListBox then

EditArray[ TListBox(Components[i]).Tag]:= TListBox(Components[i]).ItemIndex;

[sodd]

А существуют ещё какие-нить методы? Просто у меня на форме три компонента listbox . Так вот я хочу для начала записать в массив item[i] значение свойства .ItemIndex каждого компонента..