Colorear filas pares rxDBGrid??????

[mguixot]

Hola amigos,
estoy intentando colorear las filas pares de un RXDBGrid, pero no me funciona, me pinta algunas columnas, y me gustaria saber si el código está mal, o no funciona por alguna opcion del componente RXDBGrid.

... codigo ....

procedure TListadoLibro.RxDBGridListadoLibrosGetCellParams(Sender: TObject;
Field: TField; AFont: TFont; var Background: TColor; Highlight: Boolean);
begin
if Odd(Field.Index) then
Background := clWhite
else
Background := $00D5FFFF;
end;


Saludos y gracias

[andres1569]

Hola:

Con la instrucción if Odd(Field.Index) then ... accedes al índice de los campos, por lo tanto afecta a las columnas y no a las filas como indica el título de tu mensaje.

No es fácil saber qué filas (registros) son pares e impares, salvo que tengas un campo que así lo indique (y que tenga valores correlativos sin huecos), aunque quizás, dependiendo de la base de datos que utilices, te pueda servir acceder a la propiedad RecNo del DataSet correspodiente, y comprobar si es par o no. De todas formas, no estoy ahora seguro de si RecNo devuelve el nº de registro en la base de datos o el nº dentro del objeto TDataset, si es lo primero (creo que sí) sólo te servirá cuando muestres los registros sin filtrar y en el mismo orden en que se hallan en la base de datos.

Otra cosa no se me ocurre,

Un saludo