Guardar y recuperar imagen en bd

[Lizette]

Hola compañeros, trato de guardar una imagen en mi bd pero lo que hago es guardarla como string, escribiendola en un flujo Stream, de alli para recuperarla leo el campo y lo escribo en un flujo stream y de allí cargo la imagen. El problema esk no me muestra ninguna imagen :confused:, alguien me pudiera orientar, o bien sugerir otra forma de hacerlo.

//Para guardar la imagen
foto := TStringStream.Create('');
Image3.Picture.Graphic.SaveToStream(foto);

ADOtblCte.FieldByName('FotoC').AsString:=foto.DataString;


//Para mostrar la imagen
var
imagen:TStringStream;
cargar:TBitMap;
begin
imagen := TStringStream.Create('');
ADOTable1.Open;
imagen.WriteString(ADOTable1.FieldValues['FotoC']);
cargar:=TBitMap.Create;
cargar.LoadFromStream(imagen);
image1.Picture.Graphic:=cargar;
ADOTable1.Close;
end;


Saludos y gracias

[rgstuamigo]

Disculpa mi ignorancia ,pero dices que la imagen lo guardas como string?:confused: ¿como es eso? Talves te estas refiriendo a solo guardar la ruta de la imagen?
Y aparte de eso ¿Que servidor de base de datos usas(MySQL,MS SQL Server,Oracle,Firebird,etc)?¿Y que tipo de dato es la columna de tu tabla que guarda la imagen (Char,Varchar,Blob,etc)?:confused:.

Saludos...:)

[Lizette]

Uff, perdón, se me olvido comentar que el motor de bd que utilizo es MySql, y el campo es varchar.

Ese código lo saqué de un post de la web del programador, que supuestamente guarda la imagen como texto, :rolleyes: pero ya vi q nomás no funciona jeje. Saludos

[Alzheimer]

pk no usas un kampo de tipo Graphic *son para esto* y te ahorras todo eso de konvertir en string una imagen k parece k no funciona????

[calogero]

Hola en casos como ese lo que yo hago es solo guardar la ruta en la base de datos y la imagen la guardo en una carpeta en el disco duro asi solo leo la ruta en la base de datos y la imagen la tomo de la carpeta del disco duro, tal vez no sea la mejor forma pero me ha funcionado yo desarrollo aplicaciones web en php y esa es la manera en la que guardo imágenes.

saludos..

[rgstuamigo]

Hola en casos como ese lo que yo hago es solo guardar la ruta en la base de datos y la imagen la guardo en una carpeta en el disco duro asi solo leo la ruta en la base de datos y la imagen la tomo de la carpeta del disco duro, tal vez no sea la mejor forma pero me ha funcionado yo desarrollo aplicaciones web en php y esa es la manera en la que guardo imágenes.

saludos..
Es verdad es una buena solucion, personalmente tambien he implementado algo asi, pero tiene un inconveniente que si la aplicacion es multiusuario y se encuentra en diferentes Maquinas, pues no se va poder ver las imagenes en todas y peor aun si la aplicacion se conecta desde una red Wan.
Por otro lado tambien si se guarda muchas imagenes directamente en las tablas del servidor, puede provocar lentitud o sobrecarga en la red.
Asi que en todo caso hay que ver la forma mas adecuada posible de implementarlo y eso depende de la aplicacion, y de quien lo esta implementado.;)
Saludos...:)

[roman]

pk no usas un kampo de tipo Graphic *son para esto* y te ahorras todo eso de konvertir en string una imagen k parece k no funciona????

Los campos Graphic son exclusivos de Paradox, no sé de otra base que los tenga, no al menos MySQL. De hecho, este tipo de campo sirve exclusivamente para bitmaps y no para otros formatos como jpg o png.

Es verdad es una buena solucion, personalmente tambien he implementado algo asi, pero tiene un inconveniente que si la aplicacion es multiusuario y se encuentra en diferentes Maquinas, pues no se va poder ver las imagenes en todas y peor aun si la aplicacion se conecta desde una red Wan.


