어케하다보니 되네요;;

자답입니다.


void __fastcall TForm1::Button1Click(TObject *Sender)
{
    TPanel *Pan = new TPanel(this);
    Pan->Name = "Panel1";
    Pan->Parent = Form1;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{
    AnsiString text;
    TPanel *Pan = new TPanel(this);
    Pan->Name = "Panel2";
    text = "Panel1";
    TPanel *Pan2 = NULL;
    Pan2 = dynamic_cast<TPanel *>(Form1->FindComponent(text));
    Pan->Parent = Pan2->Parent;
}
//---------------------------------------------------------------------------