Table1.AddIndex(Имя_индекса,Имя_поля, [опции]); //Опции: ixDescending- по убыванию, без опции- по возрастанию