Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Сортировка полей таблицы [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]

Народ, ну подскажите. Очень нужна возможность сортировки данных в гриде


Наверх

Титульная страница Поиск, карта сайта Написать письмо