不明容器panel中有多少控件,能全部清除吗?如何清除呢?
解决方案 »
- 关于delphi中的panel面板
- 数据库断开后如何退出系统?
- 在FastReport中怎么判断是否已打印
- 为什么dbgrid标题不能显示汉字??
- 寻求简单问题解答:我想检查edit控件中edit.text输入的值是否为合法的datetime类型值?该怎么办?
- 分布式技术的小问题.
- 继续报表打印的问题,高手请进来,分数好说啊!!!
- 谁有Delphi6/7 下快速开发MIS/MRP/ERP程序控件及基类 ?有意购买
- 真是见鬼了!!!用Tprinter竟然打不出表格线来!!!
- 请问各路大虾,可不可以把从DBGRID里面统计的数据显示在Label、DBLabel或Edit里?
- 在Delphi中动态创建控件并处理添加事件处理
- 三层数据库 多用户访问问题
依次free掉 呵呵 www.coderpub.com
i:Integer;
begin
i:= Panel1.ControlCount;
while Panel1.ControlCount >0 do begin
Panel1.Controls[i-1].Free;
i:=i-1;
end;
i:Integer;
begin
for i:=Panel1.ControlCount downto 0 do
Panel1.Controls[i].Free;要注意顺序
var
i:Integer;
begin
for i:=Panel1.ControlCount-1 downto 0 do
Panel1.Controls[i].Free;
在panel中创建Button然后执行Button 的 onclick事件,接着释放Button
如果不点击Button事件,则释放无问题,如点击后则不成,会出现错误,百思不得其解!!
可以隐藏他啊。
或者在接下去的步骤释放他。
这样这样,先创建A,点A,隐藏A。再创建B,点B,隐藏B释放A…………就这样。
具体怎么写,应该会吧。
创建第一个的时候做一下判断就可以了。