Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Berühren sich diese Flächen? (https://www.delphipraxis.net/102731-beruehren-sich-diese-flaechen.html)

Coder1990 3. Nov 2007 13:43


Berühren sich diese Flächen?
 
Seas Leutz,
Also ich hab ein image das sich zufällig bewegt und ein image das man per mausklick bewegen kann. Ich möchte nun testen ob sich diese beiden images berühren. Mein Ansatz ging leider in die Hose, weil ich mit der x und der y achse gearbeitet habe sozusagen mit den rändern der images aber das führ leider dazu, dass sozusagen eine linie durchs bild führt bei der meine steuerbare image sozusagen immer meine random image berührt -.-.
Bitte helft mir!

MfG Coder

fLaSh11 3. Nov 2007 14:29

Re: Berühren sich diese Flächen?
 
Stichwort Hier im Forum suchenKollision, Hier im Forum suchenKollisionsabfrage

Ich glaub es gab da sogar mal ein CL-Post dazu.

Coder1990 3. Nov 2007 15:22

Re: Berühren sich diese Flächen?
 
hmm auf das such-stichwort bin ich grad nich gekommen^^ :stupid:
öhem ich mach das jetzt grad mit dem hier:
Delphi-Quellcode:
with Gegner do
  LRect1 := Rect(Left, Top, Left + Width, Top + Height);
with hero do
  LRect2 := Rect(Left, Top, Left + Width, Top + Height);
  LSindKollidiert := IntersectRect(LRectUeberlappung, LRect1, LRect2);
Problematik ich hab jetzt mehrere "Gegner" auf meiner Form.
Kann ich irgendwie Gegner:Timage(diese "gegner" sind alle Timages) als mehrere definieren soass die alle getestet werden oder muss ich das irgendwie anders machen???? :gruebel:


Alle Zeitangaben in WEZ +1. Es ist jetzt 08:25 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz