Сортировка колонки по клику в заголовок DBGrid

[mrkaban]

Здравствуйте, нужно сделать сортировку колонки по нажатию на заголовок в DBGrid. Подскажите пожалуйста, как это можно сделать?

[Снег Север]

Например, отлавливать событие нажатия и добавлять к SQL sortby ...

[mrkaban]

Я правильно понял, что речь про событие "DBGrid1CellClick" или как? Не понимаю, как система поймёт по какому столбцу сортировать

[wofs]

Я правильно понял, что речь про событие "DBGrid1CellClick" или как?

onTitleClick (Event handler for mouse click on Title).

Не понимаю, как система поймёт по какому столбцу сортировать

А это вы ему сами скажете.
У вышеуказанного события есть Column: TColumn. Доступ к имени поля можно получить через Column.FieldName. А дальше просто добавляете к SQL сортировку.

[mrkaban]

Я правильно понял, что речь про событие "DBGrid1CellClick" или как?

onTitleClick (Event handler for mouse click on Title).

Действительно! Спасибо большое!

Не понимаю, как система поймёт по какому столбцу сортировать

А это вы ему сами скажете.
У вышеуказанного события есть Column: TColumn. Доступ к имени поля можно получить через Column.FieldName. А дальше просто добавляете к SQL сортировку.

Спасибо большое! Буду пробовать!

[alexs]

возьми RxDBGrid - он умеет это со всеми основными движками запросов к БД

[wofs]

возьми RxDBGrid - он умеет это со всеми основными движками запросов к БД

А под IBX возможно адаптировать эту функцию? Я не сообразил как...

[*Rik*]

TxDBGrid можно адаптировать (http://visual-t.ru/components.html), могу сказать где пример кода взять для TxDBGrid, будет при щелчке на заголовке сортировать IBX, Zeos, TxDBF

[wofs]

TxDBGrid можно адаптировать (http://visual-t.ru/components.html)

Ой, спасибо! Уже подсмотрел

[*Rik*]

TxDBGrid можно адаптировать (http://visual-t.ru/components.html)

Ой, спасибо! Уже подсмотрел

Там 2 процедуры надо подключить, их можно вытащить из http://visual-t.ru/files/CrossDesigner.7z, проект CrossMachine.
Процедуры: GetDBSortingField и OnAutoSortDataset.
В модуле XDBGrids есть 2 переменные процедурного типа, процедуры надо к ним привязать:
XDBGrids.GetDataSortField := @GetDBSortingField;
XDBGrids.AutoSortDataSet:= @OnAutoSortDataset;
Если не охота процедуры искать, могу их сюда вытащить, но много букв будет..

[wofs]

Если не охота процедуры искать, могу их сюда вытащить, но много букв будет..

Нет, нет спасибо большое за помощь! Я все нашел.

[alexs]

А под IBX возможно адаптировать эту функцию? Я не сообразил как...

А где взять IBX? Я посмотрю что там.

[*Rik*]

А под IBX возможно адаптировать эту функцию? Я не сообразил как...

А где взять IBX? Я посмотрю что там.

http://visual-t.ru/ibexpress.html

[alexs]

Добавил сортировщик для IBX для RxDBGrid-а
Также пример

[wofs]

Добавил сортировщик для IBX для RxDBGrid-а

Спасибо! Я правда сделал решение, бодро шагающее на костылях, но когда оно из коробки - это гораздо лучше.