Guardar varias imagenes en una sola

maravert · #1 28-02-2005

Hola, estimados compañeros:

Me gustaria que alguien me diga como resolver este problema.

Tengo un Paintbox (paintbox1) y encima de este tengo 8 imagenes Timage (Image1, Image2 ... Image8), (Estas imagenes son bitmap ... los Timage, el Paintbox puede variar el tipo de imagen), lo que necesito ahora es grabar todas estas imagenes como una sola.

Si alguien sabe como resolver este problema se los agradeceria mucho.

Hasta pronto.

A. Maravert A.

Neftali [Germán.Estévez] · #2 28-02-2005

Copia el canvas del PaintBox al canvas de un TImage y utiliza en método SaveToFile del TImage para guardarlo en disco.

Código Delphi [-]   ImageNew.Height := PaintBox1.Height;
   ImageNew.Width := PaintBox1.Width;
   ImageNew.Canvas.CopyRect(ImageNew.ClientRect, PaintBox1.Canvas, PaintBox1.ClientRect);
   ImageNew.Picture.Bitmap.SaveToFile('c:\temp\aa.bmp');

maravert · #3 28-02-2005

Muchas Gracias Neftali por tu ayuda me sirvio perfectamente.

Hasta pronto, espero algun día poder ayudarte de igual manera.

Alejandro Maravert A.