Zahlen ohne Array sortieren?

[nat]

also ich würde die eingaben in ner TStringList "puffern" und dann nur
zum anzeigen dann an ne listbox oder n memo binden.

Delphi-Quellcode:

var
  List: TStringList;

implementation

function SortFunc(List: TStringList; Index1, Index2: Integer): Integer;
var
  a, b: integer;
begin
  a := StrToInt(List[Index1]);
  b := StrToInt(List[Index2]);

  result := a - b;
end;

procedure TForm1.ButtonAddClick(Sender: TObject);
begin
  List.Add(Edit1.Text);
  List.CustomSort(SortFunc);
  Memo1.Lines := List;
end;

initialization
  List := TStringList.Create;
finalization
  List.free;
end.