unit pFolderTreeTest;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ComCtrls, iexFolderTree;

type
  TForm1 = class(TForm)
    IEFolderTree1: TIEFolderTree;
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation
uses Vcl.Themes,  Vcl.Styles;
{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  {In Project>Options>Appearance add "Tablet Light". Be sure "Windows" is set as the "default}
  IEFolderTree1.Folder:='c:\windows\';
  {A TStyle set to the "default"  style and the IE Folder loads}
  {comment in or out}
  TStyleManager.TrySetStyle('Windows');  {works as windows is the "default" theme}
  {Change from the "defaut" and the setting IE.folder fails}
  //TStyleManager.TrySetStyle('Tablet Light');
end;