SRL Archive - Research & Development Lounge

I was reading around and I saw someone use this matchTPA function..

sounds hella useful but does anybody know where or how i can use this? Its not found anywhere.

Typed in browser:

function MatchTPA(tpa1, tpa2: TPointArray): Boolean;
var
  i: Integer;
begin
  Result := false;
  if not(High(tpa1) = High(tpa2)) then
    Exit;
  for i := High(tpa1) downto 0 do
    if not(tpa1[i] = tpa2[i]) then
      Exit;
  Result := true;
end;

edit:
Now I feel like an idiot. We also got SameTPA(tpa1,tpa2) in simba.

LOL no dont feel that way … the usefulness this can bring 2 many people is unheard of … this will be great when finding Aubury!