Wörter Sortieren im Array

[Rippo]

Hallo zusammen

ich möchte in meinem Array die wörter sortieren, jedoch bekomme ich ein fehlermeldung ---> zugriffsverletzung

Delphi-Quellcode:

Procedure SortWord(aWord : string; var aWord_Array : TStringArray);
var NewEintrag, i : Integer;
    Str : String;
    Check: Boolean;
  //wenn sortiert gespeichert werden soll
Begin
 Repeat
  Check:= False;
   i := 1;
    repeat
     if CompareStr(aWord_Array[i], aWord_Array[i+1])>0 then
      begin
       Str := aWord_Array[i];
       aWord_Array[i] := aWord_Array[i+1];
       aWord_Array[i+1] := Str;
       Check := TRUE;
      end;
      Inc(i);
    until(i>Length(aWord_Array));
 Until(Check=FALSE) ;

[Zacherl]

Indizes von dynamischen Arrays beginnen in Delphi normalerweise bei 0 und nicht bei 1. Außerdem ist deine Abbruchbedingung nicht korrekt, weshalb du eh schon immer ein Element zu viel liest.

[baumina]

Dein i+1 geht wahrscheinlich über die Arraygrenze.

[Sir Rufo]

Die untere und obere Grenze eines Arrays bekommt man mit

Delphi-Quellcode:

Low( someArray )

und

Delphi-Quellcode:

High( SomeArray )

heraus.

Dann kann sich das ändern wie es möchte und wird trotzdem immer passen :stupid:

[himitsu]

Pssst:

Delphi-Quellcode:

TArray.Sort<T>(var Values: array of T); // Generics.Collections