Hi,
um den Hintergrund komplett blau zu malen, reicht auch folgendes, was ebenfalls den Vorteil hat, dass es wesentlich schneller ist:
Delphi-Quellcode:
PaintBox.Canvas.Brush.Color := clBlue;
PaintBox.Canvas.FillRect(PaintBox.ClientRect);
Dann brauchst du nur noch die entsprechenden Pixel mit Fischen und Haien zu füllen.
Das Ganze machst du dann, wie von turboPascal gesagt in dem OnPaint-Ereignis, damit das auch vernünftig neu gezeichnet wird.
Gruß
angos