Apagar TLabels de um TPanel em tempo de execução

Delphi

23/04/2015

Tenho um programa que em tempo de execução, criar alguns TLabels em um TPanel para exibição dos resultados, existe algum codigo que possar ser inserido num onClick de uma Botão para Limpar, que apage tudo que seje criado nesse TPanel sem precisar referenciar cada TLabel individualmente para exclusão? isso é possivel?
Novice Php

Novice Php

Curtidas 0

Melhor post

Renato Rubinho

Renato Rubinho

24/04/2015

Buenas,

Apagar tudo que seja criado num único comando não conheço, mas você pode fazer um loop para os objetos de dentro do panel.

for i:=Panel1.Componentcount - 1 downto 0 do
  if Panel1.Components[i] is TLabel then
    FreeAndNil(TLabel(Panel1.Components));
GOSTEI 1

Mais Respostas

Novice Php

Novice Php

23/04/2015

Obrigado rrubinho!
GOSTEI 0
POSTAR