Ver Mensaje Individual
  #4  
Antiguo 22-07-2010
Avatar de Enan0
Enan0 Enan0 is offline
Miembro
 
Registrado: may 2004
Ubicación: Argentina
Posts: 565
Reputación: 23
Enan0 Va por buen camino
Cita:
Empezado por Toretto Ver Mensaje
Pues sigo con la duda, en mi bbdd tengo la imagen almacenada en un campo blob y tengo que pasarla a un fichero jpg. Utilizo el siguiente código pero no me crea el archivo:

cadena1:= 'Select foto from persona where (nombre = 'David')';
QBuscar.Sql:= cadena1;
QBuscar.sql.savetofile('c:\prueba.jpg');

Estoy utilizando mal la función savetofile???


Gracias

QBusca nunca fue abierto por lo que veo.

Si estas utilizando un Query, antes que nada tenedias que hacer lo siguiente!

Código Delphi [-]
cadena1:= 'Select foto from persona where (nombre = 'David')';
QBuscar.Sql:= cadena1;
QBuscar.Open;
if not QBuscar.eof then
   TBlobField(QBuscar.fieldbyName('foto')).savetofile('c:\prueba.jpg');

Última edición por Enan0 fecha: 22-07-2010 a las 14:31:21.
Responder Con Cita