请问如何在设计时建立控件数组？

Question

你可以先定义：
lblName: array[1..100] of TLabel；
在使用的时候进行分配：
lblName[i] := TLabel.Create(Self);
lblName[i].Parent := Self;
等等。

Answer 1

var  
    I:  Integer;  
    vComponent:  TComponent;  
begin  
    for  I  :=  1  to  10  do  begin  
        vComponent  :=  FindComponent('Label'  +  IntToStr(I));  
        if  Assigned(vComponent)  then  
            TLabel(vComponent).Caption  :=  '试试看';  
    end;  
end;

Answer 2

var Buttons : array of TButton;
begin
  setlength(Buttons, 10)
  for i:=1 to 10 do
  begin
    Buttons[i-1] := Tbutton.Create(Form1);
    Buttons[i-1].Name := 'Button_' + IntToStr(i);
    Buttons[i-1].Caption := '....';
   .
   .
   .
  end

Answer 3

既然VB都能，我想DELPHI也能吧，只是我不会……