por favor alguien que me ayude tengo probelmas con un IBStored proc
 

no se como agregar guardar una imagen mediante el ibstoredproc, no se como definir el parametro ni como pasarlo he intentado de varias formas y me marca error este es el codigo:
sp:=TIBStoredProc.Create(nil);
sp.Database:=DtMdlEstetica.DbEstetica;
sp.StoredProcName:='SP_MODIFICA_EMPRESA';
sp.Params.CreateParam(ftString, 'PI_NOMBRE', ptInput).AsString:=nombre;
sp.Params.CreateParam(ftString, 'PI_DOMICILIO', ptInput).AsString:=domicilio;
sp.Params.CreateParam(ftString, 'PI_TELEFONO', ptInput).AsString:=telefono;
sp.Params.CreateParam(ftString, 'PI_PAGINAWEB', ptInput).AsString:=paginaweb;
sp.Params.CreateParam(ftBlob, 'PI_LOGO', ptInput);
bs:=TBlobStream.Create(TBlobField(sp.ParamByName('PI_LOGO')), bmReadWrite);
img:=TJPEGImage.Create;
img.Assign(logo.Picture);
img.SaveToStream(bs);
img.Free;
bs.Free;
sp.Free;