//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn2Click(TObject *Sender)
{
        TJPEGImage *jpg = new TJPEGImage ();
        jpg->LoadFromFile (m_sVectorImagePath);

        Graphics::TBitmap *pBitmap = new Graphics::TBitmap ();
        pBitmap->Assign (jpg);

        TMemoryStream*m=new TMemoryStream();
        pBitmap->SaveToStream(m);
        m->SaveToFile("c:\\temp.tmp");

        delete jpg;
        delete pBitmap;
        delete m;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::BitBtn4Click(TObject *Sender)
{
        Graphics::TBitmap *pBitmap = new Graphics::TBitmap ();

        TMemoryStream*m=new TMemoryStream();
        m->LoadFromFile("c:\\temp.tmp");
        pBitmap->LoadFromStream(m);

        Image1->Picture->Bitmap->LoadFromStream(m);


        delete m;
        delete pBitmap;
}