Присвоение текста в цикле

[AvaMight]

Извеняюсь если название темы не очем не говорит но не знал как еще назвать


В общем задача такова есть к примеру 5 компонентов Edit. Необходимо в цикле присвоить каждому из них текст что то типо такого :
For i=1 to 5
Edit[i].text="i"
Next i

Естественно так оно не работает.В общем помогите

п.с Думаю нужно как както создать массив едитов для корректонсти записи Edit[i], но как не знаю.

[Stilet]

var i:integer;
begin
 for i:=0 to Controlcount-1 do
  if Controls[i] is TEdit then TEdit(Controls[i]).Text:='w';
end;

[AvaMight]

Я не сомневаюсь что Stilet написал правильное решение но есть есть загвоздка:
Программу я пишу VB 6.0.
Впринципы с програмированием на делфи знаком на начальном уровне и этого хватает чтобы перевести код с языка на язык.Но сейчас мне это не под силу(интернет тоже не помог( как я понял тут все дело в Controls , аналога каторого для VB я не нашел)).Поэтому так как раздале непосредственно для Vb я тут не нашел просьба если кто знает как это реализовать на Vb написать решение или дать подсказку в правильном направлении...Если же нельзя откланятся от Delphi в данном разделе то тему можно закрыть