Tabsheet Color

[Sidi61]

Hallo zusammen,

zum Thema PageControl TabSheet mit Farbe füllen gibt es viele Beiträge. Auf SwissDelphiCenter.ch habe ich ein Beispiel gefunden wovon ich glaube es könnte funktionieren. Ich habe das Beispiel umgesetzt, Delphi meldet jedoch an einer Stelle einen Fehler:

Delphi-Quellcode:

procedure TTabSheet.WMEraseBkGnd(var Msg: TWMEraseBkGnd);
begin
  if FColor = clBtnFace then
    inherited
  else
  begin
    Brush.Color := FColor;
    Windows.FillRect(Msg.dc, ClientRect, Brush.Handle);
    Msg.Result := 1;
  end;
end;

Windows.FillRect kennt er nicht und ich komme nicht drauf was in die uses eingebunden werden muss - kann mir da jemand auf die Sprünge helfen?

Gruß