TdxCustomShellListView.Folders Property

Provides indexed access to displayed shell items.

Declaration

property Folders[AIndex: Integer]: TcxShellFolder read;

Property Value

Type	Description
TcxShellFolder	A shell item (a file, folder, or shell item link). Use the FolderCount property to obtain the number of shell items accessible through this property.

Remarks

Use the Folders property to access individual displayed shell items.

Code Example

The following code example displays the name and type of the first selected shell item in the application form caption:

Delphi

var
  AFolder: TcxShellFolder;
begin
  if ((dxShellListView1.FolderCount = 0) or (dxShellListView1.SelectedItemCount = 0)) then Exit;
  AFolder := dxShellListView1.Folders[dxShellListView1.SelectedItems[0].Index];
  Caption := 'The ' + AFolder.DisplayName;
  if AFolder.IsFolder then
  begin
    Caption := Caption + ' folder is selected';
    if AFolder.SubFolders then
      Caption := Caption + '; includes nested folders';
  end
  else if((AFolder.IsLink) or (AFolder.IsFolderLink) or (AFolder.IsZipFolderLink)) then
    Caption := Caption + ' shell item link is selected'
  else
    Caption := Caption + ' file is selected';
end;

C++

  TcxShellFolder *AFolder;
  // ...
  if ((dxShellListView1->FolderCount == 0) || (dxShellListView1->SelectedItemCount == 0)) { return; }
  AFolder = dxShellListView1->Folders[dxShellListView1->SelectedItems[0]->Index];
  Caption = "The " + AFolder->DisplayName;
  if(AFolder->IsFolder)
  {
    Caption = Caption + " folder is selected";
    if(AFolder->SubFolders)
      Caption = Caption + "; includes nested folders";
  }
  else if((AFolder->IsLink) || (AFolder->IsFolderLink) || (AFolder->IsZipFolderLink))
    Caption = Caption + " shell item link is selected";
  else
    Caption = Caption + " file is selected";