Я нашел простой способ получения убывающего индекса. В Delphi это получается очень легко и красиво:

Table1.AddIndex('NewIndex', 'CustNo;CustName', [ixDescending]);