Убывающий индекс
Table1.AddIndex('NewIndex', 'CustNo;CustName', [ixDescending]);
©Drkb::02624
Взято с http://delphiworld.narod.ru