fastreport 怎么使数据自动扩展
现在又一组数据，结构及数据如下：
类型 姓名 年薪
2 tom 200
1 jack 200
3 lucy 100
2 tim 100
3 henry 300
...
要怎么在fastreport中实现如下的效果
类型 姓名
1 jack 200
小计 200
————————————
2 tom 200
tim 100
小计 300
————————————
3 henry 300
lucy 100
小计 400
————————————
合计 900

按类型分类扩展，根据后面姓名的条数，前面的分类就自动扩展合并显示类型
要如何实现，求解,
有实例的话最好 delphiort fastreport
[解决办法]
var v:String; //全局变量

procedure frxDBDataset1uper_depart_idOnAfterData(Sender: TfrxComponent);
begin //分组的字段
frxDBDataset1uper_depart_id.Visible:=(v<>frxDBDataset1uper_depart_id.Value);
v:=frxDBDataset1uper_depart_id.value;
end;

procedure GroupFooter1OnAfterPrint(Sender: TfrxComponent);
begin //组脚
frxDBDataset1uper_depart_id.Visible:=True;
end;

[解决办法]
这个用分组或主从表都可以实现，具体，看看自带的DEMO