Скачать: CL | DM;

Сортировка в TADOQuery   Найти похожие ветки 

← →
Делфиец   (2010-02-11 21:27) [0]

ADOQuery.sorted:="Name" // -Имя поля fieldName колонки
Сортирует с верху в низ и всего скорей по алфавиту.
Но, не понятно, а как можно задать параметры сортировки так, что бы сортировка выполнялась с низу вверх или еще как нибудь?

---

← →
sniknik ©   (2010-02-11 21:32) [1]

DESC

---

← →
Делфиец   (2010-02-11 21:43) [2]

> sniknik ©   (11.02.10 21:32) [1]
> DESC


Точно,

 JvDBG.SortMarker := smUp;
 JvDBG.SortedField := "Name";
 Query.Sort:= JvDBG.SortedField+" ASC";

или так

 JvDBG.SortMarker := smUp;
 JvDBG.SortedField := "Name";
 Query.Sort:= JvDBG.SortedField+" DESC";

---

← →
Делфиец   (2010-02-12 05:54) [3]

Предлагаю здесь уже более подробные описание сортировки колонок таблицы компонента TJvDBGride из библиотеки JEDI JVCL

JvDBGride
Выставить свойства:

AutoSort := True; - это включает авто сортировку типа должно само сортироваться, но само без дополнительной обработки, что то не сортирует, так что свой код придется вставлять.
TitleButtons := True; - заголовки колонок начинают работать как кнопки(нажимаются). При включении этого свойства, колонки можно перетаскивать правой кнопкой мышки(а обычно - левой).

Так же можно выставить и дополнительные свойства (не помешают):

TitleArrow := True; - показывает стрелочку в верхнем левом углу, вызывающую диалог, позволяющий скрывать/показывать колонки
TitleButtonAllowMove := True; - - разрешает перетаскивать колонки при включенном режиме TitleButton левой кнопкой мышки

Затем создать обработчик щелчка на заголовки колонок

procedure TFrmMainTable.JvDBGTitleBtnClick(Sender: TObject; ACol: Integer;
 Field: TField);
begin
 Case TSortMarker(JvDBG.SortMarker) of
   // Здесь у кого что будет у меня TADOQuery его то и сортирую
   smUp:   Query.Sort:=Field.FieldName+" ASC";
   smDown: Query.Sort:=Field.FieldName+" DESC";
 End;
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.052 c