grade colorida

[ademilson Moreira 0]

Quando a gente coloca uma grade e uma tabela no formulário, somente a celula ativa e que fica colorida... alguem sabe como colorir a linha toda?

[Rodrigo Miss 1]

Ola beleza?

neste meu code, você vai montar um DBGrid zebrado ...

 

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;   DataCol: Integer; Column: TColumn; State: TGridDrawState); begin   if State = [] then   begin	 if ADOQuery1.RecNo mod 2 = 1 then	   DBGrid1.Canvas.Brush.Color := clMoneyGreen	 else	   DBGrid1.Canvas.Brush.Color := clWhite;   end;   DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State); end;

e ainda se quiser...

na propriedade Options do DBGrid, sete como false a opcao dgRowSelect