分别用BDE和ADO连接两个不同的数据库,Stream1是TBlobStream类型的变量if BDEQuery.FieldByName('Voice').IsNull then
      ADOQuery.Parameters.ParamByName('Voice').Value:=''
else begin
      Stream1:=TBlobStream.Create(TBlobField(BDEQuery.FieldByName('Voice')),bmRead);
      ADOQuery.Parameters.ParamByName('Voice').LoadFromStream(Stream1,ftBlob);
      Stream1.Free;
end;

解决方案 »

  1.   

    Stream1.Position := 0;
    ADOQuery.Parameters.ParamByName('Voice').LoadFromStream(Stream1,ftBlob);
      

  2.   

    ADOQuery.Parameters.ParamByName('Voice').Value:=''
    可能会有问题, 好像参数不能为空
      

  3.   

    ADOQuery.Parameters.ParamByName('Voice').Value:=''
    可能会有问题, 好像参数不能为空
      

  4.   

    ADOQuery.Parameters.ParamByName('Voice').Value:=''
    这而有问题