Создание MainForm после успешной авторизации

void __fastcall TAuthForm::Button1Click(TObject *Sender)
{
if (correctinfo) {
MainForm= new TMainForm(this);
MainForm->Show();
                    }
}

__fastcall TMainForm::TMainForm(TComponent* Owner)
    : TForm(Owner)
{
MainForm->ADOQuery1->FieldByName("id")->Visible=false;
 
for(int i=1890; i<2011; i++){
MainForm->ComboBox1->Items->Add(i);
}
for(int j=1890; j<2011; j++){
MainForm->ComboBox2->Items->Add(j);
}
}

MainForm->ComboBox1->Items->Add(i);

class TMainForm : public TForm
{
__published:    // IDE-managed Components
        .....
    TADOQuery *ADOQuery1;
    TComboBox *ComboBox1;
    TComboBox *ComboBox2;
        .....
};

else {
        Application->MessageBox(L"Зайдите позже!",L"Не в системе",MB_OK);
//        MainForm->Hide();
        MainForm->Close();
        Application->Terminate();

MainForm->Close();
Application->Terminate();

MainForm->Close();

Application->Terminate();

void __fastcall TMainForm::FormShow(TObject *Sender)
{
     wearehere = false;
 
     if (wearehere) {
           Application->MessageBox(L"Ура, мы в системе",L"В системе",MB_OK);
     }
     else {
        Application->MessageBox(L"Зайдите позже!",L"Не в системе",MB_OK);
        Application->Terminate(); //!!! здесь закрываем прогу, 
        //но форма MainForm все равно показывается на долю секунды, а не должна.
 
        //Close();
     }
}

this->FormShow(Sender);

void __fastcall TMainForm::FormShow(TObject *Sender)
{
     if (wearehere) {
           Application->MessageBox(L"Ура, мы в системе",L"В системе",MB_OK);
     }
     else {
        Application->MessageBox(L"Зайдите позже!",L"Не в системе",MB_OK);
        Application->Terminate();
        //Close();
     }
}

if (!wearehere)