du musst Form1(in deinem fall Pingpong).Repaint vor dem erneuten zeichenvorgang hinzufügen

(dann ist immer nur eine linie

)
ah sorry nachzeichnen ist nicht schwer - du musst aber auf jeden fall immer die ganze zeichenfläche imemr speichern und laden damit nicht überzeichnet wird(sry wenns einfacher geht hab n jahr pause gemacht mit delphi

) - auf jeden fall würd ich dir empfehlen eien Paintbox zu machen

(gibt hier auch solche tutorials bei grafik in der codelib guck dort mal

)
grüße Nico