Сортировка

[ACLeo]

Пытаюсь отсортировать ДБГрид. Использую ClientDataSet1. Вот код:

for i:=1 to DBGridEh1.SortMarkedColumns.Count do
begin
if i=1 then sort_str:=sort_str+DBGridEh1.SortMarkedColumns.Items[i-1].Field.FieldName
else sort_str:=sort_str+';'+DBGridEh1.SortMarkedColumns.Items[i-1].Field.FieldName;

case DBGridEh1.SortMarkedColumns.Items[i-1].Title.SortMarker of
smUpEh :Sort_str:=sort_str+' ASC';
smDownEh :Sort_str:=sort_str+' DESC';
smNoneEh : sort_str:='';
end; {case}

ClientDataSet1.IndexFieldNames:=sort_str;

Выдает ошибку "нет поля ... DESC(ASC)"!
Что делаю не так?

 

[Gisma]

так а оно есть?

 

[Barmutik]

Я конечно не знаю Вашего алгоритма ... но в хелпе говорится только про список полей.. и никаких ASC and DESC