获取存储过程的 OUT BLOB 类型参数作为 TStream
Get an OUT BLOB type Parameter of a Stored Procedure as TStream
我的 MySQL 数据库上有一个存储过程,带有 2 个 Blob 类型的 OUT 参数
我想通过 UniDAC 的 SP 组件将它们的值作为 TStream 获取,我已尝试使用此代码进行测试:
SP := TUniStoredProc.Create(nil);
M := TMemoryStream.Create;
try
try
SP.StoredProcName := 'user_getpic';
SP.PrepareSQL(False);
SP.Params.ParamByName('fUID').AsString := '...';
SP.Params.ParamByName('fDiceCode').AsString := '...';
...
SP.ExecProc;
M.LoadFromStream(SP.Params.ParamByName('fUPic').AsStream);
except
on E:EXception do
begin
ShowMessage('Error : ' + E.Message);
end;
end;
finally
SP.Free;
M.Free;
end;
问题是 Param.AsStream returns Nil 但 Param.AsBlob 不是 Nil
当我在MySQL上直接调用这个SP时fUPic有blob数据,在SP
上没有问题
我试过 SP.CreateBlobStream() 但我应该将什么作为 TField 传递给它的第一个参数?!
我试过从 Param.AsBlob 投射到 TBlobStream 但没成功!
我想知道如何获取 OUT blob 参数作为 TStream?
我正在使用 Delphi XE6 和 UniDAC 6.1.4
使用AsBlob
。它 returns 将 blob 作为字节数组。您可以直接使用它,或者如果您需要通过流访问数据,请使用 TBytesStream
.
Stream := TBytesStream.Create(Param.AsBlob);
我的 MySQL 数据库上有一个存储过程,带有 2 个 Blob 类型的 OUT 参数
我想通过 UniDAC 的 SP 组件将它们的值作为 TStream 获取,我已尝试使用此代码进行测试:
SP := TUniStoredProc.Create(nil);
M := TMemoryStream.Create;
try
try
SP.StoredProcName := 'user_getpic';
SP.PrepareSQL(False);
SP.Params.ParamByName('fUID').AsString := '...';
SP.Params.ParamByName('fDiceCode').AsString := '...';
...
SP.ExecProc;
M.LoadFromStream(SP.Params.ParamByName('fUPic').AsStream);
except
on E:EXception do
begin
ShowMessage('Error : ' + E.Message);
end;
end;
finally
SP.Free;
M.Free;
end;
问题是 Param.AsStream returns Nil 但 Param.AsBlob 不是 Nil
当我在MySQL上直接调用这个SP时fUPic有blob数据,在SP
上没有问题我试过 SP.CreateBlobStream() 但我应该将什么作为 TField 传递给它的第一个参数?!
我试过从 Param.AsBlob 投射到 TBlobStream 但没成功!
我想知道如何获取 OUT blob 参数作为 TStream?
我正在使用 Delphi XE6 和 UniDAC 6.1.4
使用AsBlob
。它 returns 将 blob 作为字节数组。您可以直接使用它,或者如果您需要通过流访问数据,请使用 TBytesStream
.
Stream := TBytesStream.Create(Param.AsBlob);