Склеить несколько картинок в одну

[bulldog5293]

Всем привет, столкнулся с ситлуацией, что требуется загрузить с сайта несколько картнок и склеить их в одну в image, нашёл на одоной из веток вашего форума код, который передлал под себя, но

var BufPic: TJpegImage; 
  begin
FH.Get(ссылка, img);
jpeg.LoadFromStream(img);
  Form1.Image1.Picture.Canvas.Draw(0,0,img); 
 Image
FH.Get(ссылка, img);
jpeg.LoadFromStream(img);
  Form1.Image1.Picture.Canvas.Draw(30,0,img); 
Image
FH.Get(ссылка, img);
jpeg.LoadFromStream(img);
  Form1.Image1.Picture.Canvas.Draw(60,0,img); 
Image
   for i:= 0 to 2 do
  begin
      Form1.Image1.Picture.Canvas.Draw(0,0 + (i * 10),JPEG);
end;
end;

но не робит, пишет что не индефицирована canva, можете объяснить почему?

[Пепел Феникса]

что канва не сделала?
по вашему коды обьект jpeg не создан.

http://programmersforum.ru/showthrea...741#post305741

[bulldog5293]

как назло дельфи завис , jpeg создан, просто при переносе забыл указать

jpeg:= TJPEGImage.create;

За ссыль спс , но есть проблема, я не понял код

Image1.Width;
Image1.Height;

Эт понятно, но что означают ?

BottomRight

[volod3000]

Сообщение от bulldog5293

Эт понятно, но что означают ?

BottomRight

Вот справка :

http://www.delphibasics.ru/TRect.php

[bulldog5293]

эту справку я уже читал, получается BottomRight это отступ в право?

[volod3000]

Грубо вот так

[DenNik2006]

Сообщение от bulldog5293

      Image1.Picture.Canvas...

Такого в принципе не существует!
или

Image1.Canvas

или

Image1.Picture.Bitmap.Canvas

но в этом случае результаты рисования не будут видны