Sogar kürzer:
Gebrauch
Generics.Defaults,
Generics.Collections;
Verfahren TForm1.Button1Click (Absender: TObject);
var
StrArray: Reihe Schnur;
anfangen
SetLength (StrArray, 3);
StrArray [0]: = „str 3“;
StrArray [1]: = „str 2“;
StrArray [2]: = „str 1“;
TArray.Sort (StrArray); //- <---------------->Ende;