Change "remove" code to:
Code:
for iter3:=obby_list.count-1 downto 0 do
begin
obj:=obby_list.items[iter3];
obby_list.remove(obj);
end;