[ecfisa]

Hola Gustavo.

Creo que podés echar mano de la función GetParentComponent.

Te pongo un ejemplo de uso teniendo a 'Panel1' con varios componentes dentro:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  i: Integer;
begin
  Caption:= '';
  for i:= ComponentCount - 1 downto 0 do
   if Components[i].GetParentComponent.Name = 'Panel1' then
    Caption:= Caption +' '+ Components[i].ClassName;
end;

Saludos.