Cor da Linha no DBGrind

24/11/2005

Ola o meu problema é o seguinte

Estou tentando mudar a cor da linha toda do DBgrid que esta selecionada.

Alguem pode me ajuda??

Eu ate achei alguns exemplos na internet mas todos eu tenho que por uma condição para ele mudar a cor, eu gostaria que fosse quando eu clicasse em qualquer celular do dbgrid e ele selecionasse toda a linha.

Desde de Já agradeço


Lipe_lacerda

Respostas

24/11/2005

Magnof

No evento onDrawColumnCell do dbgrid coloque o código para mudar a cor da fonte do dbgrid e a chave do método para ´desenhar´ os dados.

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const
Rect: TRect;
DataCol: Integer;
Column: TColumn;
State: TGridDrawState);
begin
if (Column.Field.FieldName = ´NOMEDOCAMPO´) then
begin
if condição then // coloque aqui sua condição
begin
DBGrid1.Canvas.Brush.Color:= clAqua;
DBGrid1.Canvas.Font.Color:= clWindowText;
DBGrid1.Canvas.FillRect(Rect);
DBGrid1.DefaultDrawColumnCell(Rect, DataCol, Column, State);
end;
end;
end;

OU;

Caso queira marcar a linha inteira ao selecionar um registro; nas propriedades do dbgrid > options > dgrowselect deve estar True.


Responder Citar