C++builder调用Sqlserver存储过程

    TDateTime  dt;
    //if(pSocka->Receive(&dt,sizeof(dt)) <= 0) return false;

    char szStationID[10]={0};
    //if(pSocka->Receive(szStationID,sizeof(szStationID)) <= 0) return false;

    AnsiString strSql = "exec ups_StatisticsOfMonth :qtime,:sid,:Remain output";

    OutputDebugInfo("发送12个月统计数据:"+strSql,pSocka);

    //调用存储过程开始查询数据
    m_pAdo->Active = false;
    m_pAdo->SQL->Clear();
    m_pAdo->SQL->Add(strSql);
    m_pAdo->Parameters->Items[0]->Value = dt;//输入参数
    m_pAdo->Parameters->Items[1]->Value = szStationID;//输入参数
    m_pAdo->Parameters->Items[2]->Value = 0;//输出参数,须在此初始化
    m_pAdo->Active = true;
    
    //处理查询结果
    STWeight12Month  wh={0};
    int i = 0;
    while(!m_pAdo->Eof)
    {//查询结果
        wh.nTonWeight[i]  = m_pAdo->FieldByName("TonWeight")->AsInteger;
        wh.nDisWeight[i]  = m_pAdo->FieldByName("DisWeight")->AsInteger;
        i++;
        m_pAdo->Next();
    }
    //wh.nTonWeight[12] = wh.nTonWeight[0];
    //wh.nDisWeight[12] = wh.nDisWeight[0];
    wh.nRemainWeight = m_pAdo->Parameters->ParamByName("Remain")->Value;//取出输出参数
    //pSocka->Send(&wh,sizeof(wh));

    OutputDebugInfo("发送12个月统计数据",pSocka);