Me trae de los pelos el PARAMETRO

[sercornejov]

Hola. Yo y mis cosas...

D6, FB1.5, WXP Pro.

Tengo un procedimiento almacenado que me devuelve (con exito) 8 parámetros, entre estos un campo blob (una foto jgp de 5Kb). La cosa es que puedo manipular y aprovechar todos lso parámetros menos el de la foto, pue no se como, por ejemplo, colocarlo en un TImage para mostrarlo.

Si me expliqué?

CREATE PROCEDURE PR_VISEXISTE (
    VISCC VARCHAR(15))
RETURNS (
    VIS_ID INTEGER,
    VIS_CC VARCHAR(15),
    VIS_NOMBRE VARCHAR(60),
    VIS_ESTADO SMALLINT,
    VIS_ADENTRO SMALLINT,
    VIS_ULTVIS TIMESTAMP,
    VIS_ULTARE SMALLINT,
    VIS_ULTEMP INTEGER,
    VIS_FOTO BLOB SUB_TYPE 0 SEGMENT SIZE 80,
    NOEXISTE SMALLINT)
AS
begin
  noexiste=1;

  select vis_id,vis_cc,vis_nombre,vis_estado,vis_adentro,vis_ultvis,vis_ultare,vis_ultemp,vis_foto
  from visitante
  where vis_cc=:viscc
  into :vis_id, :vis_cc, :vis_nombre,:vis_estado,:vis_adentro, :vis_ultvis, :vis_ultare, :vis_ultemp,:vis_foto;

  if (vis_id is null) then
    noexiste=0;

  suspend;
end

Ese el procedimiento.

para ejecutarlo y tomar los parámetros:

  dmppal1.fbproVisExiste.prepare; //dmppal1 es el DataModule
  dmppal1.fbproVisExiste.Params.Items[10].Value:=id;
  dmppal1.fbproVisExiste.ExecProc;
  dmppal1.fbproVisExiste.UnPrepare;

  existe:=dmppal1.fbproVisExiste.Params.Items[9].Value;
  visid:=dmppal1.fbproVisExiste.Params.Items[0].Value;
  nombre:=dmppal1.fbproVisExiste.Params.Items[2].Value;
  visEstado:=dmppal1.fbproVisExiste.Params.Items[3].Value;
  adentro:=dmppal1.fbproVisExiste.Params.Items[4].Value;
  ultimaVis:=dmppal1.fbproVisExiste.Params.Items[5].Value;
  area:=dmppal1.fbproVisExiste.Params.Items[6].Value;
  empleado:=dmppal1.fbproVisExiste.Params.Items[7].Value;

todos funcionan, pero no se como asignar (o a qué asignar) el parámetro 8 que es la foto.

Ayyuda.......................

Sergio