TcxShellFolder.IsFolder Property

Identifies if the shell item is a folder.

Declaration

property IsFolder: Boolean read;

Property Value

Type	Description
Boolean	True, if the shell item is a folder; otherwise, False.

Remarks

Use IsFolder, IsFolderLink, IsLink, IsZip, and IsZipFolderLink properties to identify the shell item type.

Code Examples: Identify Selected Shell Items

TdxShellListView

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

TdxShellTreeView

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 ((dxShellTreeView1.FolderCount = 0) or (dxShellTreeView1.SelectionCount = 0)) then Exit;
  AFolder := dxShellTreeView1.Folders[dxShellTreeView1.Selections[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 ((dxShellTreeView1->FolderCount == 0) || (dxShellTreeView1->SelectionCount == 0)) { return; }
  AFolder = dxShellTreeView1->Folders[dxShellTreeView1->Selections[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";