锐浪报表 Grid++Report 明细表格标题重复打印

一、问题提出

? ? 锐浪报表 Grid++Report，打印表格时，对于明细表格的标题，打开换页时，需要重复打印明细表格的标题，或取消打印明细表格的标题。见下表：

首页：

后续页：（无明细表格的标题）

后续页重复打印明细表格的标题：

二、解决办法

? ? 1、RepeatStyle 属性

? ? 这里，要使用?RepeatStyle 属性，其值是枚举类型，见下表。

? ? 2、在GridppReport的FetchRecord事件中处理

? ?（1）做一个按键选择

? ? （2）加入以下代码

procedure TY_Standing_orders_Frm.GridppReport3FetchRecord(Sender: TObject);
var S,S1,S2,S3,S4:string;
begin
  if sCheckBox18.Checked
    then GridppReport3.DetailGrid.ColumnTitle.RepeatStyle:=grrsOnPage    // 枚举值2
    else GridppReport3.DetailGrid.ColumnTitle.RepeatStyle:=grrsNone;     // 枚举值0
  ExportTitle:='医疗服务_医嘱_'+ClientDataSet1.FieldByName('姓名').asString;
  GRP1:=GridppReport3.AddParameter('UsesN',grptString);
  GridppReport3.ParameterByName('UsesN').AsString:=UsesName;
  S1:=ClientDataSet1.FieldByName('性别').asString;
  S2:=ClientDataSet1.FieldByName('年龄').asString;
  ....
end;

? ? ?实现让客户，通过选择，打印出所需明细表格的标题的目的。