qr中的qrdbtext的onprint事件，在fastreport怎样写(100分)

在quickreport中是这样写的
procedure TForm2.QRDBText1Print(sender: TObject;
var Value: String);
begin
value:='第'+adoquery1.fieldbyname('收文序号').asstring +'号'
end;
想实现同志的功能在fastreport中怎样写？

Fast report 是不行的﹐換報表工具吧﹐report builder可以