1)
Zitat:
if (img_mario.left < img_stern.left) and (img_mario.Left > img_stern.left + img_stern.Width)
Wie kann img_mario.left gleichzeitig kleiner als img_stern.left und größer als img_stern.left + img_stern.Width sein?
2)
Zitat:
then Punkte + 1;
Entweder
Punkte := Punkte + 1;
oder
inc(Punkte);