No puedo matar los componentes

[ilichhernandez]

Despues de 10 horas de trabajo en dia domingo.....uffffff, avanzo pero con algunas dudas..... espero que sea la ultima del dia.....
Resulta que creo varios componentes tlabel en tiempo de ejecucion , pero no puedo eliminarlos despues, he revisado 5 o 6 hilos con temas similares ( asi que disculpad las molestias) pero que no me queda claro......(tal vez sea el sueño)..... pero bueno hay que seguir...... gracias por el tiempo que dedican amigos......

Código Delphi [-]
procedure Tform_comparacion.cxButton2Click(Sender: TObject);
Var
n:Integer;
begin
  for n:=0 to Form_comparacion.ComponentCount -1  do
  begin

    if ((Components[n] is Tlabel) and ((Components[n].tag = 5)or(Components[n].Tag = 4))) then
    Tlabel(Components[n]).Free;
  end;   
form_comparacion.Close;
end;

ilich hernandez.