控制控件名称问题

[wslmsx]

比如在一个窗体上有10个LABEL和1个BUTTON，LABEL分别叫做LABEL1,LABEL2...LABEL10。
我想点BUTTON，让这10个LABEL的CAPTION分别为1,2...10.
方法1：LABEL1.caption:=1;LABEL2.caption:=2;...LABEL10.caption:=10;
方法2：定义一个数组，jlabel:array[1..10] of tlabel;
然后jlabel[1]:=label1;jlabel[2]:=label2;...jlabel[10]:=label10;
这样的话以后就可以用数组来操作这些label。
如此问题，可以
for i:=1 to 10 do
jlabel[i].caption:=i;
如果程序中有很多个BUTTON，需要对这10个LABEL的CAPTION做不同的定义，肯定方法2要好于方法1.
现在的问题是，方法2能不能改进一下。因为方法2中也定义了jlabel数组，并且有给这个数组赋LABEL的过程。能否不定义这个数组，直接用其他方法来操作这些label.
如 label(i).caption:=i
或者 label'i'.caption:=i
或者 label“i”.caption:=i
或者 label<i>.caption:=i
也就是可以省去定义数组的过程。

[wslmsx]

请各位帮忙解答谢谢！

[dinoalex]

findcomponent

[wslmsx]

谢谢！具体怎么用呢，能举个例子么？

[dinoalex]

(findcomponent('label'+inttostr(i)) as tlabel).caption 手写,应该没错

[wslmsx]

解决了，谢谢！