如果想动态生成的话,可以参考以下代码: var myButton: array[1..5] of TButton;... for i:=1 to 5 do begin //或者用with myButton[i] do myButton[i]:=TButton.Create; myButton[i].Left:=10+i*80; myButton[i].Top:= 10; myButton[i].Height:=30; myButton[i].Width:=60; myButton[i].Caption:=Format('Button%d',[i]); myButton[i].Parent:=Form1; myButton[i].OnClick:=myClick; //处理过程 end; ...
设置属性不用解释了吧
var
myButton: array[1..5] of TButton;...
for i:=1 to 5 do
begin //或者用with myButton[i] do
myButton[i]:=TButton.Create;
myButton[i].Left:=10+i*80;
myButton[i].Top:= 10;
myButton[i].Height:=30;
myButton[i].Width:=60;
myButton[i].Caption:=Format('Button%d',[i]);
myButton[i].Parent:=Form1;
myButton[i].OnClick:=myClick; //处理过程
end;
...