Функция GetOrder |
Возвращает текущий порядок сортировки.
function GetOrder : integer;
Возвращает текущий порядок сортировки (константы ti<имя-порядка-сортировки>).
Константа tiNoOrder означает отсутствие порядка сортировки для таблицы. В этом случае построение структуры осуществляется согласно внутренним индексам.
Если в примере убрать "order by xf$title" и в cmInit'e сразу сделать GetOrder, получится как раз tiNoOrder.
#define msg(ord) SetOrder(ti#ord); Message(Case (GetOrder; ti#ord: 'Order: ti#ord'; 'Этого не должно быть')); //==================================== interface test; //------------------------------------ create view as select * from x$files order by xf$title order byxf$code by xf$code ; //------------------------------------ screen sc << >> end; //------------------------------------ handleEvent cmInit: { #msg(ByXF$Code); #msg(Standard); #msg(NoOrder); } end; end.
Начиная с Атлантис 5.3.08.