BufDataSet doesn't support the ixDescending index option
Original Reporter info from Mantis: havezet
-
Reporter name: Hert Vanz
Original Reporter info from Mantis: havezet
- Reporter name: Hert Vanz
Description:
Creating an index on a TBufDataset with the descending option ixDescending included won't result in a descending index.
Steps to reproduce:
Call AddIndex on a TBufDataset and include the ixDescending option and without passing specific descending fields.
Additional information:
It is possible to specify descending fields, but when the ixDescending option for an index is included then the full index should be considered descending.
Possible solution:
In TCustomBufDataset.BuildIndex find the line
DBCompareStruct[FieldNr].Desc := (DescIndexFields.IndexOf(AField)>-1);
and change it in:
DBCompareStruct[FieldNr].Desc := (DescIndexFields.IndexOf(AField)>-1) or (ixDescending in Options);
Mantis conversion info:
- Mantis ID: 20043
- OS: all
- OS Build: all
- Build: any
- Platform: all
- Version: 2.5.1
- Fixed in version: 3.0.0
- Fixed in revision: 19496 (#f005d711)