Показать сообщение отдельно
  #1  
Старый 09.11.2010, 13:52
Аватар для Electronic_Arts
Electronic_Arts Electronic_Arts вне форума
Местный
 
Регистрация: 13.07.2006
Адрес: на земле
Сообщения: 562
Версия Delphi: Delphi 11
Репутация: 18
Восклицание Не получаеться сортировать

Код:
select * from Rabota where Data between (:begin) and (:end) 
ORDER BY :SORT

при вызове не работает сортировка
Код:
var
n:integer;
begin
Otchet1.Active:=false;
n:=combobox1.ItemIndex;
case n of
0: otchet1.Parameters.ParamByName('sort').Value:='data';
1: otchet1.Parameters.ParamByName('sort').Value:='rasxod';
2: otchet1.Parameters.ParamByName('sort').Value:='prodaja';
3: otchet1.Parameters.ParamByName('sort').Value:='pribol';
4: otchet1.Parameters.ParamByName('sort').Value:='vipolneno';
end;
otchet1.Parameters.ParamByName('begin').Value:=datetostr(date1.Date);
otchet1.Parameters.ParamByName('end').Value:=datetostr(date2.Date);
otchet1.Active:=true;
end;

Знаю что то я неправильно делаю - но что?
если к примеру использовать прямое обращение то сортировка работает
Код:
select * from Rabota where Data between (:begin) and (:end) 
ORDER BY data
__________________
Нет ничего не возможного. Вопрос только во времени...
Ответить с цитированием