borrar o liberar componente TBITBTN en tiempo de ejecucion

[[egostar]]

Y si lo haces al contrario?

Código Delphi [-]
for x := ScrollBox1.ControlCount -1 downto 0 do begin
    if ScrollBox1.Controls[x] is TBITBTN then
       TBITBTN(ScrollBox1.Controls[x]).Free;
end;

Salud OS