为什么不能改变Image的大小,如何改变IMAGE的大小(50分)

我不知道该怎么表达.

我要做的工作就是,把几副大小不同的图片分别放入同一个IMAGE控件中,然后把IMAGE中的图片取出来,保存入数据库.

目前出现的情况是:如果前一幅图片的尺寸比后一幅的大,那么在后一幅保存到数据库的图片中会出现前一幅图超出的部分.
for i:=0 to (image01.Width - 1 ) do
for j:=0 to (image01.Height - 1 ) do
Begin
..................
//每次取新的图片都重新设置了IMAGE02的大小,但我放大效果后发现图片大小没变!
image02.Width := ie - ist + 1;
image02.Height := image2.picture.height;

for i3:= 0 to image02.Width - 1 do
for j3:= 0 to image02.Height - 1 do
image02.canvas.Pixels[i3,j3]:=image2.canvas.Pixels[i3 + ist ,j3 ];
后来把图片从数据库中取出来就出现大图的痕迹,希望大家可以帮个忙,谢谢!

先存入数据库一个空的流
再存入图像信息流

把image的strech设为true，加入图片后在把图片区域拷贝到另一个image就ok了

多人接受答案了。