关于3层结构中动态存储过程如何传递参数？？？？

Question

在中间件上面加上ADOStoredProc,含有一个参数，连接DataSetProvider上面，
有什么机制可以使存储过程的参数从客户端到中间件上面呢？？？

Answer 1

使用OleVariant類型參數客戶端﹕
  var  parameArr: OleVariant;  parameArr := VarArrayCreate([0,INTVALUE],VarOleStr);
  parameArr[0] := 'adfafaf';中間件中  將Parame當作一個數組使用﹕
  for I := 0 to VarArrayHighBound(parameArr,1) do
    ADOStoredProc.Parameters[I+1].Value := parameArr[I];   //此處未考慮參數類型(字符型﹑數值值﹑邏輯型)