Ayuda con ControlCount

[Neftali [Germán.Estévez]]

Utiliza TAG's en tus mensajes, se leen mejor (compara tu código con el mío):

Modifica el código y cambialo por éste:

Código Delphi [-]
  
  // comprueba que el sender es un TPanel, si no vas a tener problemas...
  if not (Sender is TPanel) then
    Exit;
  
  // relizamos la cuenta en orden inverso
  for I:= ((sender as TPanel).ControlCount - 1) downto 0 do
    If (sender as TPanel).Controls[i].Name[1]='B' then
                    (sender as TPanel).Controls[i].free;