0

我正在创建一个持久索引 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最好的问候

4

1 回答 1

1

抱歉耽搁了,我在项目中使用的组件是由独立程序员西班牙语(JfControls)开发的,极大地方便了开发,并且更美观。我通过使用 Sort 属性解决了我的问题......

ADODataSet.Sort := 'CodigDenom DESC';

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

另外,我用于我的报告 ReportBuilder

此致。

于 2014-05-23T20:10:25.533 回答