PointsEqual

function PointsEqual(const P1, P2: TPoint): Boolean; overload;
function PointsEqual(const P1, P2: TSmallPoint): Boolean; overload;

Funkcje sprawdzają czy wartości współrzędnych określone w parametrach P1 oraz P2 są sobie równe. W takim wypadku funkcja zwraca wartość True. Oto przykład, warunku, który zawsze zostanie spełniony:

var
  P1, P2 : TPoint;
begin
  P1 := Point(10, 10);
  P2 := P1;

  if PointsEqual(P1, P2) then
    ShowMessage('Wartości zmiennych P1 oraz P2 są równe!');
end;

Zobacz też:

• ShowMessage
• TPoint
• TSmallPoint