假设命题是这样的,运行时,由代码来动态创建 10个button
具体的name caption position size等均可自己指定问题核心是
要命名一连串name比如 btn1 btn2...btnN时
这一系列应该是 可以写到for里面的八,但具体到某一个name 怎么个写法呢? 'btn'+i?
单独创建一个的话,大体是如下的样子
var
NewButton: TButton;
begin NewButton := TButton.Create( Owner );//Owner为Form或其他容器 With NewButton do
begin
//设置属性
end
end;
具体的name caption position size等均可自己指定问题核心是
要命名一连串name比如 btn1 btn2...btnN时
这一系列应该是 可以写到for里面的八,但具体到某一个name 怎么个写法呢? 'btn'+i?
单独创建一个的话,大体是如下的样子
var
NewButton: TButton;
begin NewButton := TButton.Create( Owner );//Owner为Form或其他容器 With NewButton do
begin
//设置属性
end
end;
NewButton: array [1..10] of TButton;
i: integer;
begin
for i := 1 to 10 do
begin
NewButton[i] := TButton.Cretae(Self);
NewButton[i].Name := 'Btn' + IntToStr(i);
.....
end;
end;