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.