[Electronic_Arts]

Код:

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