Hola Neftalí, quizá sea tu componente mi solución.
Quiero hacer esto :
http://www.clubdelphi.com/foros/showthread.php?t=27536
Y he utilizado tu componente, pero no me pinta los diferentes colores haciéndole este código
Código Delphi
[-]
procedure TFLibroNegro.CustomizeGrid1PaintRow(DS: TDataSet;
var RowColor: TColor; var ChangeColor: Boolean);
begin
if (NumSubObr_ant <> RxDBGridLibNegro.Fields[1].Value) and (RxDBGridLibNegro.Canvas.Brush.Color = clinfoBk) then
RxDBGridLibNegro.Canvas.Brush.Color := clSkyBlue;
NumSubObr_ant := RxDBGridLibNegro.Fields[1].Value;
end;
He asociado al Componente dicho RxGrid, el DefaultDrawing a True, y chico ... nada.
¿me falta algo?
Un saludo y gracias.