Problema na marcação das linhas da tabela
Olá Pessoal,
O meu problema em questão é que as linhas que eu coloquei como coloridas na minha tabela (somente as linhas que sofreram alteração de cor), quando eu seleciono elas não ficam aquela cor de que a linha foi selecionada ou seja marcada (mesmo que a seleção esteja funcionando, ela só não fica marcada) e as que eu não colori marcam normalmente. Não é questão de cor pois já testei isso. O código que eu desenvolvi está abaixo. Agradeceria muito a ajuda de vocês! Desde já muito agradecido!
O meu problema em questão é que as linhas que eu coloquei como coloridas na minha tabela (somente as linhas que sofreram alteração de cor), quando eu seleciono elas não ficam aquela cor de que a linha foi selecionada ou seja marcada (mesmo que a seleção esteja funcionando, ela só não fica marcada) e as que eu não colori marcam normalmente. Não é questão de cor pois já testei isso. O código que eu desenvolvi está abaixo. Agradeceria muito a ajuda de vocês! Desde já muito agradecido!
procedure TF_Modelo.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if not odd(dtsConsulta.DataSet.RecNo) then
begin
DBGrid1.Canvas.Brush.Color:= $00FFFFB9;
DBGrid1.Canvas.FillRect(rect);
DBGrid1.DefaultDrawDataCell(rect,Column.Field,State);
end;
end;
Edson Vilhalba
Curtidas 0