Restrict masterdata to four rows per groupheader

Comments

• gpi

  April 2012 edited 8:11PM

  Use
  <line> div 4
  group condition
• yossarian

  September 2012 edited 8:11PM

  Hi joba!
  
  I'm in the same situation. Did you manage it. If I changed the group condition to <line> div 4 instead of fieldname the report not worked properly. It split one group's data into four rows with the same group name.
• gordk St.Catherines On. Canada.

  September 2012 edited 8:11PM

  leave your group condition as to what it should be
  add code to your masterdataband
  typical
  procedure Band4OnBeforePrint(Sender: TfrxComponent);
  begin
  Band4.visible := (<line> < 5); // value is one highter than what you want display.
  end;
• yossarian

  September 2012 edited 8:11PM

  gordk wrote: »

  leave your group condition as to what it should be
  add code to your masterdataband
  typical
  procedure Band4OnBeforePrint(Sender: TfrxComponent);
  begin
  Band4.visible := (<line> < 5); // value is one highter than what you want display.
  end;

  
  Thanks gordk!
  
  But how can I do that at runtime. Should I add before print event with script? Can I do that with fastreport shipped with delphi xe2? Thx in advance.
• yossarian

  September 2012 edited 8:11PM

  gordk wrote: »

  leave your group condition as to what it should be
  add code to your masterdataband
  typical
  procedure Band4OnBeforePrint(Sender: TfrxComponent);
  begin
  Band4.visible := (<line> < 5); // value is one highter than what you want display.
  end;

  
  
  I tried that at runtime this way:
  Report.ScriptText.Clear;
  Report.ScriptText.Add('procedure MasterData1OnBeforePrint(Sender: TfrxComponent);');
  Report.ScriptText.Add('begin');
  Report.ScriptText.Add(' MasterData1.Visible := (<line> < 4);');
  Report.ScriptText.Add('end;');
  
  Report.ScriptText.Add('begin');
  Report.ScriptText.Add(' MasterData1.OnBeforePrint :='+''''+'MasterData1OnBeforePrint'+''''+';');
  Report.ScriptText.Add('end.');
  
  But it didnt' work.
• gordk St.Catherines On. Canada.

  September 2012 edited 8:11PM

  AFAIK the version shipped with xe2 does not have scripting.