Текущий архив: 2007.04.22;
Скачать: CL | DM;
Вниз
Сортировка по нажатию на заголовок поля DBGrid Найти похожие ветки
← →
Sonia © (2007-04-02 12:20) [0]Подскажите, пожалуйста, есть ли в свойствах у DBGrid или StoredProc автоматическая сортировка по алфавиту при нажатии на заголовок поля. Или как это можно реализовать иначе?
← →
clickmaker © (2007-04-02 12:37) [1]автоматической нет
в тексте запроса, в Stored proc можно менять Order by
Или использовать наборы данных (наследники TDataSet) со свойством IndexName
← →
Sonia © (2007-04-02 12:42) [2]А возможно в StoreProc передавать параметром название поля и как тогда огранизовать order by?
P.S. пробовала order by Filed_name - не работает
где Filed_name - параметр типа varchar2
← →
Sonia © (2007-04-02 12:47) [3]Или расскажите поподробнее про наборы данных
← →
stone © (2007-04-02 12:54) [4]
> Sonia © (02.04.07 12:47) [3]
> Или расскажите поподробнее про наборы данных
Ты какими компонентами доступа к данным пользуешься?
← →
Sonia © (2007-04-02 12:55) [5]ODAC
← →
Sonia © (2007-04-02 13:19) [6]Если говорить конкретно: OraSession, OraDataSource, OraStoredProc
← →
Reindeer Moss Eater © (2007-04-02 13:53) [7]....
select что_то from что_то order by &что-что
....
MacroByName("что_то").Value := "нужное_имя_поля,_полученное_в_событии_клика_по_колонке_грида";
И переоткрыть.
← →
Krants © (2007-04-02 14:08) [8]В Delphi Word есть подобная статья:
"Как заставить DBGrid сортировать данные по щелчку на заголовке столбца"
← →
palva © (2007-04-02 14:14) [9]В TCustomADODataSet есть свойство Sort, которое позволяет менять колонки сортировки.
← →
MsGuns © (2007-04-02 23:12) [10]>palva © (02.04.07 14:14) [9]
>В TCustomADODataSet есть свойство Sort, которое позволяет менять колонки сортировки.
А что, ora<bla-bla-bla> потомки адошного датасета ?
← →
Sonia © (2007-04-03 09:32) [11]
> В Delphi Word есть подобная статья:
> "Как заставить DBGrid сортировать данные по щелчку на заголовке
> столбца"
Не нашла, кинь ссылку
← →
ASoft (2007-04-03 10:37) [12]Попробуй так, мож, прокатит для начала...:)
...TitleClick(Column: TColumn);
var s,s1: string;
begin
try
s := <ora>.IndexFieldNames;
s1 := <ora>.IndexName;
<ora>.IndexFieldNames := Column.FieldName
except
if (s <> "") then
<ora>.IndexFieldNames := s
else
<ora>.IndexName := s1;
end;
end;
← →
Reindeer Moss Eater © (2007-04-03 10:41) [13]Лучше не пробовать.
(А вдруг прокатит и будет девушка всю жизнь после этого мучаться)
Страницы: 1 вся ветка
Текущий архив: 2007.04.22;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.032 c
