Discussion :

[souadmaa]

comment utiliser la procédure sort pour trier les items d'un objet Tlist?

[Bleys]

Salut,


Talist.Sort;



C'est tout bête

[EDIT] : un petit coup de et tu aurais trouvé :

TLIST.SORT;

Trie la liste, en employant l'algorithme Tri Rapide (QuickSort) et en utilisant Compare comme fonction de comparaison.
Classe TList
Syntaxe [Delphi] procedure Sort(Compare: TListSortCompare);

Description La méthode Sort permet de trier les éléments du tableau Items. Compare est une fonction de comparaison indiquant comment les éléments sont ordonnés.

[Cl@udius]

Salut

On dirait qu'il manque un morceau Bleys !

Le code suivant trie les objets d'une liste d'après leur nom par ordre alphabétique.Il suppose que la liste ne comporte que des références de composants.
La fonction CompareNames compare les objets de la liste.La liste est triée lorsque l'utilisateur clique sur bouton.

function CompareNames(Item1,Item2: Pointer):Integer;
begin
Result :=CompareText((Item1 as TComponent).Name,(Item2 as TComponent).Name);
end;

procedureTForm1.Button1Click(Sender:TObject);
begin
List1.Sort(@CompareText);
end;

@+

[Bleys]

Salut

On dirait qu'il manque un morceau Bleys !

@+

Ah !!!! Je viens de vérifier, l'aide de BDS2006 renvoie ce qui est écrit ci-dessus ...