Delphi-Quellcode:
image3.picture.assign(image1.picture.bitmap);
Image3.Picture.Bitmap.height:=Image3.Picture.Bitmap.height + image1.picture.bitmap.height;
image3.picture.Bitmap.Canvas.CopyRect(rect(image1.Picture.height,0,image2.picture.height+
image1.picture.width,image2.picture.height),image2.picture.bitmap.Canvas, rect(0, 0,
image2.picture.width, image2.picture.Height));
Hm, es klappt immer noch nicht. das erste Bild ist richtig. Die Höhe ist auch richtig. Es ist also genug Platz nach unten hin da. Nur ist dort nur ein weißes Feld und nicht das Bild.
