Dbgrid row color problem

Using delphi 3
This code will change the text ROW color of a dbgrid.
My question is how do I change the background row color
of a dbgrid so that I can display 2 different row colors while still
preserving
the highlight status bar ?
Any help would be greatly app!

Thanks Dean

procedure TForm1.DBGrid1DrawColumnCell(Sender: TObject; const Rect:
                               TRect;
                               DataCol: Integer; Column: TColumn; State:
TGridDrawState);
                               begin
                               if
Table1.FieldByName('Population').AsInteger > 20000000 then
                               DBGrid1.Canvas.Font.Color := clBlue;
                               DBGrid1.DefaultDrawColumnCell(Rect,
DataCol, Column, State);
                               end;