Как программно указать номер компонента?

[Demon315]

Добрый день. Подскажите пожалуйста, не могу понять, как в программе указать номер компонента. Например, на форме у меня 10 компонентов Panel, то есть Panel1, Panel2, ... , Panel10. В процессе выполнения программы мне нужно менять свойство caption любого из этих компонентов. В программе фигурирует целочисленная переменная n, которая и будет равна номеру компонента. То есть простейшая запись того, о чём я говорю:

Panel(n).Caption:='текст';

Само собой разумеется программа такую запись не примет.

[eval]

if n = 10 then Panel10.Caption := 'sxdvasd';

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

используйте свойство Tag компонент.

[Demon315]

Сообщение от eval

if n = 10 then Panel10.Caption := 'sxdvasd';

Спасибо, действительно о таком простом способе я что-то не додумался. Для моей программы этот способ подойдёт. А других способов не существует? Если например в программе будет слишком большое число компонентов, и не выгодно столько же раз прописывать условие if.

Но в любом случае этот вариант меня устроит, ещё раз спасибо.

[eval]

других способов куча, начиная от того что предложил Человек_Борща и до всяких реализаций новомодных патернов и т.п. штук-дрюк

[Toxa]

var
c : tcomponent;
p : tpanel;
i : integer;
begin
i := 10;
c := findcomponent('panel'+inttostr(i));
if assigned(c) then
 p := (c as tpanel);
p.caption := 'this is panel'+inttostr(i);
end;

[Stilet]

Как по мне: Загнать все панели в TComponentList и уже к нему обращаться как к массиву.

[Demon315]

Toxa, это именно то, что нужно!