Скрытие главной формы

if (Edit1->Text == "parol") ModalResult = mrOk;

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit2.h"
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
        : TForm(Owner)
{
 
}
//---------------------------------------------------------------------------
 
 
bool __fastcall TForm2::Execute()
{
        bool Result;
        TForm2 *LoginForm=new TForm2(NULL);
        try
        {
                Result=(LoginForm->ShowModal()==mrOk);
        }
        __finally
        {
                delete LoginForm;
        }
        return Result;
}
void __fastcall TForm2::Button1Click(TObject *Sender)
{
ModalResult = mrOk;        
}
//---------------------------------------------------------------------------
 
void __fastcall TForm2::Button2Click(TObject *Sender)
{
ModalResult = mrCancel;        
}
//---------------------------------------------------------------------------

//---------------------------------------------------------------------------
 
#ifndef Unit2H
#define Unit2H
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
//---------------------------------------------------------------------------
class TForm2 : public TForm
{
__published:    // IDE-managed Components
        TEdit *Edit1;
        TEdit *Edit2;
        TButton *Button1;
        TButton *Button2;
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall Button2Click(TObject *Sender);
private:    // User declarations
public:     // User declarations
        __fastcall TForm2(TComponent* Owner);
        static bool __fastcall Execute();
};
//---------------------------------------------------------------------------
extern PACKAGE TForm2 *Form2;
//---------------------------------------------------------------------------
#endif

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include <tchar.h>
#include "Unit2.h"
 
//---------------------------------------------------------------------------
USEFORM("Unit1.cpp", Form1);
//---------------------------------------------------------------------------
WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int)
{
        try
        {
                if(TForm2::Execute())
                {
                        Application->Initialize();
                        Application->CreateForm(__classid(TForm1),&Form1);
                        Application->Run();
                }
                else
                {
                        Application->MessageBox("Incorrect Password","Error");
                }
        }
        catch (Exception &exception)
        {
                Application->ShowException(&exception);
        }
        catch(...)
        {
                try
                {
                        throw Exception("");
                }
                catch (Exception &exception)
                {
                        Application->ShowException(&exception);
                }
        }
        return 0;
}
//---------------------------------------------------------------------------