Ich hatte das mal gelöst, aber ich habe gerade meinen Code nicht hier.
Ich glaube ich hab's so gelöst, kann es hier aber nicht ausprobieren.
Im DrawCell-Event des Grids:
Delphi-Quellcode:
If (gdSelected in State) then
With Sender as TStringGrid Do
Begin
Canvas.Brush.Color := clWhite;
Canvas.FillRect(Rect);
End;
Hoffe es hilft.