canvas.fillrect(rect); funktioniert nicht.

[anarkids]

Moin!

Man sieht ja öfters hier im Forum, dass jemand gern wissen würde, wie man eine bestimmte Zelle eines Stringgrids einfärbt. Dabei kommt dann oft sowas hier raus:

Delphi-Quellcode:

var matrix : array [0..17,0..7] of boolean;

procedure TForm1.stringgrid1SelectCell(Sender: TObject; ACol,
  ARow: Integer; var CanSelect: Boolean);
begin
  if matrix[acol,arow] = false then
    matrix[acol,arow] := true
  else matrix[acol,arow] := false;
end;

procedure TForm1.stringgrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
begin
case matrix[acol,arow] of
    false: stringgrid1.Canvas.brush.color:= clblack;
    true : stringgrid1.Canvas.brush.color:= clred;
  end;
  stringgrid1.Canvas.fillrect(rect); //genau das funktioniert bei mir nicht
end;

Aus irgendeinem Grund funktioniert der oben auskommentierte Befehl nicht. Ich bekomme so eine Fehlermeldung:
Es gibt keine überladene Version von 'Rect', die man mit diesen Argumenten aufrufen kann.

mfg...