Hola, me habia ausentado de la oficina y no habia tenido oportunidad de leer tu respuesta.
Agradesco tu interes. Aqui va el codigo. Y efectivamente tengo problemas con la barra que marca el registro seleccionado.
Gracias
Saludos
Jose Miguel B.
Código Delphi
[-]
with Sender as TDBGrid do
begin
if ( Dt1.TDatReserva.RecNo div 2 ) = ( Dt1.TDatReserva.RecNo / 2 ) then
Canvas.Brush.Color := $00FBEEE3;
DefaultDrawColumnCell(Rect, DataCol, Column, State);