PureBasic Forums - English

Posted: **Tue May 23, 2017 6:57 am**

I get the impression that the SortStructuredArray command is bugged. After I throw it I lose the last value that goes to 0.
Do I make a mistake or is it a bug?
Cordially.

Code: Select all

Structure _tab
  position.i
  valeur.i
EndStructure

Global Dim MonTableau._tab(5)
For i=0 To ArraySize(MonTableau())-1
  MonTableau(i)\position = i+1
  MonTableau(i)\valeur = i+1
Next i

Debug "***********"
Debug ArraySize(MonTableau())
Debug "***********"
For k = 0 To ArraySize(MonTableau())-1
  Debug MonTableau(k)\valeur
Next

SortStructuredArray(MonTableau(), #PB_Sort_Ascending, OffsetOf(_tab\position), TypeOf(_tab\position))
Debug "***********"
For k = 0 To ArraySize(MonTableau())-1
  Debug MonTableau(k)\valeur
Next

Posted: **Tue May 23, 2017 8:14 am**

ArraySize() is misleading as Dim array(5) actually creates an array with 6 elements ("0" included). So simply remove all "-1" and you'll see that SortStructuredArray() works as expected.

Posted: **Wed May 24, 2017 6:27 am**

Funny working

Posted: **Wed May 24, 2017 12:24 pm**

kwandjeen wrote:Funny working

Agreed, it always tricks me.

PureBasic Forums - English

SortStructuredArray lost last value

SortStructuredArray lost last value

Re: SortStructuredArray lost last value

Re: SortStructuredArray lost last value

Re: SortStructuredArray lost last value