Ein einfacher Aufruf könnte so aussehen
Delphi-Quellcode:
if IntersectRect(Image1.BoundsRect, Image2.BoundsRect) then begin
//...
end;
Einen Nachteil hat diese Funktion jedoch: Sie liefert auch
True zurück wenn die Rechtecke exakt nebeneinander liegen ohne sich zu überlappen. Wenn dies nicht der Fall sein sollte müsstest du dir eine eigene Funktion bauen (siehe oben 4 Vergleiche)