Области видимости в Builder part2

#pragma hdrstop
#include"vcl.h"
#include "dialogs.h"
#pragma package(smart_init)
void ramadialogs::dialogfunc()
{
TForm* ramadialog=new TForm(Form1);
ramadialog->Position=poMainFormCenter;
ramadialog->AutoSize=false;
ramadialog->ClientHeight=120;
ramadialog->ClientWidth=320;
ramadialog->Visible=true;
 //......ляляфа
ok->Height=50;
ok->Caption="готово";
ok->Visible=true;
ok->OnClick=ButtonClick;
}
void __fastcall ramadialogs::ButtonClick(TObject *Sender)
{
 delete ??? //как ему объяснить чего удалять
}

   #include"constructor.h"
#ifndef dialogsH
#define dialogsH
#endif
class ramadialogs
{public:
void dialogfunc();
void __fastcall ButtonClick(TObject *Sender);
};

void __fastcall TForm1::BitBtn1Click(TObject *Sender)
{
ramadialogs* z=new ramadialogs;
    z->dialogfunc();
}
void __fastcall ramadialogs::ButtonClick(TObject *Sender)
{
delete this;
}

void __fastcall ramadialogs::ButtonClick(TObject *Sender)
{
delete this;
}

delete this

void __fastcall ramadialogs::ButtonClick(TObject *Sender)
{
ramadialog->Close();
}

#ifndef dialogsH
#define dialogsH

TForm2 * Form2 = new TForm2(0);
try
{
    Form2->ShowModal();
}
__finally
{
    delete Form2;
}

this->Close();