[TShellListView] Comment récupérer la sélection ?

Bonsoir, j'aimerais avoir votre aide sur le composant ShellListView, svp

Voilà, j'ai paramétré un ShellListView de manière à sélectionner plusieurs items.

Je voudrais récupérer le chemin complet de tous les fichiers que j'ai sélectionné...

Comment puis-je faire ?

Merci !

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

var i: integer; curitem: TListItem; filename: string begin if Self.ShellListView.Selected <> nil then begin curitem := Self.ShellListView.Selected; for i := 0 to Self.ShellListView.SelCount -1 do begin filename := ShellListView.Folders[curitem.Index].PathName;   // Item suivant curitem := Self.ShellListView.GetNextItem(curitem, sdBelow, [isSelected]); end; end; end;

---