Hallo Christopher,
wenn Du die Methode
Draw von TCanvas benutzt, wird es etwas einfacher:
Delphi-Quellcode:
// Erste Bitmap zuweisen
imgPreview.Picture.Assign (Image1.Picture);
// Gesamtbreite einstellen
with imgPreview.Picture.Graphic do
Width := Width + Image2.Width;
// Zweite Bitmap rechts neben die erste auf den Canvas des Gesamtbildes zeichnen
imgPreview.Canvas.Draw (Image1.Width, 0, Image2.Picture.Graphic);
Jetzt läßt sich auch Deine Frage leicht beantworten:
Delphi-Quellcode:
// Erste Bitmap zuweisen
imgPreview.Picture.Assign (Image1.Picture);
// Gesamthöhe einstellen
with imgPreview.Picture.Graphic do
Height := Height + Image2.Height;
// Zweite Bitmap unter die erste auf den Canvas des Gesamtbildes zeichnen
imgPreview.Canvas.Draw (0, Image1.Height, Image2.Picture.Graphic);
Gruß Hawkeye