Seguramente los otros TImage no están en formato bmp.
No tengo forma de probarlo ahora directamente, pero esta solucion debiera funcionar:
convertir a bmp
Código Delphi
[-]
Var
aBMP : TBitmap;
PosY : Integer;
Begin
aBMP := TBitmap.Create;
try
aBMP.Assign(Image1.Picture.Graphic);
juntas.Canvas.Draw(0,0,aBMP);
PosY := aBMP.Height;
aBMP.Assign(Image2.Picture.Graphic);
juntas.Canvas.Draw(0, PosY + 1, aBMP);
finally
aBMP.Free;
end;
Hasta luego.
