Home› General
ReportBuilder 22.06 now available including Delphi 12.2 support!
New Blog Posts: Merging Reports - Part 1 and Part 2

Alternating lines in green/white in PreviewForm?

rbuserrbuser
edited July 2001 in General
One of my users is a little shortsighted and would love to view his reports
in the preview form (at 100% zoom) in alternating lines in green / white or
similar. This would allow him to scan the preview report from side to side
and easily keep track of his position in the report.

1. Is there some (simple) way of doing this?
2. Could you suggest an alternate idea I can use?

THANKS!

Best regards,
Ray

Note: I'm using Delphi v5 with ReportBuilder Enterprise v6.

Comments

  • rbuserrbuser
    edited July 2001
    Drop a TppLine (or TppShape, as you need) in the report. Color it. Put it in
    the background and size it.

    . In the component's .OnPrint event, code something like:

    procedure TForm1.ppLine1Print(Sender: TObject);
    begin
    ppLine1.Visible := (Table1.REcNo mod 2 = 0);
    end;

    where ppBDEPipeline1 is the Table1 is the dataset for the report. If you are
    using a JIT pipeline, use the pipline's RecordIndex property.

    HTH
    Ed Dressel
    Team DM

  • rbuserrbuser
    edited July 2001

  • rbuserrbuser
    edited July 2001
    Yes, this works perfectly. I added the following simple logic, so that the
    bands only show up on the screen (and not on the printed page):

    procedure Shape1OnPrint;
    begin
    if Report.DeviceType = dtScreen
    then Shape1.Visible := (Detail.Count mod 2 = 0)
    else Shape1.Visible := False;
    end;

    My user is going to love this! Thanks.

    Best regards,
    Ray

This discussion has been closed.