Grid LoadBookmark -> как вместо ClientDataSet использовать Query?

[dbf_usr]

Есть пример "Grid LoadBookmark" - там демонстрируется удобное использование сортировок в DBGreed.

Все строится на работе с компонентом ClientDataSet, но я его не использую, я пользуюсь купленными компонентами PostgreSQL Data Access Components (PgDAC) . Как можно эту удобную функцию использовать с DataSource или Query? 

Вот код, который показывает в примере как пользоваться ClientDataSet.

procedure TUniMainModule.SortColumn(const FieldName: string; Dir: Boolean);
begin
 if Dir then
    ClientDataSet1.IndexName := FieldName+'_index_asc'
  else
    ClientDataSet1.IndexName := FieldName+'_index_des';
end;

procedure TUniMainModule.UniGUIMainModuleCreate(Sender: TObject);
var
  I: Integer;
  IndexnameAsc : string;
  IndexnameDes : string;
begin
  with ClientDataSet1 do
  begin
    for I := 0 to FieldCount-1 do
    begin
      IndexnameAsc := Fields[I].FieldName+'_index_asc';
      IndexnameDes := Fields[I].FieldName+'_index_des';
      IndexDefs.Add(IndexnameAsc, Fields[I].FieldName, []);
      IndexDefs.Add(IndexnameDes, Fields[I].FieldName, [ixDescending]);
    end;

  end;
end;

За ранее благодарен за помощь!

[Sherzod]

4 hours ago, dbf_usr said:

Все строится на работе с компонентом ClientDataSet, но я его не использую, я пользуюсь купленными компонентами PostgreSQL Data Access Components (PgDAC) . Как можно эту удобную функцию использовать с DataSource или Query? 

Здесь в основном Вы должны знать как используемая Вами компонента умеет сортировать данные, а событие просто указывает, сортируемое поле и тип сортировки...