for i:=1 to 100 do begin TEdit(FindComponent('Edit'+inttostr(i))).Text:=inttostr(i); end;
Сайт
Форум
FAQ
Соглашения
Прочее