No entiendo esto. Las imágenes se guardarían en algún direcorio del servidor, así que podrían accederse desde cualquier parte.


Por otro lado tambien si se guarda muchas imagenes directamente en las tablas del servidor, puede provocar lentitud o sobrecarga en la red.


Yo creo que esto sucedería sólo si se selecciona el campo de la foto para cada consulta en lugar de descargarla sólo en los registros deseados.

// Saludos

[roman]

Lizette,

No sé si pueda guardarse una imagen en un campo de tipo VarChar, en todo caso, no me parece el más indicado. Sería mejor que optaras por un campo BLOB (LongBlob, MediumBlob, TinyBlob, etc., dependiendo del tamaño de tus imágenes).

Te pongo aquí unas rutinas para guardar y mostrar imágens en una base MySQL usando un ADOTable:


// Guardar una imagen
var
Stream: TStringStream;

begin
Stream := TStringStream.Create('');

try
Image1.Picture.Graphic.SaveToStream(Stream);

AdoTable1.Append;
AdoTable1.FieldByName('titulo').AsString := 'Mi primera foto';
AdoTable1.FieldByName('foto').AsString := Stream.DataString;
AdoTable1.Post;
finally
Stream.Free;
end;
end;

// Mostrar la imagen
var
Stream: TStringStream;
Bitmap: TBitmap;

begin
Bitmap := nil;
Stream := nil;

try
Bitmap := TBitmap.Create;
Stream := TStringStream.Create(AdoTable1.FieldByName('foto').AsString);

Bitmap.LoadFromStream(Stream);
Image1.Picture.Assign(Bitmap);
finally
Bitmap.Free;
Stream.Free;
end;
end;


Las rutinas equivalentes usando un AdoQuery


// Guardar una imagen
var
Stream: TStringStream;

begin
Stream := TStringStream.Create('');
try
Image1.Picture.Graphic.SaveToStream(Stream);

AdoQuery1.SQL.Text := 'insert into fotos (titulo, foto) values(:titulo, :foto)';
AdoQuery1.Parameters.ParamByName('titulo').Value := 'Mi primera foto';
AdoQuery1.Parameters.ParamByName('foto').Value := Stream.DataString;
AdoQuery1.ExecSQL;
finally
Stream.Free;
end;
end;

// Mostrar la imagen
var
Stream: TStringStream;
Bitmap: TBitmap;

begin
Bitmap := nil;
Stream := nil;

try
Bitmap := TBitmap.Create;

AdoQuery1.SQL.Text := 'select titulo, foto from fotos where id = :id';
AdoQuery1.Parameters.ParamByName('id').Value := 8;
AdoQuery1.Open;

Stream := TStringStream.Create(AdoQuery1.FieldByName('foto').AsString);

Bitmap.LoadFromStream(Stream);
Image1.Picture.Assign(Bitmap);
finally
Bitmap.Free;
Stream.Free;
end;
end;


Veo más conveniente usar un AdoQuery, sobre todo para obtener la imagen desde la base de datos; porque usar un AdoTable implicaría, como dice rgstuamigo, demasiado tráfico. Lo normal sería, mostrar una lista de registros y que el usuario escoja de cual quiere ver la imagen, y sólo entonces descargas la foto.

// Saludos

[rgstuamigo]

No entiendo esto. Las imágenes se guardarían en algún direcorio del servidor, así que podrían accederse desde cualquier parte.

Hahh bueno..asi pues si...,pero alo que me refiriendo yo en ese comentario es a que cada usuario guarde las imagenes en su propio ordenador, esto para evitar estar trayendo o llevando imagenes por la red.

Yo creo que esto sucedería sólo si se selecciona el campo de la foto para cada consulta en lugar de descargarla sólo en los registros deseados.

