TPAInTPA
From SCAR Divi Manual
Definition
function TPAInTPA(const TPA1, TPA2: TPointArray): Boolean;
Availability
SCAR Divi 3.20 > Current
Description
Returns true if all points in TPA1 are also part of TPA2. The function does not take into account duplicates.
Example
begin WriteLn(TPAInTPA([Point(0, 0), Point(1, 2), Point(5, 6)], [Point(-5, 2), Point(0, 0), Point(1, 2), Point(5, 6), Point(1, 3)])); WriteLn(TPAInTPA([Point(0, 0), Point(1, 2), Point(5, 6)], [Point(-5, 2), Point(1, 2), Point(5, 6), Point(1, 3)])); end.
Output:
1 0