Debes programar dentro del evento BeforePrint de la banda que quieres resaltar, he aqui el codigo.
Código Delphi
[-]procedure TFCuentasCobrar.DetailBand1BeforePrint(Sender: TQRCustomBand;
var PrintBand: Boolean);
begin
if QRECuentasCobrar.DataSet.RecNo Mod 2 = 0 then
Sender.Color:= $00E5E5E5
Else
Sender.Color:= clWhite;
end;
posteriormente debes programar en el evento OnPrint de los QrdbText. el codigo es el siguiente
Código Delphi
[-]procedure TFCuentasCobrar.QRDBText1Print(sender: TObject;
var Value: String);
begin
if QRECuentasCobrar.DataSet.RecNo Mod 2 = 0 then
(Sender as TQRDBText).Color:= $00E5E5E5
Else
(Sender as TQRDBText).Color:= clWhite;
end;
para q no escribas codigo de mas, puedes hacer referencia al mismo envento por cada qrdbtext en el inspector de objetos. espero te sirva.