FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Colorear filas pares rxDBGrid??????
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 |
#2
|
|||
|
|||
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
__________________
Guía de Estilo |
|
|
|