Grafische Darstellung eines Bereichs

[quendolineDD]

Du rufst es auch falsch auf.

Delphi-Quellcode:

var
  IntersectShape : TShape;
begin
if IntersectRect(IntersectShape, Shape1, Shape2) then
begin
  //Anweisung
end;

Eventuell solltest du dich parallel mal mit den Grundlagen über die Benutzung von Funktionen und Prozeduren, Parametern usw. beschäftigen.