[Alegun]

Стандартная сотрировка есть, но она такая же как и у базового класса TStringList - т.е. по алфавиту, с цифрами сложнее

Код:

procedure TForm1.Button1Click(Sender: TObject);
  function SortByValue(List: TStringList; index1, index2: integer): integer;
   begin
    with List do Result:= CompareText(ValueFromIndex[index1], ValueFromIndex[index2]);
   end;
begin
 TValueListStrings(ValueListEditor1.Strings).CustomSort(@SortByValue);
end;