ok.. Pero dime de manera lo traerias las fotos en una cosulta SQL del servidor si lo tienes en un dterminado directorio?:confused:
¿Y como le enviarias las imagenes a dicho directorio?
Saludos...:)

[roman]

¿Guardar las imagenes en cada ordenador? Pues entonces se pierde el concepto de una base de datos ¿no?

En cuanto a lo segundo, creo que estás confundiendo. Es decir, en la parte del comentario que citas, yo me estoy refiriendo a cuando se guardan las fotos en un campo BLOB, no en archivos separados.

Si uno enlaza un AdoTable a una tabla con imágenes, seguramente habrá mucho tráfico pues se estarían descargando fotos que no necesariamente se desea ver. Por eso le comento a Lizette que sería mejor una consulta SQL.

Ahora, en cuanto a guardar las imágenes en archivos separados, no creo que con consultas SQL puedan subirse o bajarse las fotos. Pero se tendría la ruta del servidor en donde se almacenan y ya sería cuestión de usar FTP o HTTP (con Indy, por ejemplo) para moverlas de un sitio a otro.

// Saludos

[rgstuamigo]

¿Guardar las imagenes en cada ordenador? Pues entonces se pierde el concepto de una base de datos ¿no?

No es que se pierda el concepto..sino que a veces no es necesario guardar todo en el servidor (depende del caso)si por ejemplo tengo un solo usuario,por eso explique aqui (http://www.clubdelphi.com/foros/showpost.php?p=346900&postcount=6) claramente que eso depende de la aplicacion que se pretender hacer.;)

Ahora, en cuanto a guardar las imágenes en archivos separados, no creo que con consultas SQL puedan subirse o bajarse las fotos. Pero se tendría la ruta del servidor en donde se almacenan y ya sería cuestión de usar FTP o HTTP (con Indy, por ejemplo) para moverlas de un sitio a otro.

Creo que estariamos complicando la cosa. ¿no te parece?:confused:
Te pregunto: ¿entonces que ventaja tengo o obtengo de guardar la imagenes en un directorio del servidor?:rolleyes: Para eso mas bien guardarlas en la base de dato, que me permite verlas desde cualquier lugar y sin usar FTP o HTTP.¿O hay algo que no estoy tomando en cuenta?:rolleyes::confused:
Saludos...:)

[roman]

No es que se pierda el concepto..sino que a veces no es necesario guardar todo en el servidor (depende del caso)si por ejemplo tengo un solo usuario


A ver, tú comentaste:


Es verdad es una buena solucion, personalmente tambien he implementado algo asi, pero tiene un inconveniente que si la aplicacion es multiusuario y se encuentra en diferentes Maquinas, pues no se va poder ver las imagenes en todas y peor aun si la aplicacion se conecta desde una red Wan.


Y ahora mencionas una aplicación monousuario. Pero, aún siendo un sólo usuario trabajando en distintas máquinas; o hay un servidor central o tiene que estar portando los datos de un lado a otro. En el primer caso, no tendría mucho sentido guardar las imágenes localmente, pues justamente se pierde el sentido de una base de datos centralizada. En el segundo caso, si de todas formas debe transportar los datos, pues ya lo mismo da transportar las fotos.

Ahora, en cuanto a si se complican las cosas, pues sí se complican. Pero yo no fui quien propuso guardar las fotos en archivos separados ;) Los campos BLOB de una base están para algo.

Por otra parte, en caso de que fuese necesario lo de los archivos aparte, tampoco es que sea una tarea gigantezca el transportarlas via FTP o HTTP. Pero, además, si te fijas, calogero -quien fue el que mencionó lo de guardar las imágenes en archivos- trabaja con php en web, lo cual ofrece otro panorama, pues es el mismo php corriendo en el servidor quien se encargaría de leer las fotos y mandarlas al navegador sin necesidad del extra de algo como las Indy.

// Saludos

