![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Сортировка полей таблицы [D6, IB6.x]
me2 © (2003-06-05 17:13:00)Помогите найти решение вот какой задачи - есть DBGridEh (с возможностью отображения маркеров сортировки) в него отображаются данные SQL-запрса выбирающего инф-ю из нескольких таблиц. Как осуществить сортировку полей грида?
Zacho (2003-06-05 18:19:00) [1]
> me2 (05.06.03 18:17)
Параметра чего ? Если запроса - то нельзя.
Zacho (2003-06-05 18:18:00) [2]
> me2 (05.06.03 17:37)
> Народ, ну подскажите. Очень нужна возможность сортировки
> данных в гриде
Данные сортируются не в гриде, а в подключенном к нему датасете.
Посмотри в дистрибутиве EhLib директорию DataService - там находятся модули для сортировки для различных компонентов доступа к БД.
А в общем случае надо написать обработчик события SortMarkingChanged, и в нем сортировать НД.
Вот пример, как собрать сторку ORDER BY .. в этом обработчике.
procedure TMyForm.MyDBGridEhSortMarkingChanged(Sender: TObject);
var
i:integer;
OrderList:string;
begin
OrderList:=" ";
for i:=0 to (Sender as TDBGridEh).SortMarkedColumns.Count-1 do
begin
OrderList:=OrderList+", "+(Sender as TDBGridEh).SortMarkedColumns.Items[i].FieldName;
if (Sender as TDBGridEh).SortMarkedColumns.Items[i].Title.SortMarker=smDownEh then
OrderList:=OrderList+" ASC"
else OrderList:=OrderList+" DESC";
end;
delete(OrderList,2,1);
OrderList:="ORDER BY "+OrderList;
... и т.д. ...
end;
В FIBPlus есть процедура для сортировки датасета без изменения ORDER BY и переоткрытия запроса, есть ли в IBX - не помню, а посмотреть сейчас не могу.
me2 (2003-06-05 18:17:00) [3]Можно ли передать имя поля и тип сортировки для order by с помощью входного параметра?
Соловьев (2003-06-05 18:02:00) [4]и еще надо у поля выставить desc или asc в зависимоти от маркера сортировки грида;
...
oredr dy field1 asc; //по возрастанию
...
oredr dy field1 desc; //по убыванию
Sandman25 (2003-06-05 17:42:00) [5]Я с DBgridEh не работал, только читал об этом где-то.
У DBgridEh должно быть событие, возникающее при нажатии на заголовок колонки. В обработчике этого события необходимо изменить запрос Query.Close; Query.Sql.Text := "select ... order by " + ... и снова выполнить его Query.Open;
Там было еще написано что-то про альтернативный способ - "order by %" и DBGridEh1.Params[0], но этого я уже не помню.
me2 (2003-06-05 17:37:00) [6]Народ, ну подскажите. Очень нужна возможность сортировки данных в гриде