Alterando a cor da linha em StringGrid

Aí mano, StringGrid é mole pra nós!

Tenho um componente aqui q fiz q vai ter ajudar muito.... Se quiser, entre em contato.

Para trocar a cor da linha, no evento OnDrawCell coloque:

with Sender as TStringGrid do
begin

if ARow = 1 then
begin
Canvas.Brush.Color := clSilver;
Canvas.Font.Color := clWhite;
end;

Canvas.FillRect(Rect);

Canvas.TextOut(Rect.Left, Rect.Top, Cels[ACol, ARow]);
end;

Valeu!

Michael :D