Me trae de los pelos el PARAMETRO

[Paoti]

mirate este link ahi se muestra como guardar un jpg

y como mostrarlo despues


http://www.clubdelphi.com/foros/showthread.php?t=12174

y esta es la forma como lo implemente en un query, en el evento afterscroll

Código Delphi [-]
procedure TFrmCapturaDocumentos.QDocumentosAfterScroll(DataSet: TDataSet);
var bs : TStream; jp : TJpegImage; buff: Word;
begin
 bs := QDocumentos.CreateBlobStream(QDocumentosImagen,bmRead);
try
bs.Seek(0,soFromBeginning);
if bs.Read(buff,2) > 0 then
begin
  bs.Seek(0, soFromBeginning);
  case buff of
  $4D42: myImg.Picture.Bitmap.LoadFromStream(bs);
  $0000: myImg.Picture.Icon.LoadFromStream(bs);
  $0001,$CDD7: myImg.Picture.Metafile.LoadFromStream(bs);
  $D8FF: begin
  jp := TJpegImage.Create;
  jp.LoadFromStream(bs);
  myImg.Picture.Assign(jp);
  FreeAndNil(jp);
  end
  else myImg.Picture := nil;
end;
end;
finally
FreeAndNil(bs);
end;
end;

[sercornejov]

Gracias PAOTI por contestar.

La verdad para guardarlo y traerlo por medio de TQuery lo hago parecido y me funciona sin problemas.

Lo que pasa es que la tabla es bastante extensa, además tiende a crecer en 500 fotos diarias (y así lo hara, con decrementos estimados por lo menos surante un años. Calculo que al final del ejercicio de nuevos visitante debe haber en la base de datos 120.000 fotos distintas.

Debido al tamaño de la tabla, y a la cantidad de requerimientos al día (2000 visitas diarias entre visitantes existentes y nuevos), decidí hacer las consultas por medio de los procedimientos almacenados, pues es mucho mas rápido y genera menos carga de operaciones en el cliente.

Como dije antes, los SP se ejecutan muy bien, rapido. el problema es acceder al dato de foto (parametro vis_foto) y poder:

1. colocarlo en un Timagen si el clinte existe
2. poder hacer un UPDATE si se cambia la foto, la cual es capturada por una cámara webcam, enviada al portapapeles, convertida a JPG y luego colocada en el TImage, para de ahi pasarlo al campo...

luego: