Einzelnen Beitrag anzeigen

Benutzerbild von Aphton
Aphton

Registriert seit: 31. Mai 2009
1.198 Beiträge
 
Turbo Delphi für Win32
 
#4

AW: überprüfen ob eine schnittmenge vorhanden ist

  Alt 1. Dez 2013, 22:08
Eine andere, einfachere Variante ist dieser hier:

EsGibtKeineSchnittmenge = NOT(EsGibtEineSchnittmenge)

Für EsGibtKeineSchnittmenge gibt es genau 4 Fälle:
(Beziehe mich auf die Graphik bei der Antwort #2)
A1.X > B4.X OR
A4.X < B1.X OR
A1.Y > B2.Y OR
A2.Y < B1.Y

Da du die Schnittmenge (Ein Rechteck) an sich nicht berechnen musst, reichen diese 4 Bedingungen!
das Erkennen beginnt, wenn der Erkennende vom zu Erkennenden Abstand nimmt
MfG
  Mit Zitat antworten Zitat