Die PaintBox ist zum Zeichnen im OnPaint Event gedacht. Erstelle einen EventHandler für OnPaint und füge folgende Zeilen ein:
Delphi-Quellcode:
PaintBox1.Canvas.Brush.Color := clRed; //Oder welche Farbe auch immer du willst
PaintBox1.Canvas.FillRect(PaintBox1.Canvas.ClipRect);
Das sollte zumindest mal auf das hinauslaufen was du eigentlich vor hast.