Problem bei Pong Programmierung

[Corpsman]

Ho das

if PointInCircle(Point(0,0), Point(Shape1.left, Shape1.Top), 50) then ist sowieso falsch

richtig wäre

if PointInCircle(Point(0,0), Point(Shape1.left + shape1.width div 2, Shape1.Top+ shape1.height div 2), 50) then Du brauchst 2 Punkt als übergabe

1. Kollisionspunkt
2. Mittelpunkt des Kreises
die 50 ist der Radius also auch wieder shape1.width div 2 weil dein shape hoffentlich qaudratisch ist.