Ordenar Grid Columnas Firedac

[[oscarac]]

bueno, por si a alguien le interesa hacerlo en FireDac
lo hice de esta manera

Código Delphi [-]
procedure TfrmCatalogoAlmacen.dbgAlmacenTitleClick(Column: TColumn);
begin
  if qryAlmacen.IndexFieldNames = Column.FieldName then
    qryAlmacen.IndexFieldNames := Column.FieldName + ':DN'
  Else
    qryAlmacen.IndexFieldNames := Column.FieldName;

end;