Guardar PaintBox

[ronald_tro]

Hola amigos, bueno aqui de nuevo, he revisado por aqui en el foro como guardar un PaintBox en .bmp o jpg, lo que pasa es que hago lineas en un paintbox y lo que he hecho lo quisiera guardar, y encontre esto:
var Bitmap: TBitmap;
begin
Bitmap := TBitmap.Create;
Bitmap.Width := PaintBox1.Width;
Bitmap.Height := PaintBox1.Height;
Bitmap.Canvas.CopyRect(PaintBox1.ClientRect, PaintBox1.Canvas, PaintBox1.ClientRect);
Bitmap.SaveToFile('c:\test.bmp');
Bitmap.Destroy;

pero la duda es esta, quisiera que me saliera un mensaje de guardar y elegir donde guardarla, se que es algo de la herramienta dialogo pero no se como usarla, y otra duda, quisiera abrir algun paintbox que halla guardado en imagen y ponerla en luugar del paintbox, osea que la imagen seria el paintbox, espero no molestarlos y gracias.:)

[Neftali [Germán.Estévez]]

... pero la duda es esta, quisiera que me saliera un mensaje de guardar y elegir donde guardarla, se que es algo de la herramienta dialogo pero no se como usarla, y otra duda, quisiera abrir algun paintbox que halla guardado en imagen y ponerla en luugar del paintbox, osea que la imagen seria el paintbox, espero no molestarlos y gracias.:)

Para guardar basta con que utilices son Cuadros de diálogo estanderd de Windows. OpenDialog y SaveDialog de la pestaña Dialogs.

Para Abrir un fichero:


if (OpenDialog1.Execute) then begin
fName := OpenDialog.FileName;

// Aquí ya tienes el fName el nombre del fichero a abrir
!!!!!

end
else begin
// No se ha seleciconado ningun nombre
// CANCELAR o ESCAPE
end;


Para porder ver los ficheros guardados puedes usar un Control TImage.
Utiliza el OpenDialog para obtener el nombre y luego:


Image1.Picture.Bitmap.LoadFromFile(fName);


Algo similar para los SaveDialog.

Revisa las propiedades de ambos componentes y podrás "personalizar" un poco más el diálogo.
Cambiar el título, Definir un filtro para los ficheros que se seleccionan,...