Sortowanie tabeli mysql

[mate006]

Witam,

Moja aplikacja działa już na pełnych obrotach teraz dopieszczam ją funkcjami aby móc swobodnie sie w niej poruszać, i mój problem napotkałem podczas sortowania tabeli

mam w zdarzeniu OnTitleClick komponentu DBGRID kod

Kod: Zaznacz cały

DM->ClientDataSet->IndexFieldNames = Column->FieldName;

jednak on sortuje mi tylko rosnąco, a ja chciałbym aby po ponownym kliknięciu sortowało malejąco, zna ktoś na to sposób

[Corvis]

Witam,

http://edn.embarcadero.com/article/29056


Pozdrawiam

[mate006]

Witam

Chciałem przedstawić mój sposób na rozwiązanie sortowania rosnąco i malejąco może komuś się przyda:

Na początek tworzymy dwie zmienne które będą pamiętać która kolumna będzie sortowana (int col), oraz zmienna odpowiedzialna za sortowanie rosnąco czy majeląco (bool desc)

Plik źródłowy np. Unit1.h

Kod: Zaznacz cały

public:
        int col;
        bool desc;


Następnie w pliku datamodule.cpp tworzymy funkcję która będzie sortowała

Plik datamodule.cpp

Kod: Zaznacz cały

void __fastcall TDataModule::Sort(TClientDataSet *DataSet,String FieldName, bool desc, int col)
{
  String IndexName;
  TIndexOptions IndexOptions;

  if (desc)
  {
    IndexOptions << ixDescending;
    IndexName = IntToStr(col)+"ix_d";
  }
  else
  {
    IndexOptions >> ixDescending;
    IndexName = IntToStr(col)+"ix_a";
  }

  DataSet->AddIndex(IndexName, FieldName, IndexOptions);
  DataSet->IndexDefs->Update();
  DataSet->IndexName = IndexName;
  DataSet->First();
}


Następnie przypisujemy zmiennym wcześniej utworzonym wartości

Plik unit1.cpp

Kod: Zaznacz cały

__fastcall TForm::TForm(TComponent* Owner)
        : TForm(Owner)
{
  desc = true;
  col = 1;
}
//---------------------------------------------------------------------------


oraz w zdarzeniu OnTitleClick

Plik unit1.cpp

Kod: Zaznacz cały

void __fastcall TForm::DBTitleClick(TColumn *Column)
{
String file;

  DataModule->ClientDataSet->IndexFieldNames = Column->FieldName;
  file = Column->FieldName;

  if (Column->ID == col)
  desc = !desc;

  col = Column->ID;
  DataModule->Sort(DM->ClientDataSet ,file+"; data",desc,col);

}


Po utworzeniu tych zapisów będziemy mogli dynamicznie sortować wszystkie tabele DBGrid