[Neftali [Germán.Estévez]]

Yo tengo esto funcionando en Delphi 6 desde hace mucho tiempo:

Código Delphi [-]
procedure DefaultSort(AttrIndex:array of integer;
                              AttrSortType: array of TSQLSortType);
....

Y la llamada...

Self.DefaultSort([1],[sstASC]);