En el codigo que pones:
Código Delphi
[-]
try
if (Components[i] is TPanel) then
RemoveComponent(components[i])
except
end;
El código sigue justo después de el "end", es decir la siguiente instrucción, justo lo que pedías. Esto me hace pensar que ese no es exactamente el código que estas usando, es mas, creo que estas usando algún tipo de bucle, y es ahí donde puede estar el error. Así que porque no pones el código completo