[Burka]

Как вариант предлагаю:
если те поля, по которым нужно сортировать, индексированы, то сортировать их можно так:

Код:

Table1.IndexName := 'Имя_Поля';