DelphiX: Kollision bei 2 Sprites.

[Blechwolf]

Hmmm, das war jetzt nicht so direkt die Lösung an die ich gedacht habe.
Meine Variante sah vor, daß Du direkt in die Koordinaten eingreifst (so wie in Deiner Move Anweisung) und das Speed einfach auf 0 setzt.
In Pseudocode sollte das dann ungefähr so aussehen:

If (Collision) then
begin
beep;
speed := 0;

x := x-1;
/* alternativ
y := y-1;
x := x+1;
y := y+1;
oder beides, abhängig von der Kollision */
end
else
begin
end;

Gruß

Blechwolf