[rgstuamigo]

...
Y ahora mencionas una aplicación monousuario. Pero, aún siendo un sólo usuario trabajando en distintas máquinas; o hay un servidor central o tiene que estar portando los datos de un lado a otro. En el primer caso, no tendría mucho sentido guardar las imágenes localmente, pues justamente se pierde el sentido de una base de datos centralizada. En el segundo caso, si de todas formas debe transportar los datos, pues ya lo mismo da transportar las fotos.
...

Eso lo puse por ejemplo y entiendo lo que tratas decir pero te recalco, amigo roman, que a veces es el tipo de aplicacion(Como se va usar, es grande o chica, que se va guardar,etc) que definira la forma de trabajo.;)

Ahora, en cuanto a si se complican las cosas, pues sí se complican. Pero yo no fui quien propuso guardar las fotos en archivos separados ;) Los campos BLOB de una base están para algo.

Pues ..en el post nro 7 (http://www.clubdelphi.com/foros/showpost.php?p=346931&postcount=7) tú mismo dijiste que las imagenes se guardaran en algun directorio en el Servidor.;)

Por otra parte, en caso de que fuese necesario lo de los archivos aparte, tampoco es que sea una tarea gigantezca el transportarlas via FTP o HTTP.
...

Bueno... pero dime que Ventajas consigo con eso?
¿acaso no seria mejor ,en ese caso, guardarlo directamente en la base de dato?:confused:
Saludos...:)

[roman]

a veces es el tipo de aplicacion(Como se va usar, es grande o chica, que se va guardar,etc) que definira la forma de trabajo.;)


Pues claro. Pero dicho así, es algo muy ambiguo, y no sé cómo aplicaría en este caso. Y el ejemplo que pusiste para clarificar cambió de un post a otro...


Pues ..en el post nro 7 (http://www.clubdelphi.com/foros/showpost.php?p=346931&postcount=7) tú mismo dijiste que las imagenes se guardaran en algun directorio en el Servidor.;)


Claro, dije eso, pero sólo como respuesta a tu comentario en cuanto a la desventaja del método. Argumenté el porqué no es una desventaja. Pero eso no significa que yo haya propuesto esa técnica.


Bueno... pero dime que Ventajas consigo con eso?
¿acaso no seria mejor ,en ese caso, guardarlo directamente en la base de dato?:confused:
Saludos...:)

Repito lo dicho. No es mi propuesta, así que no soy el mejor para argumentar sus ventajas.

// Saludos

[rgstuamigo]

Todo Aclarado amigo.:):cool::)
Saludos...:)

[Mystery]

hola a todos bueno aclaro que yo nunca he usado el MySQL para hacer esto pero supongo que usando los tipos de campo que aclara roman debe ser lo mismo....
yo para guardar imagenes en una base de datos uso lo TMemoryStream.
algo como esto...

var
Stream:TMemoryStream;
begin
Stream:=TMemoryStream.Create;
try
Stream.LoadFromFile('C:\myImg.jpg');
Stream.Seek(0, soFromBeginning);
TipocampoBlob.LoadFromStream(stream);
finally
Stream.Free;
end;
end;

con eso resuelvo... y hasta ahora guardo imagenes de todos tipos sin ningun tipo de problemas usando SQL Server.. Access.....

bueno.....

chaoooo

[JULIPO]

Reciban un cordial saludo.

estoy en en mismo problema resulta que yo utilizo zeos y Mysql con delphi 2007 las fotos que debo almacenar en mysql estan en jpeg hago el mismo procedimiento que indica roman cambiando unicamente el tbitmap por un Tjpegimage y me aparece el error jpeg error #53 me almacena mal los datos como lo soluciono.

[JULIPO]

Resulta que tengo un disparador en el evento ondatachange en el data source para que me almacene los datos correctamente debo desabilitar ese datasource mientras se almacenan los datos y luego lo activo queda perfecto.