void __fastcall TForm1::Button(TObject *Sender)
{
    TButton *btn = (TButton*)Sender;
    TForm *frm = (TForm*)btn->Parent;
    frm->Tile();
    frm->Close();
}

----> 해당 버튼에 Parent로 Form를 지정하셨으니 이렇게 하시면 될겁니다.