[dúvida] DBGrid Zebrado

[JonatanWillian]

Olá amigos, tudo bem? Sou novo por aqui, e novo também no Lazarus. Gostaria de dizer que é muito bom programar no Lazarus. Sou um mero iniciante (não tenho cursos ou qualquer outra coisa assim relacionado à programação).

Bom, estou iniciando um projeto bem "pequeno", que consistem em desenvolver um emissor de recibos completo. Estou com ele já encaminhado, dem uma olhada na interface principal:
(http://i.imgur.com/KQhWX.png)

Estou com duas dúvidas.

1) Como deixar o DBGrid Zebrado?
Encontrei alguns scrips pra delphi, que não funcionaram no Lazarus. Em um deles o Lazarus não reconhece a seguinte linha:
     if (DSRecibos.dataset.recordcount = 0) and (gdSelected in state) then canvas.brush.color := clSilver
     else
     begin
          if (gdSelected in state) then canvas.Brush.Color := clGreen
          else
          if   DBGridRecibos.SelectedRows.CurrentRowSelected
          then canvas.Brush.Color := CLRed
          else
          if   QRRecibos.RecNo mod 2 = 0
          then canvas.Brush.Color := clblue
          else canvas.Brush.Color := clred;

          canvas.Font.Color := $FFFFFF xor canvas.Brush.Color;
     end;

     DBGridRecibos.DefaultDrawColumnCell(Rect,DataCol,Column,State);
--->   inherited DrawColumnCell(Rect,DataCol,Column,State); 

2) Como alterar o formato da data? A data está sendo gravada no BD (SQlite) no seguinte formato: DD-MM-AAA, quando deveria ser assim: DD/MM/AAAA.

Agradeço muitíssimo pela atenção. Qualquer dica ou sugestão eu agradeço 

[Mando]

Olá.

Te escribo en español:

Debes probar con las propiedades "AlternateColor"  y  "Color" del DBGrid.

En Código.

DBGridRecibos.AlternateColor:=clBlue;
DBGridRecibos.Color:=clRed;

[JonatanWillian]

Gracias, voy a probar.

[deciorocha]

Olá pessoal, desculpem ressuscitar um tópico antigo, todavia, isto muito me interessa... 

Afinal, conseguiram criar um dbgrid zebrado para o Lazarus??? eu tenho um que veio do DTDelphi, mas, não consegui fazê-lo funcionar no Lazarus.

Obrigado!!!