1. Add a rectangle to your Detail band. Choose ParentHeight, ParentWidth, Stretch and Shift if necessary. Use Send to Back to place it behind the text.
2. In the Detail band's BeforePrint event, add a little code:
if (Detail.Count mod 2) = 0 then Shape1.Brush.Color := clAqua else Shape1.Brush.Color := clWhite;
Comments
1. Add a rectangle to your Detail band. Choose ParentHeight, ParentWidth,
Stretch and Shift if necessary. Use Send to Back to place it behind the
text.
2. In the Detail band's BeforePrint event, add a little code:
if (Detail.Count mod 2) = 0 then
Shape1.Brush.Color := clAqua
else
Shape1.Brush.Color := clWhite;
Jim Shawver
BCC Software, Inc.