SoftHolm.com
Программы
Шахматы
Mozilla Firefox
Книги
Доска объявлений
Игра шарики
Forex
RSS
|
|
Как реализовать сортировку записей при щелчке мышью на заголовок столбца ?Можно написать следующий код: void __fastcall TForm1::DBGrid1TitleClick(TColumn *Column) { String fld = Column->FieldName; if ( Query1->Active) { Query1->DisableControls(); try { Query1->Close(); Query1->SQL->Clear(); Query1->SQL->Add("SELECT * FROM data ORDER BY " + fld ); Query1->Open(); StatusBar1->SimpleText=" Sort by field " + fld; } __finally { Query1-> EnableControls(); }} } |