Boder for detail band

rbuser

Hi,

ReportBuilder v 10.09, Delphi 7 on WinXp refers.

My intention is to draw a border for the detail band and also to draw
vertical lines between columns.

On my detail band, I use a TppShape (with Pen.Style = psClear) to generate
an alternate color for every second record by using the following code:

procedure TDataModule1.ppDetailBand1AfterPrint(Sender: TObject);
begin
if (ppShape2.Brush.Color = clWhite) then
ppShape2.Brush.Color := RGB(139, 245, 174)
else
ppShape2.Brush.Color := clWhite;
end;

I tried using a TppPageStyle, with another TppShape in it to draw the
required borders but it seems I need a kind of transparency in TppShape
because the TppShape in the detail band suppresses the one in TppPageStyle.

I also tested it using a TppRegions instead of TppShapes but no success.
Also a TppImage in the TppPageStyle band does not show in the generated
report.

Any suggestions?


Regards,

Nols Smit

nicocizik

Hi Nols,

By definition, the anything placed on the PageStyle will print behind any
component(s) on the main report.

One option would be to place the column lines or shapes inside the detail
band and have them StretchWithParent if you are using dynamic height bands.
This will ensure the lines stretch to the height of the detail band for each
traversal.

--
Regards,

Nico Cizik
Digital Metaphors
http://www.digital-metaphors.com