I tried tis code:
TGraphic *g = Image1->Picture->Graphic;
Image2->AutoSize = true;
Image2->Canvas->Draw(100,100,g);
Image2->Canvas->Draw(10000,10000,g);
I expected Image2 to expand to the size needed to fit the expanded image. Image2, width 700, height 500, fits snug inside...