Показать сообщение отдельно
  #12  
Старый 25.02.2016, 22:42
JustProSkill JustProSkill вне форума
Прохожий
 
Регистрация: 21.02.2016
Сообщения: 17
Версия Delphi: Delphi XE5
Репутация: 10
По умолчанию

Цитата:
Сообщение от cotseec
для чего в CustomSort использовать IndexOf? (если не изменяет память IndexOf рекомендуется использовать на УЖЕ отсортированном списке)
в функцию типа TStringListSortCompare передается два индекса и список, задача функции сравнить всего два элемента (их индексы и где они содержатся имеются в функции) и выдать результат их сравнения
Я знаю как работает эта функция.
Сейчас сделал так:
записываю исходную строку в СтрингЛист, сортирую
Код:
   if(Get_Weight_Hand(List[Index1][1])<Get_Weight_Hand(List[Index2][1]))then
     Result:=1;
Get_Weight_Hand возвращает силу руки(число) простым if()then
время работы без по моему алгоритму 22 сек, через сорт стринглист 118
Ответить с цитированием