Da du die Delphi-Version nicht angegeben hast, gehe ich mal von der neuesten (Rio 10.3.2) aus.
Delphi-Quellcode:
uses
System.SysUtils,
System.Generics.Collections;
procedure TForm1.SortButtonClick(Sender: TObject);
var
input: string;
splitted: TArray<string>;
strItem: string;
numbers: TArray<Integer>;
numItem: Integer;
begin
// Auslesen aus dem Edit
input := InputEdit.Text;
// Trennen am Komma
splitted := input.Split([',']);
// Umwandeln in (Ganz-)Zahlen
numbers := [];
for strItem in splitted do
begin
numbers := numbers + [Integer.Parse(strItem)];
end;
// Sortieren
TArray.Sort<Integer>(numbers);
// Ausgabe
SortedNumberListBox.Items.BeginUpdate();
try
SortedNumberListBox.Items.Clear();
for numItem in numbers do
SortedNumberListBox.Items.Add(numItem.ToString());
finally
SortedNumberListBox.Items.EndUpdate();
end;
end;