ADOStoredProc := TADOStoredProc.Create(nil);
ADOStoredProc.Connection := ADOConnection;
ADOStoredProc.ProcedureName := '存储过程1'; //设定存储过程
ADOStoredProc.Parameters.CreateParameter(...); //设定出入参数值
ADOStoredProc.Prepared := True;
ADOStoredProc.ExecProc;
ADOStoredProc.Free;
ADOStoredProc.Connection := ADOConnection;
ADOStoredProc.ProcedureName := '存储过程1'; //设定存储过程
ADOStoredProc.Parameters.CreateParameter(...); //设定出入参数值
ADOStoredProc.Prepared := True;
ADOStoredProc.ExecProc;
ADOStoredProc.Free;