Table1 := Array(
('A':6,'B':20,'C':1),
('A':5,'B':20,'C':2),
('A':9,'B':2,'C':3),
('A':2,'B':20,'C':4),
('A':7,'B':18,'C':5));
Return vSelect aggof('AggSumSample',['C']) from Table1 end; //返回结果15
//自定义的AggSumSample聚集函数。
Function AggSumSample(Flag,Value);
begin
  if FLag=0 then
  begin
   SysParams['SumSample']:=0;
   return true;
  end
  else if Flag=1 then
  begin
   SysParams['SumSample']:=SysParams['SumSample']+Value;
   return true;
  end
  else
   return SysParams['SumSample'];
end;