深圳全飞鸿

标题: 对delphi的重要控件myDac的深入分析 [打印本页]

作者: zhgc 时间: 2020-2-25 16:32
标题: 对delphi的重要控件myDac的深入分析
本帖最后由 zhgc 于 2020-2-25 16:40 编辑

1.为什么解析不到SP的参数？

MyClasses.pas
function UnbracketIfPossible(const Value: _string; out DataBase: _string; out ObjName: _string): _string;

function GetCreateSQL: _string;

begin
if (FConnection.FServerPrimaryVer = 5) and (FConnection.FServerMinorVer = 0) and
(FConnection.FServerReleaseVer < 4)
then
_GetSPParams(IsFunc, ParamList, ReturnParam)
else
with GetParamBlock(GetCreateSQL) do
begin
ParamList := Params;
ReturnParam := Returns;
end;
end;

复制代码

UnbracketIfPossible(Name, Database, ProcName);
UnbracketIfPossible(Value, sl);

作者: zhgc 时间: 2020-2-25 16:54
本帖最后由 zhgc 于 2020-2-25 17:01 编辑

Using unsupported buffer type:253 (parameter:3)

方法：去掉.Prepare和UnPrepare

欢迎光临深圳全飞鸿 (http://www.nagomes.com/disc/)