Thanks for the quick reply, I'll try it out right away. 
*cough* you don't capitalize the bolded words in the official standards *cough*
(or has that changeg?
)
Edit: I wasn't able to test it yet (too busy expanding my script
), but I did an error check, and gotten ridd of the few things (just to be sure I changed "array" to "DaArray"), and also SCAR doesn't seem to be able to check an entire TPoint, so I made it check the x value and then the y value, so it looks like this:
SCAR Code:
function IsPointInArray(Point: TPoint; DaArray: TPointArray): Boolean;
var // by MasterKill
MK: Integer;
begin
for MK := 0 to High(DaArray) do
begin
if (Point.x = DaArray[MK].x) and (Point.y = DaArray[MK].y) then
begin
Result := True;
Exit;
end;
end;
end;
Full creadits and thanks to you