обращение к имени к компонентам в цикле

← →
denis24 (2003-03-02 17:35) [0]

Подскажите пжлсб.как можно сделать сабж.?
Что то типа
for i:=0 to 10 do
form1.label+intostr(1).caption:="Hello"+intostr(i);

← →
Rouse_ © (2003-03-02 17:46) [1]

for i:=0 to 10 do TLabel(findcomponent(label+intostr(i))).caption:="Hello"+intostr(i);

Желаю успехов

← →
Rouse_ © (2003-03-02 17:47) [2]

Блин кавычки забыл

TLabel(findcomponent( "label"+intostr(i))).caption:="Hello"+intostr(i);

Желаю успехов

← →
Kair © (2003-03-02 21:37) [3]

(FindComponent("Label"+IntToStr(i)) as TLabel).Caption:="...";

← →
denis24 (2003-03-03 09:43) [4]

Эти лейблы находятся на другой форме(f2) этот код находится на f1
Правильно ли я пишу?
for i:=0 to List_of_fields .count-1 do
(FindComponent("qrlabel"+inttostr(i+1)) as TQRLabel).Caption :="hello "+intostr(i);

А в ответ вылазит ошибка "Access violetion ........"

f2.FindComponent...

обращение к имени к компонентам в цикле Найти похожие ветки