Это не работает в ADODataSet IndexDef?
Я создаю постоянный индекс ADODataSet, но не информацию о заказе, мой код выглядит следующим образом:
ADODataSetInforArtic.IndexDefs.Clear;
case ComboBoxOrden.AsValue of
0: begin
with ADODataSetInforArtic.IndexDefs.AddIndexDef do
begin
Name := 'DenomArtic';
Fields := 'DenomArtic';
if ComboBoxOrden.Buttons.Image1.Id = 59 then
Options := [ixDescending];
ADODataSetInforArtic.IndexName := Name;
end;
end;
Что я делаю неправильно? Я делаю это так, потому что это отчет, который я делаю. Нет сетки, у вас есть комбо, в котором вы выбираете поле, в котором будет упорядочена информация, и еще одна кнопка, которая может выбирать возрастание или убывание. Я не понимаю, что не работает.... Я использую Delphi Xe2 С уважением
1 ответ
Извините за задержку, компоненты, которые я использую в своих проектах, разработанных независимыми испанскими программистами (JfControls), значительно облегчают разработку и выглядят более эстетично. Я решил свою проблему с помощью свойства Sort...
ADODataSet.Sort := 'CodigDenom DESC';
Я не понимаю, почему мой предыдущий код не работал в ADODataset. IndexDefs прекрасно работают в ClientDataSet.
Также я использую для своих отчетов ReportBuilder
С наилучшими пожеланиями.