TCanvas.StretchDraw

[siu01jam]

I have an image at a given height and width and i am trying to StretchDraw it onto another canvas.

With size do
begin
Left:= 0;
Top:= 0;
Right:= StrToInt(Edit1.Text);
Bottom:= StrToInt(Edit2.Text);
end;

ResizedImage.Height:= Size.Bottom;
ResizedImage.Width:= size.Right;

ResizedImage.Canvas.StretchDraw(size, ResizedImage.Picture.Graphic);

The ResizedImage is set to an initial size, and when the stretchdraw occurs it looks as if it has been enlarged/reduced but the ResizedImage.picture.width and height retain the same height and width as its previous state. ResizedImage only contains part of the enlarged image. Does anyone know how I can resolve this issue?

Thanks in Advance . . .