delphi - 如何在 FastReport 4 中使用自定义 Delphi 函数？

Question

我想在 FastReport 中使用自定义 Delphi 函数，我可以在设计时将该函数用于某些 frxMemoView。我在 web 中找到了一些建议，例如快速报告中的 Addfunction，但我在 FastReport 的函数选项卡中看不到我的函数。请帮我。

谢谢侯赛因

Answer 1

TLama 提到的在报告中使用自定义函数的示例几乎可以正常工作。

您可能会遇到两个问题。

第一：文档在构造函数TFunctions.Create中有两个bug；一个缺失的开始，一个多余的 '
正确的实现将是

constructor TFunctions.Create;
begin
inherited Create(AScript);
with AScript do
   begin
   AddMethod('function MyFunc(s: String; i: Integer): Boolean', CallMethod,
            'My functions', ' MyFunc function always returns True');
   AddMethod('procedure MyProc(s: String)', CallMethod,
            'My functions', ' MyProc procedure does not do anything');
   end;
end;

第二个“问题”是您不能期望通过双击报表来查看 IDE 中的功能，只有在运行时调用 DesignReport 时才能进行选择。此选项在 XE3 附带的限量版中不可用。

begin
   //......
   frxReport1.DesignReport;
  //......
end;