Проблема такая: Загружаем картинку в TImage (из файла jpg,bmp,gif), затем меняем свойство Stretch, картинка растягивается, а после нужно сохранить эту картинку в файл в таком растянутом виде.
пробовал вот так:
Код:
var
img:TImage;
r:TRect;
begin
img:=TImage.Create(Form2);
img.Width:=500;
img.Height:=300;
r.Left:=0;
r.Top:=0;
r.Right:=Image1.Width;
r.Bottom:=Image1.Height;
img.Canvas.CopyRect(r,Image1.Canvas,r);
Img.Picture.SaveToFile('D:\123.jpg');
Img.Free;
но не получается