cambiar color a la fila seleccionada de un grid!!

[triniti]

Hola a todos! he estado buscando mucho por internet y no he encontrado nada, a ver si vosotros me podeis ayudar: ¿Se puede cambiar el color de seleccion de una fila en un dbGrid y un StringGrid? Por defecto es azul, pero con los colores de mi aplicación no pega ni con cola.

Muchas gracias de antemano. Saluditos!!

[ruina]

para un Dbgrid puedes poner esto en el evento OnDrawColumnCell:

Código Delphi [-]
procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
    if (gdSelected in State) then
        TDBGrid(sender).Canvas.Brush.Color:=clteal;
    TDBGrid(sender).DefaultDrawColumnCell(Rect,DataCol,Column,State);
end;

[triniti]

Muchas gracias! El procedimiento funciona perfectamente y solo he tenido que cortarlo y pegarlo, jeje, contigo da gusto.

Saludos y gracias!!