В хелпе Delphi7 ошибка?
Добавлено: 04 авг 2005, 20:43
Вот какой пример использования TList.Sort я нашёл в хелпе к Delphi7:
Спасибо.
P.S. Попробовать самому по тех. причинам не получается.
Кто подскажет? Может, вместо "List1.Sort(@CompareText);" Нужно писать " List1.Sort(@CompareNames);"?function CompareNames(Item1, Item2: Pointer): Integer;
begin
Result := CompareText((Item1 as TComponent).Name, (Item2 as TComponent).Name);
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
List1.Sort(@CompareText);
end;
Спасибо.
P.S. Попробовать самому по тех. причинам не получается.