我想把3张图片拼在一起，应该怎么做啊？

Question

现在有3个JPG文件，需要水平的合成一张大图片，2张在上面，一左一右，1张在下面
应该怎样做啊？谢谢了

Answer 1

uses Math;procedure TForm1.Button1Click(Sender: TObject);
begin
  Image4.Picture.Bitmap.Width := Max(Image3.Picture.Width,
    Image1.Picture.Width + Image2.Picture.Width);
  Image4.Picture.Bitmap.Height := Image3.Picture.Height +
    Max(Image1.Picture.Height, Image2.Picture.Height);  Image4.Canvas.Draw(0, 0, Image1.Picture.Graphic);
  Image4.Canvas.Draw(Image1.Picture.Width, 0, Image2.Picture.Graphic);  Image4.Canvas.Draw(0, Max(Image1.Picture.Height, Image2.Picture.Height),
    Image3.Picture.Graphic);
end;