Ver Mensaje Individual
  #4  
Antiguo 16-05-2003
Avatar de delphi.com.ar
delphi.com.ar delphi.com.ar is offline
Federico Firenze
 
Registrado: may 2003
Ubicación: Buenos Aires, Argentina *
Posts: 5.964
Reputación: 29
delphi.com.ar Va camino a la fama
Este código, tiene que funcionar con cualquier base de datos que soporte campos long.
Se supone que la variable JpegImg es del tipo TJPEGImage y tiene cargado una imagen, y también damos por supuesto que el qryFirmas esta abierto y en modo de edición.

Código:
var
  AStream : TStream;
begin
  AStream := TMemoryStream.Create;
  Try
     JpegImg.SaveToStream( AStream );
     TBlobField( qryFirmas.FieldByName('FIRMA') ).LoadFromStream( AStream );
   finally
     AStream.Free;
   end;
end;
__________________
delphi.com.ar

Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla.
Responder Con Cita