K
kmchen
Unregistered / Unconfirmed
GUEST, unregistred user!
写了一程序，按按键后自动生成100个textbox分别在4个panel里。但运行时只能生成20个，不解，请指教，谢谢。
源程序如下：
for i:= 0 to 99do
begin
mm:=TextBox.Create;
mm.ID:='textbox'+inttostr(i);
mm.Text:=inttostr(i);
case i mod 5 of
0,2,4:mm.Width:=29;
1,3:mm.Width:=21;
end;
case i div 5 of
0
anel1.Controls.Add(mm);
1anel2.Controls.Add(mm);
2anel3.Controls.Add(mm);
3anel4.Controls.Add(mm);
end;
end;
也可直接msn我。Email:ChenHaibin@msn.com
源程序如下：
for i:= 0 to 99do
begin
mm:=TextBox.Create;
mm.ID:='textbox'+inttostr(i);
mm.Text:=inttostr(i);
case i mod 5 of
0,2,4:mm.Width:=29;
1,3:mm.Width:=21;
end;
case i div 5 of
0
anel1.Controls.Add(mm);1
anel2.Controls.Add(mm);2
anel3.Controls.Add(mm);3
anel4.Controls.Add(mm);end;
end;
也可直接msn我。Email:ChenHaibin@msn.com