Test de collision entre 2 rectangles

Contenu du snippet

Cette fonction renvoie 'TRUE' si R1 et R2 entre en collision sinon elle renvoie 'FALSE'.
Je l'utilise dans des jeux que j'ai fait du genre a la Mario, ou meme un RPG.

Bonne prog.

Source / Exemple :


function TestCollide(const r1, r2 : TRect) : boolean;
begin
  result := 
    (InRange(r1.left,r2.left,r2.right) OR InRange(r1.right,r2.left,r2.right)) 
    AND 
    (InRange(r1.top,r2.top,r2.bottom) OR InRange(r1.bottom,r2.top,r2.bottom));
end;

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.