Сортировка при клике на колоку

[n0where]

Как сделать сортировку по клику на произвольную колонку без определения order by?

Код: Выделить всё

cmColumnClicked : {
  var ColumSort: integer;
  ColumSort := GetColumnSorting(browse, Target);
  case ColumSort of
   0: ColumSort :=  1;
   1: ColumSort := -1;
  -1: ColumSort :=  1;
  end;
  SetColumnSorting(browse, Target,  ColumSort);
...
}

[Masygreen]

непонятно чего вы там хотите ? .. без индекса сортировки не бывает насколько я знаю ..

[n0where]

А надо бы ченидь придумать. Сортировка по полю даже без индекса то работает )))

[Masygreen]

Так не проканает ?

Код: Выделить всё

create view
from ListExIm
order s_LType by LType
...
cmColumnClicked:
{
case Target of
#ListExIm.LType :
{
SetOrder(tis_LType);
SetTableBackOrderIn(tnListExIm,GetColumnSorting(br_Head,Target)=1);
SetColumnSorting(br_Head,Target,if(GetColumnSorting(br_Head,Target)=0,1,GetColumnSorting(br_Head,Target)*(-1)));
RereadRecord;
};

[n0where]

Хотелось бы без order by. Ведь отгда надо определять по какой колонке будет сортировка а по какой не будет.
Хочется как в нормальной системе, нажал на колонку - произошла сортировка.

Утопия...