Discussion :

[Mimi Bulles]

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 !

[cpdump]

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
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;