20份 求一个 Panel 上动态生成拉几个 Lable ,怎么点一个钮，去掉所有 label

Question

一个 Panel 上动态生成拉几个 Lable ,怎么点一个钮，去掉所有 label

Answer 1

用tag区分，点击的tag设置为特殊的，然后遍历所有label，tag不是特殊的就delete掉

Answer 2

动态生成的时候label的name属性有规律，
如果
找到的label.name满足这个规律那么删掉

Answer 3

for i := 0 to Panel.ControlCount -1 do
  begin
    if Panel.Controls[i].ClassName = 'TLabel' then
    (Panel.Controls[i] as TLabel).free;
  end;

Answer 4

GARNETT2183(極品狼王) 
ok

Answer 5

for i := 0 to Panel.ControlCount -1 do
  begin
    if Panel.Controls[i].ClassName = 'TLabel' then
    (Panel.Controls[i] as TLabel).free;
  end;