for (100)          // 100번 생성입니다.
{
TForm *f;
TLabel *l;
TButton *b;
f=new TForm(this);
l=new TLabel(this);
    b=new TButton(this);
    f->Top=random(800);
    f->Left=random(1000);
    f->Width=169;
    f->Height=128;
    f->Caption="사랑해♡";
    l->Caption="사랑해♡";
    l->Width=57;
    l->Left=16;
    l->Height=13;
    l->Top=24;
    l->Parent=f;
    b->Caption="확인";
    b->Parent=f;
    b->Left=48;
    b->Top=56;
    b->Left=48;
    b->OnClick=Button;
    f->Show();
}

이렇게 동적으로 폼을 생성 하고

그 폼에 버튼이 달려 있어서 그 버튼을 누르면 해당 폼이 꺼지는거죠

근데 안대내요

마지막에 나온것만 꺼지고 ㅎ

어떻게 해주면 될지..

아
  void __fastcall Button(TObject *Sender);

void __fastcall TForm1::Button(TObject *Sender)
{
    f->Close();
}

이거 해줬습니다.

해결좀..