TValueListEditor и сортировака по Value

[Pcrepair]

Добрый день. Есть форма на которой есть компонент TValueListEditor
в цикле в компонент вставляются значения
ValueListEditor1.InsertRow(Stemming s,IntToStr(Rating),True);
число строк от 10 до 1000
первый столбец - слова
втрой столбец - цифры
далее нужно провести сортировку по значениям второго столбца(цифры), большие значения должны попасть наверх

Вопрос:
- есть ли в ValueListEditor1 встроенная сортировка? если есть то где? что то процедура Sort нигде в свойствах не видна
- если нет, то как можно сделать сортировку? есть два параметра: строка=число, сортировать нужно по значению число

[igh0st]

Пример сортировки по-возрастанию

procedure TForm1.FormCreate(Sender: TObject);
  function ValueSort(List: TStringList; Index1, Index2: Integer): Integer;
  begin
    Result:=AnsiCompareText(List.ValueFromIndex[Index1], List.ValueFromIndex[Index2]);
  end;
begin
  TValueListStrings(ValueListEditor1.Strings).CustomSort(@ValueSort);
end;

[Pcrepair]

Спасибо, попробуем проверить