sql-server – 将参数传递给TADOStoredProc(Delphi)的更好方法

我需要将大量SQL查询转换为存储过程.我有一些代码在一个Delphi过程中一次更新大约20或30个值.我可以处理创建存储过程来做这样的事情.问题是我将参数传递给存储过程的方式非常笨重,如下所示：

with stored_procedure do......
    Param := Parameters.AddParameter;
    Param.Name := '@SSN';
    Param.Value := edtSSN.text;

    Param := Parameters.AddParameter;
    Param.Name := '@FirstName';
    Param.Value := edtFirstName.Text;

    Param := Parameters.AddParameter;
    Param.Name := '@LastName';
    Param.Value := edtLastName.Text;

    Param := Parameters.AddParameter;
    Param.Name := '@UserRID';
    Param.Value:= GetRIDFromCombo(cbUser);

我也不确定是否会导致内存泄漏(是否需要释放此类TParameter对象？)

任何人都有更好的方法来处理大量的参数？ (我不能使用新的库.我必须使用ADO,我使用的sql是MSsql)(另外,我不使用ADO.net)

ReportMemoryLeaksOnShutdown := True;

AddParam(stored_procedure,'@SSN',edtSSN.text);
AddParam(stored_procedure,'@FirstName',edtFirstName.Text);
AddParam(stored_procedure,'@LastName',edtLastName.Text);
AddParam(stored_procedure,'@UserRID',GetRIDFromCombo(cbUser));