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

Сортировка по клику на заголовке   Найти похожие ветки 

← →
Milashka ©   (2006-07-20 08:15) [0]

Уважаемые Мастера!

Сортировку по клику на заголовке таблицы осуществляю так:

procedure TFPerehod.DBGridEhPrihodTitleBtnClick(Sender: TObject;
 ACol: Integer; Column: TColumnEh);
begin
 if  column.Title.SortMarker=smDownEh
then
 column.Title.SortMarker:=smUpEh
else
  column.Title.SortMarker:=smDownEh;

 Perehods.MakeOrder(Column.FieldName,column.Title.SortMarker);

end;

procedure TMy_DataSets.MakeOrder(FieldName:string;SortMarker:TSortMArkerEh);
begin
OrderSQL.Text:=" order by "+FieldName;
 if SortMarker=smUpEh
  then
    OrderSQL.Text:=OrderSQL.Text+" desc ";

ActivateDataSet();

end;

проблема в том, что в запросе датасета используются псевдонимы для
столюбцов таблиц, а сортировку по ним делать не получается (InterBase).
т.е. в запросе например:
select
  perehod.idperehod, perehod_status.naimenovan  as statname,
....
 
надо написать

order by perehod_status.naimenovan ,
но в таблице FieldName идет statname.

Подскажите пожалуйста, как выйти из данной ситуации.
Может в DBGridEh в столбце хранить полное имя поля (perehod_status.naimenovan), вот только где???

---

← →
clickmaker ©   (2006-07-20 11:54) [1]

TField.Origin

---

← →
ORMADA ©   (2006-07-20 12:11) [2]

кстати в Ehlib 4.x это делается с помощью встроенной мемори таблы автоматом при наличии DataService
под ИБ там есть....
кстати многи чего ещё нового по сравнению с 3.х

---

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

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



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