ram;
Begin
...
With StoredProc1 Do
Begin
StoredProcName := ''''GET_EMP_PROJ'''';
Params.Clear;
P1 := TParam.Create(Params, ptInput);
P2 := TParam.Create(Params, ptOutput);
TryParams[0].Name := ''''EMP_NO'''';Params[1].Name := ''''PROJ_ID'''';
ParamByname(''''EMP_NO'''').AsSmallInt := 52;
ExecProc;Edit1.Text := ParamByname(''''PROJ_ID'''').AsString;
FinallyP1.Free;
P2.Free;
End;
End;
...
End;
10.5.7 ParamBindMode属性
这个属性用于设置Params属性中的每一个参数与存储过程的参数怎样匹配。
如果ParamBindMode属性设为pbByName(默认)，表示Params属性中的参数按名称与存储过程的参数匹配。
如果ParamBindMode设为pbByNumber，表示Params属性中的参数按序号与存储过程的参数匹配。
建议把ParamBindMode属性设为pbByName，因为按名称匹配不需要参数的顺序，而按序号匹配往往容易搞错。不过，有的情况下可能需要按序号匹配，因为有的服务器并没有提供参数的名称。
上一页 [1] [2] |
