它在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最好的祝福

很抱歉延迟了,我在我的项目中使用的组件是由独立程序员西班牙(JfControls)开发的,极大地促进了开发,并且更美观。我通过使用Sort属性解决了我的问题…

ADODataSet.Sort := 'CodigDenom DESC';

我不明白为什么我以前的代码在ADODataset中不起作用。indexdef在ClientDataSet中工作得很好。

此外,我使用ReportBuilder的报告

问好。

最新更新