动态生成控件,很急啊!大家救命!
请先看下面两段代码:
1
var
checkbox:TcheckBox;
begin
CheckBox:=TcheckBox.create(self);
CheckBox.parent:=form1;
CheckBox.left:=100;
CheckBox.top:=checkBox.top-10;
end;
该代码运行可以生成一个checkbox;
2
i:integer;
checkbox: array of TcheckBox;
begin
for i:=0 to 10 do
CheckBox[i]:=TcheckBox.create(self);
CheckBox[i].parent:=form1;
CheckBox[i].left:=100;
CheckBox[i].Top:=300;
CheckBox[i].top:=checkBox[i].top-10;
end;
该底码运行出错“Access Violation at address 0044DC22 in module 'project.exe' write of address 00000003”
请问我可以定义array of TcheckBox吗?