说明: 动态创建控件的原程序,共给大家学习. case commandstr of 0:begin i1:=i; btn[i1]:=TButton.Create(Self); btn[i1].Parent:=form2; btn[i1].Visible:=false; btn[i1].Name:='btn'+inttostr(i1); btn[i1].Left:=Lefta; btn[i1].Width:=widtha; btn[i1].top:=topa; btn[i1].Height:=heigh
<y9a1981> 上传 | 大小:775kb