Обращаться к объекту не по neme

[Paskal1]

Приветствую !
Ребят очень нужно
нужно обращаться к объекту не по neme а както по id для того чтоб в цикле можно было менять объет и его параметры.
типо такого

FOR I:=1 to 2500 do
ObjectLabel[I].caption:=myArrey[i];

2500 тыс. объектов каждый описывать не охота.
Заранее спс.

[WinCoder]

var
  ObjectLabel: Array of TObjectLabel;

[Paskal1]

Оооо Огромное спасибо.
Свой бок понял - исправлюсь .
Еще раз спасибо

[Paskal1]

Если есть объекты ('Label1'...'Label10) типа TLabel(к примеру) то

 var
   i : integer; // для цикла
   obj : TLabel; // будем хранить объект 
 begin
  For i := 1 to 10 do
   begin
    obj := FindComponent('Label'+inttostr(i)) as TLabel; // находим и пихаем его в obj (т.к. объект возвращается с неявным типом надо его указать как (as) TLabel
    a.Caption := inttostr(i); // присваиваем caption 
  end;
 end;

[Stilet]

a.Caption

А чего не obj?

[Человек_Борща]

А чего не obj?

псевдо-код же.

[саша40]

обращайся тогда по указателю объекта через приведение типов.

[Stilet]

псевдо-код же.

А-а-а... Ясно.

[Аватар]

Есть свойства-массивы Components и Controls.

2500 тыс. объектов

Ужос