сортировка TList, метод Sort Опции

[kosyak]

Доброе время суток.
Не могу понять как пользоватся методом Sort объекта TList. Делаю как в хелпе:

function CompareDouble(Item1, Item2: PDouble): Integer;
//Функция сравнения
begin
  result := CompareValue(item1^,item2^);
end;

        ....
        list.Sort(@CompareDouble);                   //Сортируем полученный список
        ....

Почему то не хочет сортировать?

И еще один (наверно глупый) вопрос. Вот когда добавляю элементы Pointer методом add в Tlist. А когда делаю list.free память очищается?? не надо dispose для элементов делать?