Как подружить юниты

//---------------------------------------------------------------------------
#ifndef Unit2H
#define Unit2H
//---------------------------------------------------------------------------
#include <vcl.h>
//---------------------------------------------------------------------------
 
class ClassInUnit2
{
private:
        int some;
public:
        int GetSome() const;
        void SetSome( int value );
};
//---------------------------------------------------------------------------
#endif

//---------------------------------------------------------------------------
#pragma hdrstop
 
#include "Unit2.h"
 
//---------------------------------------------------------------------------
int ClassInUnit2::GetSome() const
{
        return this->some;
}
//---------------------------------------------------------------------------
void ClassInUnit2::SetSome( int value )
{
        this->some = value;
}
//---------------------------------------------------------------------------
#pragma package(smart_init)

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
#include "Unit2.h" // Подключаем
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
ClassInUnit2 ExempleClassUnit2; // Создаем экземпляр
 
ExempleClassUnit2.SetSome( 666 ); // Работаем
 
ShowMessage( ExempleClassUnit2.GetSome() ); // Результат
}
//---------------------------------------------------------------------------