//Validate a coordinate if you want to be sure it’s within a printed array: {$I SRL-T/osr.simba} {$I WaspLib/osr.simba}

var tpa: TPointArray = []; p : TPoint = [];

begin tpa := tpa.FilterBox(Box(p, 10, 10));

WriteLn tpa <> []; end.