Wie kann ich mit Delphi 7 enterpice ein ping pong abprallen

[FeindFunker]

Die einfachste Möglichkeit ist es einfach die Vektoren zu spiegeln.
Dafür 2 int Variablen anlegen, eine für die Geschwindigkeit in x- und eine für die in y-Richtung.
Wenn jetzt dein Objekt oben oder unten kollidiert, y-Skalar spiegeln (y = -y);
Bei einer Kollision Rechts oder Links, x-Skalar spiegeln (x = -x);

Die Lösung ist sehr unsauber (es gibt überschneidungen etc etc.) aber sollte für deine Zwecke (Info-Unterricht?) reichen.