Подсчет количества страниц

Kostik00

В отчете master/detail

Необходимо подсчитать и выдать количество страниц отдельно для каждого Master.

когдато давным давно в Fast Report 2.5 пришлось написать UDF - вот такого содержания

procedure TfrEdit.ReportUserFunction(const Name: String; p1, p2,
  p3: Variant; var Val: Variant);
var
  NewVal,OldVal:integer;
  ValStr,X:string;
  A,B:variant;


begin

  if Name='RESETMYPAGES' then
     FPageStr.Clear
  else
    if Name='MYPAGES' then
    begin
      TPReport.GetVariableValue(P1,A);
      TPReport.GetVariableValue(P2,B);
      X:=A;
      ValStr:=FPageStr.Values[x];
      NewVal:=B;

      if ValStr='' then  OldVal:=0
      else OldVal:=StrToInt(ValStr);

      if NewVal<OldVal then    NewVal:=OldVal;

      FPageStr.Values[x]:=IntToStr(NewVal);

      Val:=NewVal;
    end;
end;

Вот я подумал - эта задача не только у меня возникала - может я велосипед изобретаю?

Каким образом это можно сделать в Fast Report 3?