ник: osmor
вместо seek используйте FindFirst и FindNext, тем более что SEEK не работает со связанными таблицами
Кроме тотого значительно выстрее будет открыть рекордсет с заданным условием (а не по всей таблице) и взять последнюю запись этого рекордсета.
или открыть рекодсет с условием и сортировкой в обратном порядке (т.е. что бы 10-я запись стала первой) и использовать Select top 1 ....