Seite 1 von 1

SortArray Hilfe falsch oder Bug

Verfasst: 24.02.2012 22:51
von hjbremer
In der Hilfe steht
Ein optionaler 'Start' - 'Ende' Bereichs-Index kann angegeben werden
nun, etwas ist da nicht richtig, hier Beispiel aus der Hilfe, erweitert um ein größeres Array

Code: Alles auswählen

#NbElements = 8

Dim Array.s(#NbElements + 8)

For k=0 To #NbElements
  Read.s Array(k)
Next

For k=0 To #NbElements
  Debug Array(k)
Next

SortArray(Array(), #PB_Sort_Ascending | #PB_Sort_NoCase)

Debug "---------------------"

For k=0 To #NbElements
  Debug Array(k)
Next

MessageRequester("Information", "Sort finished !", 0)

End


DataSection
  Data.s "Hello", "This", "is", "a", "Nice", "test", "Isn't", "it ?", "Haha !" 
EndDataSection
4.61 Beta 1 x86

__________________________________________________
Thread verschoben
Bugs>Allgemein
24.02.2012
RSBasic

Re: SortArray Hilfe falsch oder Bug

Verfasst: 24.02.2012 22:59
von ts-soft
Nach dem Sortieren befinden sich die 8 leeren Felder am Anfang :wink:
Verlängere die Schleife mal um weitere 8 Elemente, dann siehste das Problem.

Gruß
Thomas

> Bitte verschieben, weder Bug noch falsche Hilfe.

//edit
Wenn start und ende angegeben werden, funktioniert es wie gewünscht!

Code: Alles auswählen

#NbElements = 8

Dim Array.s(#NbElements + 8)

For k=0 To #NbElements
  Read.s Array(k)
Next

For k=0 To #NbElements
  Debug Array(k)
Next

SortArray(Array(), #PB_Sort_Ascending | #PB_Sort_NoCase, 0, 8)

Debug "---------------------"

For k=0 To #NbElements
  Debug Array(k)
Next

MessageRequester("Information", "Sort finished !", 0)

End


DataSection
  Data.s "Hello", "This", "is", "a", "Nice", "test", "Isn't", "it ?", "Haha !"
EndDataSection

Re: SortArray Hilfe falsch oder Bug

Verfasst: 25.02.2012 00:49
von STARGÅTE
Das steht sogar in der Hilfe:
Hinweis: Ist ein Array nicht vollständig gefüllt, dann werden 'Null'-Elemente an den Anfang des Arrays (bei aufsteigender Sortier-Richtung) bzw. an das Ende des Arrays (bei absteigender Sortier-Richtung) sortiert.