Kollisionsabfrage mit if funktoniert nicht

[Coxy]

Hallo,
ich bin kurz davor mein Projekt zu beenden, allerdings fehlt mir noch das wichtigste und zwar die Kollisionsabfrage.
Da mir die meisten Lösenungen im Internet nicht verständlich und lang waren habe ich diese versucht selbst wie folgt zu lösen:

Delphi-Quellcode:

if (img_mario.left < img_stern.left) and (img_mario.Left > img_stern.left + img_stern.Width) then Punkte + 1;
if (img_mario.top < img_stern.top) and (img_mario.top > img_stern.Top + img_stern.Height) then Punkte + 1;

Mario ist ein image, welches man mit den Richtungstasten Steuern kann und der Stern ist ein Image welches sich von alleine bewegt.

Leider kommt bei mir der Fehler:
Anweisung erforderlich, aber Ausdruck von Typ Integer gefunden

Wie löse ich das am einfachsten?

[Edlmann]

Ersetz mal
Punkte + 1; durch
Punkte := Punkte + 1;

[DeddyH]

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);

[rollstuhlfahrer]

Ich würde für die Kollisionsabfrage mit PiInRect() prüfen. Und zwar alle 4 Eckpunkte der kleineren Komponente innerhalb der Fläche der größeren Komponente. Das finde ich auch übersichtlicher.

Bernhard

[DeddyH]

Noch einfacher wäre es IMO mit IntersectRect.

[ConnorMcLeod]

Zitat von Coxy:

then Punkte + 1;

???

[nuclearping]

Wozu ein neuer Thread?

http://www.delphipraxis.net/160154-f...die-mauer.html

[Luckie]

Und auch noch der gleiche Fehler.

[Coxy]

Zitat von DeddyH:

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?

nehmen wir nur mal die obere Seite eines Vierecks,

dann soll es immer einen Punkt geben wenn die andere Figur durch diese Seite läuft
und dieser Bereich ist doch zwischen img_stern.left und im_stern.left + plus seiner eigenen Breite oder etwa nicht?

[Daniel]

Zitat von nuclearping:

Wozu ein neuer Thread?

http://www.delphipraxis.net/160154-f...die-mauer.html

Da es sich um die gleiche Frage der gleichen Person handelt, mache ich aus Gründen der Übersichtlichkeit hier mal zu und verweise auf den bereits bestehenden Thread.