Ver Mensaje Individual
  #1  
Antiguo 26-07-2004
Coco Coco is offline
Miembro
 
Registrado: jul 2004
Ubicación: Argentina
Posts: 83
Reputación: 22
Coco Va por buen camino
Lightbulb guardar y recuperar imagenes

Intenta con un campo blob de oracle.
Para guardarlo puedes probar con el tipo Stream de Delphi.


Aqui te envio la funcion que guarda la imagen, seria mas o menos asi

function guardarImagen( NombreImagen: String;
Data: TStream): Boolean;
var F: TFileStream;
begin
F := TFileStream.Create(nombreImagen, fmCreate);
try
F.CopyFrom(Data, 0 );
Result:= True;
except
Result:= false;
end;
F.Free;
end;

Para instanciarla es:

guardarimagen('nombre.jgp',Query.CreateBlobStream(Query.FieldByName('IMAGEN'), bmRead));

Espero que te sirva.
Saludos.
Responder Con Cita