FillRect funktioniert nicht

[Nonsense]

Ja, natürlich!

Delphi-Quellcode:

procedure TGame.FormCreate(Sender: TObject);
begin
 Background := TBitmap.Create;

 Background.Height := Game.ClientHeight;
 Background.Width  := Game.ClientWidth;

 DrawScreen;
end;