对delphi的重要控件myDac的深入分析

zhgc

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

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

function GetCreateSQL: _string;

1. begin
   
2.   if (FConnection.FServerPrimaryVer = 5) and (FConnection.FServerMinorVer = 0) and
   
3.     (FConnection.FServerReleaseVer < 4)
   
4.   then
   
5.     _GetSPParams(IsFunc, ParamList, ReturnParam)
   
6.   else
   
7.     with GetParamBlock(GetCreateSQL) do
   
8.     begin
   
9.       ParamList := Params;
   
10.       ReturnParam := Returns;
    
11.     end;
    
12. end;

复制代码

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

zhgc

Using unsupported buffer type:253 (parameter:3)

方法：去掉.Prepare和UnPrepare