Где хранить изображение BitMap

TBitmap* pBitmap;

Graphics::TBitmap* pBitmap;

class TForm1 : public TForm
{
__published:    // IDE-managed Components
        TButton *Button1;
        TImage *Image1;
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
private:    // User declarations
        Graphics::TBitmap *bmChunk; // Вот по этому указателю будем хранить кусок изображения
        TRect rectChunk; // Вот с такими размерами
public:     // User declarations
        __fastcall TForm1(TComponent* Owner);
};

__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
rectChunk.Left   = 0;     // Размер
rectChunk.Top    = 100;   //  прямоугольника
rectChunk.Right  = 200;   //  под
rectChunk.Bottom = 200;   //  кусок
 
bmChunk = new Graphics::TBitmap;    // Выделение памяти под кусок
bmChunk->Width = rectChunk.Right;   // Установка размеров
bmChunk->Height = rectChunk.Bottom; //  куска
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
bmChunk->Canvas->CopyRect( rectChunk, Image1->Canvas, rectChunk ); // Запомнили кусок
 
Image1->Canvas->FillRect( Image1->Canvas->ClipRect );              // Затерли все
 
Image1->Canvas->CopyRect( rectChunk, bmChunk->Canvas, rectChunk ); // Отрисовали кусок
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
delete bmChunk; // Удалили
}