ShellBrowser Delphi Components Documentation
ContentsIndexHome
Example

This Example shows how to use MultiObjects with a ListView, where the property MultiSelect is true.

ShellBrowser.Folder := currentfolder;     // set folder
for i:=ListView.Selected.Index to ListView.Items.Count-1 do
  if ListView.Items[i].Selected then      // now add file names
    ShellBrowser.MultiObjects.Add(ListView.Items[i].Caption);
ShellBrowser.ShowContextMenu(ListView.ClientToScreen(Point(x,y))),