Save Picture Dialog+db

[mantraxer21]

Estimados:

Alguien ha trabajado con el Control SavePictureDialog para poder guardar una imagen (ruta) de algun dato...

La verdad de las cosas, necesito guardar una imagen (gif, png, jpg) y me recomendaron trabajar con SavePictureDialog. Idealmente sería guardar la ruta en un campo (varchar 200) de la tabla "XXX" ( carpeta c:\Picture) del proyecto.

Alguien que pueda orientarme un poco !

Gracias

[[Caral]]

Hola
Y bien, que necesitas ???, guardar la ruta en una tabla o usar un dialog ???
Saludos

[*Caro*]

Hola mantraxer21, supongo que lo que no sabes, es manejar el SavePictureDialog:

Código Delphi [-]
 if SavePictureDialog.Execute then 
   //ruta es lo que guardarías en tu campo varchar de imagen
  ruta := SavePictureDialog.FileName;

Saluditos

[*Caro*]

Y para que tu SavePictureDialog se inicialice con "c:\Picture".

Código Delphi [-]
 SavePictureDialog.InitialDir := 'c:\Picture';

Saluditos

[mantraxer21]

Empezado por Caro

Y para que tu SavePictureDialog se inicialice con "c:\Picture".

Código Delphi [-] SavePictureDialog.InitialDir := 'c:\Picture';


Saluditos

Realize este codigo en el Evento OnShow del SavePictureDialog, y el código anterior también para poder buscar la imagen... Esto último lo hago directamente en el OnClick del Image.

Algún ejemplo básico más funcional ?


Muchas gracias por su ayuda !

[*Caro*]

Hola de nuevo mantraxer21

Empezado por mantraxer21

Realize este codigo en el Evento OnShow del SavePictureDialog

puedes colocarlo en el evento onShow de tu formulario.

Empezado por mantraxer21

y el código anterior también para poder buscar la imagen... Esto último lo hago directamente en el OnClick del Image.

Algún ejemplo básico más funcional ?

no te entiendo muy bien, ¿quieres mostrar la imagen seleccionada en un TImage?

Código Delphi [-]
 if OpenPictureDialog.Execute then
 begin
  ruta := OpenPictureDialog.FileName;
  Image1.Picture.LoadFromFile(ruta);
 end;

Saluditos

[mantraxer21]

Hola Caro:

La verdad quiero probar el tema de SavePictureDialog.

Imaginate que tengo una tabla:

productos:
IdProd (Int)
Producto (vchar 150)
CodProd (VCahar 15)
RutaFoto(Vchar 150)

La idea es guardar Datos en esa tabla, pero para el tema de la Imagen referencial de la Imagen, almacenaré la Ruta en: RutaFoto , cosa de no pesar tanto en la Bd, pero tener almacenado todo en una carpeta "Picture" por ejemplo.

Trabajo con DataSet + DataSource o TibQuery+ UpdateSQl + DataSource ...

Cualquier metodo, puedo guardar registros.

Gracias

[[Chris]]

Empezado por mantraxer21

Idealmente sería guardar la ruta en un campo (varchar 200) de la tabla "XXX" ( carpeta c:\Picture) del proyecto.

Si lo que quieres es guardar la ruta a una imagen existente, el componente que debes utilizar es TOpenPictureDialog, y no TSavePictureDialog. La ruta de la imagen seleccionada por el usuario puedes obtenerla leyendo la propiedad FileName de TOpenPictureDialog.

Saludos,
Chris

[mantraxer21]

Muchas Gracias.

Tema Cerrado