如何打印复杂结构的报表？

Question

三个表示主从关系，可以这样打印：
植物   树        梧桐树
植物   树        柳树
植物   树        杨树
植物   草        小草
植物   草        枯草
动物   地上走的  人
动物   地上走的  大象
动物   地上走的  孔雀
动物   天上飞的  老鹰
动物   天上飞的  燕子
动物   天上飞的  乌鸦但我想这样打印：
                 梧桐树
       树        柳树
植物             杨树
       草        小草
                 枯草
                 人
       地上走的  大象
                 孔雀
动物             老鹰
       天上飞的  燕子
                乌鸦请问如何解决？

Answer 1

private
    F1, F2: String;procedure TForm1.QRDBText1Print(sender: TObject; var Value: String); //第一个字段
begin
  if F1 <> Value then
    F1 := Value
  else Value := '';
end;procedure TForm1.QRDBText2Print(sender: TObject; var Value: String);  //第二个字段
begin
begin
  if F2 <> Value then
    F2 := Value
  else Value := '';
end;—————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
—————————————————————————————————

Answer 2

使用fastreport控件,demos目录有例子