Moin!
Hatte ein ähnliches Problem mit TImage.
Hier findest du es
Warum verwendest du TPaintBox ? Hier wird die Zeichenfläche doch automatisch aktualisiert. D.h. nach jeder Zeichenoperation wird alles dargestellt. So siehst du kurzzeitig das durch FillRect verursachtes Vakuum.