在DELPHI中如何用控件数组，也就是label(i).caption

Question

在DELPHI中如何用控件数组，也就是label(i).caption

Answer 1

Delphi中没有真正的控件数组，不知你想实现什么功能

Answer 2

假如我有一组TIMAGE，有几十个，那我怎么去控制它呢，

Answer 3

声明
labelx:array of TLabel;
for i:=0 to 10 do begin
     labelx[i]:=TLable.create(nil);
     labelx[i].caption:='测试';
end;

Answer 4

假如你的label1....label100
for i:=1 to 100 do
TLabel(FindComponent('label'+IntToStr(i))).caption:=IntToStr(i);

Answer 5

同意 oracle_lover(数据库情人)

Answer 6

with Panel2 do
   begin
      for iLoop := 0 to ControlCount - 1 do
         if (Controls[iLoop].ClassName = 'TEdit') then
            Listbox1.Items.Add((Controls[iLoop] AS TEdit).Name+','+inttostr(iLoop))
         else if (Controls[iLoop].ClassName ='TDateTimePicker') then
           Listbox1.Items.Add((Controls[iLoop] AS TDateTimePicker).Name+','+inttostr(iLoop));   end;