Discussion :

[M.Dlb]

J'essaie de trier des éléments contenus dans un ShellListView, après que l'utilisateur ait cliqué sur l'entête d'une colonne. Pour cela, j'utilise la fonction CustomSort de TListView dont hérite TShellListView. Seulement, j'ai l'impression que le tri ne veut pas se faire, et que CustomSort n'est pas appelé correctement ( la fonction me renvoie toujours 0, c'est-à-dire False ). Voici mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
function CustomSortProc(Item1,Item2:TListItem;ParamSort:integer):integer;stdcall;
begin
if ParamSort=0 then
Result:=CompareText(Item1.Caption,Item2.Caption);
else
Result:=CompareText(Item1.SubItems[ParamSort-1],Item2.SubItems[ParamSort-1]);
end;
 
procedure TFTPSeeKerForm.LocalListViewColumnClick(Sender: TObject;
  Column: TListColumn);
var numeroColonne:integer;
begin
numeroColonne:=0;
while ((numeroColonne<=LocalListView.Columns.Count-1) and (Column.Caption<>LocalListView.Columns[numeroColonne].Caption)) do numeroColonne:=numeroColonne+1;
LocalListView.CustomSort(@CustomSortProc,numeroColonne);
end;

Pour écrire CustomSortProc, je me suis inspiré de l'aide de Delphi, mais ça ne veut pas marcher....
Merci beaucoup !

a+

[M.Dlb]

Personne ne sait ??

[Reisubar]

Nono40 a dit récemment que le ShellListView n'était qu'une simple encapsulation des fonctions COM d'Explorer.Exe. Je pense donc que l'affichage des éléments est géré par Windows et non par toi-même, tu ne peux donc pas modifier la manière dont les éléments sont sortis.

[M.Dlb]

Mouarf, c'est pas super top en fait, les composants Shell... C'est un mirroir aux allouettes...

Je crois que je vais utiliser une ListView classique...

Merci beaucoup Reisubar !!

a+

[Pierre Castelain]

Le code source du composant TShellListView est diponible dans les démos livrées avec Delphi : 'Demos\ShellControls\ShellCtrls.pas'.
La méthode Populate utilisée en interne pour "remplir" la liste utilise la fonction ListSortFunc pour trier les éléments si la propriété Sorted vaut True. Tu peux donc modifier cette fonction si tu le désire ou même dériver le composant pour lui faire gérer plusieurs types de tri.