delphi 如何关闭动态创建的panel?
当时创建的程序为fori:=0toform6.ListBox2.Count-1dobeginP:=Tpanel.create(form2.Panel2);p.Parent...
当时创建的程序为
for i:=0 to form6.ListBox2 .Count-1 do begin
P:=Tpanel.create(form2.Panel2 );
p.Parent :=panel2;
p.Name :='panel'+inttostr(i+10);
p.Caption :='';
p.Left:=5+337*i;
p.Top :=2 ;
p.Width :=337 ;
p.Height :=225 ;
现在请问我要用一个按键来关闭它们,请问该怎么做 展开
for i:=0 to form6.ListBox2 .Count-1 do begin
P:=Tpanel.create(form2.Panel2 );
p.Parent :=panel2;
p.Name :='panel'+inttostr(i+10);
p.Caption :='';
p.Left:=5+337*i;
p.Top :=2 ;
p.Width :=337 ;
p.Height :=225 ;
现在请问我要用一个按键来关闭它们,请问该怎么做 展开
4个回答
展开全部
你可以建立一个数组保存你建立的panel的name,释放的时候,想释放哪个按保存的序号释放就OK了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
将其free掉就可以了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
P.free; 即可。
追问
但是如果我创建的多个呢?都用P.free么?
刚才我用你的办法,只关闭了其中一个;
追答
你需要在循环外建立一个tpanle共用数组控件数组,
在循环里创建,然后在另一个按键相应函数里用一个循环释放。
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询