FastReports Pro VCL调用C++用户函数时提示“实参过多”如何解决？

我尝试在FastReports Pro中通过用户函数对字段进行解码操作，操作步骤如下：

1. 在主窗体构造函数中添加用户函数：

frxReport1->AddFunction(_D("void ChangeReportField(String fieldstr, String otherfieldstr)"));

2. 在FastReports的C++Script代码标签中编写事件代码：

void MasterData1OnBeforePrint(TfrxComponent Sender)
{
    ChangeReportField(<frxDBDataset1."Field1">, <frxDBDataset1."Field2">);                                                                                                   
}

3. 配置了TfrxReport组件的OnUserFunction事件：

Variant __fastcall TMainForm::frxReport1UserFunction(const UnicodeString MethodName, Variant &Params)
{ }

运行报表时收到错误提示：

Too Many Actual Parameters

错误指向MasterData1OnBeforePrint()中ChangeReportField(的左括号。我清楚当前函数未实现功能，待成功调用用户函数后再完善逻辑，请问哪里操作有误？

问题原因及解决方法 #

这个错误的核心原因是FastReports的用户函数参数传递机制和你声明的方式不匹配：

• FastReports的用户函数会把所有传入的参数打包到Variant类型的Params数组中，而非作为独立参数传递。
• 你在AddFunction里声明了两个独立参数，但脚本调用时传入的参数会被额外计数，和内部的Params机制冲突，触发"参数过多"错误。

修正步骤： #

1. 修改用户函数声明：
   不需要指定具体参数列表，改成无参数声明：

   frxReport1->AddFunction(_D("void ChangeReportField()"));
   

2. 保留脚本中的调用代码：
   字段参数的传递方式不变，FastReports会自动将其打包到Params数组：

   void MasterData1OnBeforePrint(TfrxComponent Sender)
   {
       ChangeReportField(<frxDBDataset1."Field1">, <frxDBDataset1."Field2">);
   }
   

3. 在OnUserFunction事件中读取参数：
   通过Params数组索引（从0开始）获取传入的字段值：

   Variant __fastcall TMainForm::frxReport1UserFunction(const UnicodeString MethodName, Variant &Params)
   {
       if (MethodName == _D("ChangeReportField"))
       {
           UnicodeString fieldStr = Params[0];
           UnicodeString otherFieldStr = Params[1];
           // 此处添加你的解码逻辑
       }
       return Null();
   }
   

补充说明： #

FastReports用户函数的参数传递采用统一的Params变体数组机制，无论脚本中传入多少参数，都会被打包到该数组中。因此声明函数时不能指定参数列表，否则会和内部逻辑冲突，导致参数数量不匹配的错误。

内容的提问来源于stack exchange，提问作者user3161924