function PriorAt(Pos: integer): integer;
Returns index of the item position of which is less or equal to Pos.
TSortedList Methods