А вот... заработало вот так.
создаем массив указателей:
pLabels: array[1..20] of ^TLabel;
Потом инициализируем их:
pLabels[1] := @label1;
pLabels[2] := @label2;
...
pLabels[20] := @label20;
А потом уже в цикле обращаемся
for i:=1 to 20 do
plabels[i]^.Caption:='text';
Изврат? Или нормально?
|