├── Source ├── dclshlctrls.dcr ├── RootEdit.dfm └── RootEdit.pas ├── Images ├── SupportingDelphi.jpg ├── ShellControlsDemoMini.jpg └── ShellControlsDemoDesktop.jpg ├── Packages ├── XE6 │ ├── dclshlctrls.res │ ├── vclshlctrls.res │ ├── vclshlctrls.dpk │ ├── dclshlctrls.dpk │ ├── Vcl.Shell.Controls.groupproj │ └── dclshlctrls.dproj ├── XE8 │ ├── dclshlctrls.res │ ├── vclshlctrls.res │ ├── vclshlctrls.dpk │ ├── dclshlctrls.dpk │ ├── Vcl.Shell.Controls.groupproj │ └── dclshlctrls.dproj ├── D10_4 │ ├── dclshlctrls.res │ ├── vclshlctrls.res │ ├── vclshlctrls.dpk │ ├── dclshlctrls.dpk │ ├── Vcl.Shell.Controls.groupproj │ ├── dclshlctrls.dproj │ └── vclshlctrls.dproj ├── XE10 │ ├── dclshlctrls.res │ ├── vclshlctrls.res │ ├── vclshlctrls.dpk │ ├── dclshlctrls.dpk │ └── Vcl.Shell.Controls.groupproj ├── D11 │ ├── vclshlctrls.dpk │ ├── dclshlctrls.dpk │ ├── Vcl.Shell.Controls.groupproj │ ├── dclshlctrls.dproj │ └── vclshlctrls.dproj ├── D12 │ ├── vclshlctrls.dpk │ ├── dclshlctrls.dpk │ ├── Vcl.Shell.Controls.groupproj │ ├── vclshlctrls.dproj │ └── dclshlctrls.dproj ├── D13 │ ├── vclshlctrls.dpk │ ├── dclshlctrls.dpk │ ├── Vcl.Shell.Controls.groupproj │ ├── vclshlctrls.dproj │ └── dclshlctrls.dproj ├── D10_1 │ ├── vclshlctrls.dpk │ ├── dclshlctrls.dpk │ ├── Vcl.Shell.Controls.groupproj │ ├── dclshlctrls.dproj │ └── vclshlctrls.dproj ├── D10_2 │ ├── vclshlctrls.dpk │ ├── dclshlctrls.dpk │ ├── Vcl.Shell.Controls.groupproj │ ├── dclshlctrls.dproj │ └── vclshlctrls.dproj ├── D10_3 │ ├── vclshlctrls.dpk │ ├── dclshlctrls.dpk │ ├── Vcl.Shell.Controls.groupproj │ ├── dclshlctrls.dproj │ └── vclshlctrls.dproj └── ShellReg.pas ├── Demo └── ShellControlsDemo │ ├── ShellControlsDemo.ico │ ├── ShellControlsDemo.dpr │ ├── ShellControlsDemo.dproj │ └── MainUnit.pas ├── .gitignore ├── README.md └── ReadMe.htm /Source/dclshlctrls.dcr: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/EtheaDev/DelphiShellControlsPackages/HEAD/Source/dclshlctrls.dcr -------------------------------------------------------------------------------- /Images/SupportingDelphi.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/EtheaDev/DelphiShellControlsPackages/HEAD/Images/SupportingDelphi.jpg -------------------------------------------------------------------------------- /Packages/XE6/dclshlctrls.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/EtheaDev/DelphiShellControlsPackages/HEAD/Packages/XE6/dclshlctrls.res -------------------------------------------------------------------------------- /Packages/XE6/vclshlctrls.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/EtheaDev/DelphiShellControlsPackages/HEAD/Packages/XE6/vclshlctrls.res -------------------------------------------------------------------------------- /Packages/XE8/dclshlctrls.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/EtheaDev/DelphiShellControlsPackages/HEAD/Packages/XE8/dclshlctrls.res -------------------------------------------------------------------------------- /Packages/XE8/vclshlctrls.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/EtheaDev/DelphiShellControlsPackages/HEAD/Packages/XE8/vclshlctrls.res -------------------------------------------------------------------------------- /Packages/D10_4/dclshlctrls.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/EtheaDev/DelphiShellControlsPackages/HEAD/Packages/D10_4/dclshlctrls.res -------------------------------------------------------------------------------- /Packages/D10_4/vclshlctrls.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/EtheaDev/DelphiShellControlsPackages/HEAD/Packages/D10_4/vclshlctrls.res -------------------------------------------------------------------------------- /Packages/XE10/dclshlctrls.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/EtheaDev/DelphiShellControlsPackages/HEAD/Packages/XE10/dclshlctrls.res -------------------------------------------------------------------------------- /Packages/XE10/vclshlctrls.res: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/EtheaDev/DelphiShellControlsPackages/HEAD/Packages/XE10/vclshlctrls.res -------------------------------------------------------------------------------- /Images/ShellControlsDemoMini.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/EtheaDev/DelphiShellControlsPackages/HEAD/Images/ShellControlsDemoMini.jpg -------------------------------------------------------------------------------- /Images/ShellControlsDemoDesktop.jpg: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/EtheaDev/DelphiShellControlsPackages/HEAD/Images/ShellControlsDemoDesktop.jpg -------------------------------------------------------------------------------- /Demo/ShellControlsDemo/ShellControlsDemo.ico: -------------------------------------------------------------------------------- https://raw.githubusercontent.com/EtheaDev/DelphiShellControlsPackages/HEAD/Demo/ShellControlsDemo/ShellControlsDemo.ico -------------------------------------------------------------------------------- /Demo/ShellControlsDemo/ShellControlsDemo.dpr: -------------------------------------------------------------------------------- 1 | program ShellControlsDemo; 2 | 3 | uses 4 | Vcl.Forms, 5 | MainUnit in 'MainUnit.pas' {MainForm}, 6 | Vcl.Themes, 7 | Vcl.Styles, 8 | Vcl.Shell.Utils in '..\..\Source\Vcl.Shell.Utils.pas'; 9 | 10 | {$R *.res} 11 | 12 | begin 13 | Application.Initialize; 14 | Application.MainFormOnTaskBar := True; 15 | Application.ActionUpdateDelay := 50; 16 | Application.Title := 'VCL Shell Controls Demo'; 17 | Application.CreateForm(TMainForm, MainForm); 18 | Application.Run; 19 | end. 20 | -------------------------------------------------------------------------------- /Packages/D10_4/vclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package vclshlctrls; 13 | 14 | {$R *.res} 15 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 16 | {$ALIGN 8} 17 | {$ASSERTIONS ON} 18 | {$BOOLEVAL OFF} 19 | {$DEBUGINFO OFF} 20 | {$EXTENDEDSYNTAX ON} 21 | {$IMPORTEDDATA ON} 22 | {$IOCHECKS ON} 23 | {$LOCALSYMBOLS OFF} 24 | {$LONGSTRINGS ON} 25 | {$OPENSTRINGS ON} 26 | {$OPTIMIZATION OFF} 27 | {$OVERFLOWCHECKS OFF} 28 | {$RANGECHECKS OFF} 29 | {$REFERENCEINFO OFF} 30 | {$SAFEDIVIDE OFF} 31 | {$STACKFRAMES OFF} 32 | {$TYPEDADDRESS OFF} 33 | {$VARSTRINGCHECKS ON} 34 | {$WRITEABLECONST OFF} 35 | {$MINENUMSIZE 1} 36 | {$IMAGEBASE $400000} 37 | {$DEFINE RELEASE} 38 | {$ENDIF IMPLICITBUILDING} 39 | {$DESCRIPTION 'VCL Shell Controls'} 40 | {$LIBSUFFIX AUTO} 41 | {$RUNONLY} 42 | {$IMPLICITBUILD OFF} 43 | 44 | requires 45 | rtl, 46 | Vcl; 47 | 48 | contains 49 | Vcl.Shell.ShellCtrls in 'Vcl.Shell.ShellCtrls.pas', 50 | Vcl.Shell.ShellConsts in 'Vcl.Shell.ShellConsts.pas'; 51 | 52 | end. 53 | -------------------------------------------------------------------------------- /Packages/D11/vclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package vclshlctrls; 13 | 14 | {$R *.res} 15 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 16 | {$ALIGN 8} 17 | {$ASSERTIONS ON} 18 | {$BOOLEVAL OFF} 19 | {$DEBUGINFO OFF} 20 | {$EXTENDEDSYNTAX ON} 21 | {$IMPORTEDDATA ON} 22 | {$IOCHECKS ON} 23 | {$LOCALSYMBOLS OFF} 24 | {$LONGSTRINGS ON} 25 | {$OPENSTRINGS ON} 26 | {$OPTIMIZATION OFF} 27 | {$OVERFLOWCHECKS OFF} 28 | {$RANGECHECKS OFF} 29 | {$REFERENCEINFO OFF} 30 | {$SAFEDIVIDE OFF} 31 | {$STACKFRAMES OFF} 32 | {$TYPEDADDRESS OFF} 33 | {$VARSTRINGCHECKS ON} 34 | {$WRITEABLECONST OFF} 35 | {$MINENUMSIZE 1} 36 | {$IMAGEBASE $400000} 37 | {$DEFINE RELEASE} 38 | {$ENDIF IMPLICITBUILDING} 39 | {$DESCRIPTION 'VCL Shell Controls'} 40 | {$LIBSUFFIX AUTO} 41 | {$RUNONLY} 42 | {$IMPLICITBUILD OFF} 43 | 44 | requires 45 | rtl, 46 | Vcl; 47 | 48 | contains 49 | Vcl.Shell.ShellCtrls in 'Vcl.Shell.ShellCtrls.pas', 50 | Vcl.Shell.ShellConsts in 'Vcl.Shell.ShellConsts.pas'; 51 | 52 | end. 53 | -------------------------------------------------------------------------------- /Packages/D12/vclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package vclshlctrls; 13 | 14 | {$R *.res} 15 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 16 | {$ALIGN 8} 17 | {$ASSERTIONS ON} 18 | {$BOOLEVAL OFF} 19 | {$DEBUGINFO OFF} 20 | {$EXTENDEDSYNTAX ON} 21 | {$IMPORTEDDATA ON} 22 | {$IOCHECKS ON} 23 | {$LOCALSYMBOLS OFF} 24 | {$LONGSTRINGS ON} 25 | {$OPENSTRINGS ON} 26 | {$OPTIMIZATION OFF} 27 | {$OVERFLOWCHECKS OFF} 28 | {$RANGECHECKS OFF} 29 | {$REFERENCEINFO OFF} 30 | {$SAFEDIVIDE OFF} 31 | {$STACKFRAMES OFF} 32 | {$TYPEDADDRESS OFF} 33 | {$VARSTRINGCHECKS ON} 34 | {$WRITEABLECONST OFF} 35 | {$MINENUMSIZE 1} 36 | {$IMAGEBASE $400000} 37 | {$DEFINE RELEASE} 38 | {$ENDIF IMPLICITBUILDING} 39 | {$DESCRIPTION 'VCL Shell Controls'} 40 | {$LIBSUFFIX AUTO} 41 | {$RUNONLY} 42 | {$IMPLICITBUILD OFF} 43 | 44 | requires 45 | rtl, 46 | Vcl; 47 | 48 | contains 49 | Vcl.Shell.ShellCtrls in 'Vcl.Shell.ShellCtrls.pas', 50 | Vcl.Shell.ShellConsts in 'Vcl.Shell.ShellConsts.pas'; 51 | 52 | end. 53 | -------------------------------------------------------------------------------- /Packages/D13/vclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package vclshlctrls; 13 | 14 | {$R *.res} 15 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 16 | {$ALIGN 8} 17 | {$ASSERTIONS ON} 18 | {$BOOLEVAL OFF} 19 | {$DEBUGINFO OFF} 20 | {$EXTENDEDSYNTAX ON} 21 | {$IMPORTEDDATA ON} 22 | {$IOCHECKS ON} 23 | {$LOCALSYMBOLS OFF} 24 | {$LONGSTRINGS ON} 25 | {$OPENSTRINGS ON} 26 | {$OPTIMIZATION OFF} 27 | {$OVERFLOWCHECKS OFF} 28 | {$RANGECHECKS OFF} 29 | {$REFERENCEINFO OFF} 30 | {$SAFEDIVIDE OFF} 31 | {$STACKFRAMES OFF} 32 | {$TYPEDADDRESS OFF} 33 | {$VARSTRINGCHECKS ON} 34 | {$WRITEABLECONST OFF} 35 | {$MINENUMSIZE 1} 36 | {$IMAGEBASE $400000} 37 | {$DEFINE RELEASE} 38 | {$ENDIF IMPLICITBUILDING} 39 | {$DESCRIPTION 'VCL Shell Controls'} 40 | {$LIBSUFFIX AUTO} 41 | {$RUNONLY} 42 | {$IMPLICITBUILD OFF} 43 | 44 | requires 45 | rtl, 46 | Vcl; 47 | 48 | contains 49 | Vcl.Shell.ShellCtrls in 'Vcl.Shell.ShellCtrls.pas', 50 | Vcl.Shell.ShellConsts in 'Vcl.Shell.ShellConsts.pas'; 51 | 52 | end. 53 | -------------------------------------------------------------------------------- /Packages/XE10/vclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package vclshlctrls; 13 | 14 | {$R *.res} 15 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 16 | {$ALIGN 8} 17 | {$ASSERTIONS ON} 18 | {$BOOLEVAL OFF} 19 | {$DEBUGINFO OFF} 20 | {$EXTENDEDSYNTAX ON} 21 | {$IMPORTEDDATA ON} 22 | {$IOCHECKS ON} 23 | {$LOCALSYMBOLS OFF} 24 | {$LONGSTRINGS ON} 25 | {$OPENSTRINGS ON} 26 | {$OPTIMIZATION OFF} 27 | {$OVERFLOWCHECKS OFF} 28 | {$RANGECHECKS OFF} 29 | {$REFERENCEINFO OFF} 30 | {$SAFEDIVIDE OFF} 31 | {$STACKFRAMES OFF} 32 | {$TYPEDADDRESS OFF} 33 | {$VARSTRINGCHECKS ON} 34 | {$WRITEABLECONST OFF} 35 | {$MINENUMSIZE 1} 36 | {$IMAGEBASE $400000} 37 | {$DEFINE RELEASE} 38 | {$ENDIF IMPLICITBUILDING} 39 | {$DESCRIPTION 'VCL Shell Controls'} 40 | {$LIBSUFFIX '230'} 41 | {$RUNONLY} 42 | {$IMPLICITBUILD OFF} 43 | 44 | requires 45 | rtl, 46 | Vcl; 47 | 48 | contains 49 | Vcl.Shell.ShellCtrls in 'Vcl.Shell.ShellCtrls.pas', 50 | Vcl.Shell.ShellConsts in 'Vcl.Shell.ShellConsts.pas'; 51 | 52 | end. 53 | -------------------------------------------------------------------------------- /Packages/XE6/vclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package vclshlctrls; 13 | 14 | {$R *.res} 15 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 16 | {$ALIGN 8} 17 | {$ASSERTIONS ON} 18 | {$BOOLEVAL OFF} 19 | {$DEBUGINFO OFF} 20 | {$EXTENDEDSYNTAX ON} 21 | {$IMPORTEDDATA ON} 22 | {$IOCHECKS ON} 23 | {$LOCALSYMBOLS OFF} 24 | {$LONGSTRINGS ON} 25 | {$OPENSTRINGS ON} 26 | {$OPTIMIZATION OFF} 27 | {$OVERFLOWCHECKS OFF} 28 | {$RANGECHECKS OFF} 29 | {$REFERENCEINFO OFF} 30 | {$SAFEDIVIDE OFF} 31 | {$STACKFRAMES OFF} 32 | {$TYPEDADDRESS OFF} 33 | {$VARSTRINGCHECKS ON} 34 | {$WRITEABLECONST OFF} 35 | {$MINENUMSIZE 1} 36 | {$IMAGEBASE $400000} 37 | {$DEFINE RELEASE} 38 | {$ENDIF IMPLICITBUILDING} 39 | {$DESCRIPTION 'VCL Shell Controls'} 40 | {$LIBSUFFIX '200'} 41 | {$RUNONLY} 42 | {$IMPLICITBUILD OFF} 43 | 44 | requires 45 | rtl, 46 | Vcl; 47 | 48 | contains 49 | Vcl.Shell.ShellCtrls in 'Vcl.Shell.ShellCtrls.pas', 50 | Vcl.Shell.ShellConsts in 'Vcl.Shell.ShellConsts.pas'; 51 | 52 | end. 53 | -------------------------------------------------------------------------------- /Packages/XE8/vclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package vclshlctrls; 13 | 14 | {$R *.res} 15 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 16 | {$ALIGN 8} 17 | {$ASSERTIONS ON} 18 | {$BOOLEVAL OFF} 19 | {$DEBUGINFO OFF} 20 | {$EXTENDEDSYNTAX ON} 21 | {$IMPORTEDDATA ON} 22 | {$IOCHECKS ON} 23 | {$LOCALSYMBOLS OFF} 24 | {$LONGSTRINGS ON} 25 | {$OPENSTRINGS ON} 26 | {$OPTIMIZATION OFF} 27 | {$OVERFLOWCHECKS OFF} 28 | {$RANGECHECKS OFF} 29 | {$REFERENCEINFO OFF} 30 | {$SAFEDIVIDE OFF} 31 | {$STACKFRAMES OFF} 32 | {$TYPEDADDRESS OFF} 33 | {$VARSTRINGCHECKS ON} 34 | {$WRITEABLECONST OFF} 35 | {$MINENUMSIZE 1} 36 | {$IMAGEBASE $400000} 37 | {$DEFINE RELEASE} 38 | {$ENDIF IMPLICITBUILDING} 39 | {$DESCRIPTION 'VCL Shell Controls'} 40 | {$LIBSUFFIX '220'} 41 | {$RUNONLY} 42 | {$IMPLICITBUILD OFF} 43 | 44 | requires 45 | rtl, 46 | Vcl; 47 | 48 | contains 49 | Vcl.Shell.ShellCtrls in 'Vcl.Shell.ShellCtrls.pas', 50 | Vcl.Shell.ShellConsts in 'Vcl.Shell.ShellConsts.pas'; 51 | 52 | end. 53 | -------------------------------------------------------------------------------- /Packages/D10_1/vclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package vclshlctrls; 13 | 14 | {$R *.res} 15 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 16 | {$ALIGN 8} 17 | {$ASSERTIONS ON} 18 | {$BOOLEVAL OFF} 19 | {$DEBUGINFO OFF} 20 | {$EXTENDEDSYNTAX ON} 21 | {$IMPORTEDDATA ON} 22 | {$IOCHECKS ON} 23 | {$LOCALSYMBOLS OFF} 24 | {$LONGSTRINGS ON} 25 | {$OPENSTRINGS ON} 26 | {$OPTIMIZATION OFF} 27 | {$OVERFLOWCHECKS OFF} 28 | {$RANGECHECKS OFF} 29 | {$REFERENCEINFO OFF} 30 | {$SAFEDIVIDE OFF} 31 | {$STACKFRAMES OFF} 32 | {$TYPEDADDRESS OFF} 33 | {$VARSTRINGCHECKS ON} 34 | {$WRITEABLECONST OFF} 35 | {$MINENUMSIZE 1} 36 | {$IMAGEBASE $400000} 37 | {$DEFINE RELEASE} 38 | {$ENDIF IMPLICITBUILDING} 39 | {$DESCRIPTION 'VCL Shell Controls'} 40 | {$LIBSUFFIX '240'} 41 | {$RUNONLY} 42 | {$IMPLICITBUILD OFF} 43 | 44 | requires 45 | rtl, 46 | Vcl; 47 | 48 | contains 49 | Vcl.Shell.ShellCtrls in 'Vcl.Shell.ShellCtrls.pas', 50 | Vcl.Shell.ShellConsts in 'Vcl.Shell.ShellConsts.pas'; 51 | 52 | end. 53 | -------------------------------------------------------------------------------- /Packages/D10_2/vclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package vclshlctrls; 13 | 14 | {$R *.res} 15 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 16 | {$ALIGN 8} 17 | {$ASSERTIONS ON} 18 | {$BOOLEVAL OFF} 19 | {$DEBUGINFO OFF} 20 | {$EXTENDEDSYNTAX ON} 21 | {$IMPORTEDDATA ON} 22 | {$IOCHECKS ON} 23 | {$LOCALSYMBOLS OFF} 24 | {$LONGSTRINGS ON} 25 | {$OPENSTRINGS ON} 26 | {$OPTIMIZATION OFF} 27 | {$OVERFLOWCHECKS OFF} 28 | {$RANGECHECKS OFF} 29 | {$REFERENCEINFO OFF} 30 | {$SAFEDIVIDE OFF} 31 | {$STACKFRAMES OFF} 32 | {$TYPEDADDRESS OFF} 33 | {$VARSTRINGCHECKS ON} 34 | {$WRITEABLECONST OFF} 35 | {$MINENUMSIZE 1} 36 | {$IMAGEBASE $400000} 37 | {$DEFINE RELEASE} 38 | {$ENDIF IMPLICITBUILDING} 39 | {$DESCRIPTION 'VCL Shell Controls'} 40 | {$LIBSUFFIX '250'} 41 | {$RUNONLY} 42 | {$IMPLICITBUILD OFF} 43 | 44 | requires 45 | rtl, 46 | Vcl; 47 | 48 | contains 49 | Vcl.Shell.ShellCtrls in 'Vcl.Shell.ShellCtrls.pas', 50 | Vcl.Shell.ShellConsts in 'Vcl.Shell.ShellConsts.pas'; 51 | 52 | end. 53 | -------------------------------------------------------------------------------- /Packages/D10_3/vclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package vclshlctrls; 13 | 14 | {$R *.res} 15 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 16 | {$ALIGN 8} 17 | {$ASSERTIONS ON} 18 | {$BOOLEVAL OFF} 19 | {$DEBUGINFO OFF} 20 | {$EXTENDEDSYNTAX ON} 21 | {$IMPORTEDDATA ON} 22 | {$IOCHECKS ON} 23 | {$LOCALSYMBOLS OFF} 24 | {$LONGSTRINGS ON} 25 | {$OPENSTRINGS ON} 26 | {$OPTIMIZATION OFF} 27 | {$OVERFLOWCHECKS OFF} 28 | {$RANGECHECKS OFF} 29 | {$REFERENCEINFO OFF} 30 | {$SAFEDIVIDE OFF} 31 | {$STACKFRAMES OFF} 32 | {$TYPEDADDRESS OFF} 33 | {$VARSTRINGCHECKS ON} 34 | {$WRITEABLECONST OFF} 35 | {$MINENUMSIZE 1} 36 | {$IMAGEBASE $400000} 37 | {$DEFINE RELEASE} 38 | {$ENDIF IMPLICITBUILDING} 39 | {$DESCRIPTION 'VCL Shell Controls'} 40 | {$LIBSUFFIX '260'} 41 | {$RUNONLY} 42 | {$IMPLICITBUILD OFF} 43 | 44 | requires 45 | rtl, 46 | Vcl; 47 | 48 | contains 49 | Vcl.Shell.ShellCtrls in 'Vcl.Shell.ShellCtrls.pas', 50 | Vcl.Shell.ShellConsts in 'Vcl.Shell.ShellConsts.pas'; 51 | 52 | end. 53 | -------------------------------------------------------------------------------- /Packages/D10_1/dclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package dclshlctrls; 13 | 14 | {$R *.res} 15 | {$R '..\..\Source\dclshlctrls.dcr'} 16 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 17 | {$ALIGN 8} 18 | {$ASSERTIONS ON} 19 | {$BOOLEVAL OFF} 20 | {$DEBUGINFO OFF} 21 | {$EXTENDEDSYNTAX ON} 22 | {$IMPORTEDDATA ON} 23 | {$IOCHECKS ON} 24 | {$LOCALSYMBOLS OFF} 25 | {$LONGSTRINGS ON} 26 | {$OPENSTRINGS ON} 27 | {$OPTIMIZATION OFF} 28 | {$OVERFLOWCHECKS OFF} 29 | {$RANGECHECKS OFF} 30 | {$REFERENCEINFO OFF} 31 | {$SAFEDIVIDE OFF} 32 | {$STACKFRAMES OFF} 33 | {$TYPEDADDRESS OFF} 34 | {$VARSTRINGCHECKS ON} 35 | {$WRITEABLECONST OFF} 36 | {$MINENUMSIZE 1} 37 | {$IMAGEBASE $400000} 38 | {$DEFINE RELEASE} 39 | {$ENDIF IMPLICITBUILDING} 40 | {$DESCRIPTION 'Shell Control Property and Component Editors'} 41 | {$LIBSUFFIX '240'} 42 | {$DESIGNONLY} 43 | {$IMPLICITBUILD OFF} 44 | 45 | requires 46 | designide, 47 | vclshlctrls; 48 | 49 | contains 50 | RootEdit in '..\..\Source\RootEdit.pas' {RootPathEditDlg}, 51 | ShellReg in '..\ShellReg.pas'; 52 | 53 | end. 54 | -------------------------------------------------------------------------------- /Packages/D10_2/dclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package dclshlctrls; 13 | 14 | {$R *.res} 15 | {$R '..\..\Source\dclshlctrls.dcr'} 16 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 17 | {$ALIGN 8} 18 | {$ASSERTIONS ON} 19 | {$BOOLEVAL OFF} 20 | {$DEBUGINFO OFF} 21 | {$EXTENDEDSYNTAX ON} 22 | {$IMPORTEDDATA ON} 23 | {$IOCHECKS ON} 24 | {$LOCALSYMBOLS OFF} 25 | {$LONGSTRINGS ON} 26 | {$OPENSTRINGS ON} 27 | {$OPTIMIZATION OFF} 28 | {$OVERFLOWCHECKS OFF} 29 | {$RANGECHECKS OFF} 30 | {$REFERENCEINFO OFF} 31 | {$SAFEDIVIDE OFF} 32 | {$STACKFRAMES OFF} 33 | {$TYPEDADDRESS OFF} 34 | {$VARSTRINGCHECKS ON} 35 | {$WRITEABLECONST OFF} 36 | {$MINENUMSIZE 1} 37 | {$IMAGEBASE $400000} 38 | {$DEFINE RELEASE} 39 | {$ENDIF IMPLICITBUILDING} 40 | {$DESCRIPTION 'Shell Control Property and Component Editors'} 41 | {$LIBSUFFIX '250'} 42 | {$DESIGNONLY} 43 | {$IMPLICITBUILD OFF} 44 | 45 | requires 46 | designide, 47 | vclshlctrls; 48 | 49 | contains 50 | RootEdit in '..\..\Source\RootEdit.pas' {RootPathEditDlg}, 51 | ShellReg in '..\ShellReg.pas'; 52 | 53 | end. 54 | -------------------------------------------------------------------------------- /Packages/D10_3/dclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package dclshlctrls; 13 | 14 | {$R *.res} 15 | {$R '..\..\Source\dclshlctrls.dcr'} 16 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 17 | {$ALIGN 8} 18 | {$ASSERTIONS ON} 19 | {$BOOLEVAL OFF} 20 | {$DEBUGINFO OFF} 21 | {$EXTENDEDSYNTAX ON} 22 | {$IMPORTEDDATA ON} 23 | {$IOCHECKS ON} 24 | {$LOCALSYMBOLS OFF} 25 | {$LONGSTRINGS ON} 26 | {$OPENSTRINGS ON} 27 | {$OPTIMIZATION OFF} 28 | {$OVERFLOWCHECKS OFF} 29 | {$RANGECHECKS OFF} 30 | {$REFERENCEINFO OFF} 31 | {$SAFEDIVIDE OFF} 32 | {$STACKFRAMES OFF} 33 | {$TYPEDADDRESS OFF} 34 | {$VARSTRINGCHECKS ON} 35 | {$WRITEABLECONST OFF} 36 | {$MINENUMSIZE 1} 37 | {$IMAGEBASE $400000} 38 | {$DEFINE RELEASE} 39 | {$ENDIF IMPLICITBUILDING} 40 | {$DESCRIPTION 'Shell Control Property and Component Editors'} 41 | {$LIBSUFFIX '260'} 42 | {$DESIGNONLY} 43 | {$IMPLICITBUILD OFF} 44 | 45 | requires 46 | designide, 47 | vclshlctrls; 48 | 49 | contains 50 | RootEdit in '..\..\Source\RootEdit.pas' {RootPathEditDlg}, 51 | ShellReg in '..\ShellReg.pas'; 52 | 53 | end. 54 | -------------------------------------------------------------------------------- /Packages/D10_4/dclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package dclshlctrls; 13 | 14 | {$R *.res} 15 | {$R '..\..\Source\dclshlctrls.dcr'} 16 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 17 | {$ALIGN 8} 18 | {$ASSERTIONS ON} 19 | {$BOOLEVAL OFF} 20 | {$DEBUGINFO OFF} 21 | {$EXTENDEDSYNTAX ON} 22 | {$IMPORTEDDATA ON} 23 | {$IOCHECKS ON} 24 | {$LOCALSYMBOLS OFF} 25 | {$LONGSTRINGS ON} 26 | {$OPENSTRINGS ON} 27 | {$OPTIMIZATION OFF} 28 | {$OVERFLOWCHECKS OFF} 29 | {$RANGECHECKS OFF} 30 | {$REFERENCEINFO OFF} 31 | {$SAFEDIVIDE OFF} 32 | {$STACKFRAMES OFF} 33 | {$TYPEDADDRESS OFF} 34 | {$VARSTRINGCHECKS ON} 35 | {$WRITEABLECONST OFF} 36 | {$MINENUMSIZE 1} 37 | {$IMAGEBASE $400000} 38 | {$DEFINE RELEASE} 39 | {$ENDIF IMPLICITBUILDING} 40 | {$DESCRIPTION 'Shell Control Property and Component Editors'} 41 | {$LIBSUFFIX AUTO} 42 | {$DESIGNONLY} 43 | {$IMPLICITBUILD OFF} 44 | 45 | requires 46 | designide, 47 | vclshlctrls; 48 | 49 | contains 50 | RootEdit in '..\..\Source\RootEdit.pas' {RootPathEditDlg}, 51 | ShellReg in '..\ShellReg.pas'; 52 | 53 | end. 54 | -------------------------------------------------------------------------------- /Packages/D11/dclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package dclshlctrls; 13 | 14 | {$R *.res} 15 | {$R '..\..\Source\dclshlctrls.dcr'} 16 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 17 | {$ALIGN 8} 18 | {$ASSERTIONS ON} 19 | {$BOOLEVAL OFF} 20 | {$DEBUGINFO OFF} 21 | {$EXTENDEDSYNTAX ON} 22 | {$IMPORTEDDATA ON} 23 | {$IOCHECKS ON} 24 | {$LOCALSYMBOLS OFF} 25 | {$LONGSTRINGS ON} 26 | {$OPENSTRINGS ON} 27 | {$OPTIMIZATION OFF} 28 | {$OVERFLOWCHECKS OFF} 29 | {$RANGECHECKS OFF} 30 | {$REFERENCEINFO OFF} 31 | {$SAFEDIVIDE OFF} 32 | {$STACKFRAMES OFF} 33 | {$TYPEDADDRESS OFF} 34 | {$VARSTRINGCHECKS ON} 35 | {$WRITEABLECONST OFF} 36 | {$MINENUMSIZE 1} 37 | {$IMAGEBASE $400000} 38 | {$DEFINE RELEASE} 39 | {$ENDIF IMPLICITBUILDING} 40 | {$DESCRIPTION 'Shell Control Property and Component Editors'} 41 | {$LIBSUFFIX AUTO} 42 | {$DESIGNONLY} 43 | {$IMPLICITBUILD OFF} 44 | 45 | requires 46 | designide, 47 | vclshlctrls; 48 | 49 | contains 50 | RootEdit in '..\..\Source\RootEdit.pas' {RootPathEditDlg}, 51 | ShellReg in '..\ShellReg.pas'; 52 | 53 | end. 54 | -------------------------------------------------------------------------------- /Packages/D12/dclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package dclshlctrls; 13 | 14 | {$R *.res} 15 | {$R '..\..\Source\dclshlctrls.dcr'} 16 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 17 | {$ALIGN 8} 18 | {$ASSERTIONS ON} 19 | {$BOOLEVAL OFF} 20 | {$DEBUGINFO OFF} 21 | {$EXTENDEDSYNTAX ON} 22 | {$IMPORTEDDATA ON} 23 | {$IOCHECKS ON} 24 | {$LOCALSYMBOLS OFF} 25 | {$LONGSTRINGS ON} 26 | {$OPENSTRINGS ON} 27 | {$OPTIMIZATION OFF} 28 | {$OVERFLOWCHECKS OFF} 29 | {$RANGECHECKS OFF} 30 | {$REFERENCEINFO OFF} 31 | {$SAFEDIVIDE OFF} 32 | {$STACKFRAMES OFF} 33 | {$TYPEDADDRESS OFF} 34 | {$VARSTRINGCHECKS ON} 35 | {$WRITEABLECONST OFF} 36 | {$MINENUMSIZE 1} 37 | {$IMAGEBASE $400000} 38 | {$DEFINE RELEASE} 39 | {$ENDIF IMPLICITBUILDING} 40 | {$DESCRIPTION 'Shell Control Property and Component Editors'} 41 | {$LIBSUFFIX AUTO} 42 | {$DESIGNONLY} 43 | {$IMPLICITBUILD OFF} 44 | 45 | requires 46 | designide, 47 | vclshlctrls; 48 | 49 | contains 50 | RootEdit in '..\..\Source\RootEdit.pas' {RootPathEditDlg}, 51 | ShellReg in '..\ShellReg.pas'; 52 | 53 | end. 54 | -------------------------------------------------------------------------------- /Packages/D13/dclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package dclshlctrls; 13 | 14 | {$R *.res} 15 | {$R '..\..\Source\dclshlctrls.dcr'} 16 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 17 | {$ALIGN 8} 18 | {$ASSERTIONS ON} 19 | {$BOOLEVAL OFF} 20 | {$DEBUGINFO OFF} 21 | {$EXTENDEDSYNTAX ON} 22 | {$IMPORTEDDATA ON} 23 | {$IOCHECKS ON} 24 | {$LOCALSYMBOLS OFF} 25 | {$LONGSTRINGS ON} 26 | {$OPENSTRINGS ON} 27 | {$OPTIMIZATION OFF} 28 | {$OVERFLOWCHECKS OFF} 29 | {$RANGECHECKS OFF} 30 | {$REFERENCEINFO OFF} 31 | {$SAFEDIVIDE OFF} 32 | {$STACKFRAMES OFF} 33 | {$TYPEDADDRESS OFF} 34 | {$VARSTRINGCHECKS ON} 35 | {$WRITEABLECONST OFF} 36 | {$MINENUMSIZE 1} 37 | {$IMAGEBASE $400000} 38 | {$DEFINE RELEASE} 39 | {$ENDIF IMPLICITBUILDING} 40 | {$DESCRIPTION 'Shell Control Property and Component Editors'} 41 | {$LIBSUFFIX AUTO} 42 | {$DESIGNONLY} 43 | {$IMPLICITBUILD OFF} 44 | 45 | requires 46 | designide, 47 | vclshlctrls; 48 | 49 | contains 50 | RootEdit in '..\..\Source\RootEdit.pas' {RootPathEditDlg}, 51 | ShellReg in '..\ShellReg.pas'; 52 | 53 | end. 54 | -------------------------------------------------------------------------------- /Packages/XE10/dclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package dclshlctrls; 13 | 14 | {$R *.res} 15 | {$R '..\..\Source\dclshlctrls.dcr'} 16 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 17 | {$ALIGN 8} 18 | {$ASSERTIONS ON} 19 | {$BOOLEVAL OFF} 20 | {$DEBUGINFO OFF} 21 | {$EXTENDEDSYNTAX ON} 22 | {$IMPORTEDDATA ON} 23 | {$IOCHECKS ON} 24 | {$LOCALSYMBOLS OFF} 25 | {$LONGSTRINGS ON} 26 | {$OPENSTRINGS ON} 27 | {$OPTIMIZATION OFF} 28 | {$OVERFLOWCHECKS OFF} 29 | {$RANGECHECKS OFF} 30 | {$REFERENCEINFO OFF} 31 | {$SAFEDIVIDE OFF} 32 | {$STACKFRAMES OFF} 33 | {$TYPEDADDRESS OFF} 34 | {$VARSTRINGCHECKS ON} 35 | {$WRITEABLECONST OFF} 36 | {$MINENUMSIZE 1} 37 | {$IMAGEBASE $400000} 38 | {$DEFINE RELEASE} 39 | {$ENDIF IMPLICITBUILDING} 40 | {$DESCRIPTION 'Shell Control Property and Component Editors'} 41 | {$LIBSUFFIX '230'} 42 | {$DESIGNONLY} 43 | {$IMPLICITBUILD OFF} 44 | 45 | requires 46 | rtl, 47 | Vcl, 48 | designide, 49 | Vclx, 50 | vclshlctrls; 51 | 52 | contains 53 | RootEdit in '..\..\Source\RootEdit.pas' {RootPathEditDlg}, 54 | ShellReg in '..\ShellReg.pas'; 55 | 56 | end. 57 | -------------------------------------------------------------------------------- /Packages/XE6/dclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package dclshlctrls; 13 | 14 | {$R *.res} 15 | {$R '..\..\Source\dclshlctrls.dcr'} 16 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 17 | {$ALIGN 8} 18 | {$ASSERTIONS ON} 19 | {$BOOLEVAL OFF} 20 | {$DEBUGINFO OFF} 21 | {$EXTENDEDSYNTAX ON} 22 | {$IMPORTEDDATA ON} 23 | {$IOCHECKS ON} 24 | {$LOCALSYMBOLS OFF} 25 | {$LONGSTRINGS ON} 26 | {$OPENSTRINGS ON} 27 | {$OPTIMIZATION OFF} 28 | {$OVERFLOWCHECKS OFF} 29 | {$RANGECHECKS OFF} 30 | {$REFERENCEINFO OFF} 31 | {$SAFEDIVIDE OFF} 32 | {$STACKFRAMES OFF} 33 | {$TYPEDADDRESS OFF} 34 | {$VARSTRINGCHECKS ON} 35 | {$WRITEABLECONST OFF} 36 | {$MINENUMSIZE 1} 37 | {$IMAGEBASE $400000} 38 | {$DEFINE RELEASE} 39 | {$ENDIF IMPLICITBUILDING} 40 | {$DESCRIPTION 'Shell Control Property and Component Editors'} 41 | {$LIBSUFFIX '200'} 42 | {$DESIGNONLY} 43 | {$IMPLICITBUILD OFF} 44 | 45 | requires 46 | rtl, 47 | Vcl, 48 | designide, 49 | Vclx, 50 | vclshlctrls; 51 | 52 | contains 53 | RootEdit in '..\..\Source\RootEdit.pas' {RootPathEditDlg}, 54 | ShellReg in '..\ShellReg.pas'; 55 | 56 | end. 57 | -------------------------------------------------------------------------------- /Packages/XE8/dclshlctrls.dpk: -------------------------------------------------------------------------------- 1 | 2 | //--------------------------------------------------------------------------- 3 | 4 | // This software is Copyright (c) 2011 Embarcadero Technologies, Inc. 5 | // You may only use this software if you are an authorized licensee 6 | // of Delphi, C++Builder or RAD Studio (Embarcadero Products). 7 | // This software is considered a Redistributable as defined under 8 | // the software license agreement that comes with the Embarcadero Products 9 | // and is subject to that software license agreement. 10 | 11 | //--------------------------------------------------------------------------- 12 | package dclshlctrls; 13 | 14 | {$R *.res} 15 | {$R '..\..\Source\dclshlctrls.dcr'} 16 | {$IFDEF IMPLICITBUILDING This IFDEF should not be used by users} 17 | {$ALIGN 8} 18 | {$ASSERTIONS ON} 19 | {$BOOLEVAL OFF} 20 | {$DEBUGINFO OFF} 21 | {$EXTENDEDSYNTAX ON} 22 | {$IMPORTEDDATA ON} 23 | {$IOCHECKS ON} 24 | {$LOCALSYMBOLS OFF} 25 | {$LONGSTRINGS ON} 26 | {$OPENSTRINGS ON} 27 | {$OPTIMIZATION OFF} 28 | {$OVERFLOWCHECKS OFF} 29 | {$RANGECHECKS OFF} 30 | {$REFERENCEINFO OFF} 31 | {$SAFEDIVIDE OFF} 32 | {$STACKFRAMES OFF} 33 | {$TYPEDADDRESS OFF} 34 | {$VARSTRINGCHECKS ON} 35 | {$WRITEABLECONST OFF} 36 | {$MINENUMSIZE 1} 37 | {$IMAGEBASE $400000} 38 | {$DEFINE RELEASE} 39 | {$ENDIF IMPLICITBUILDING} 40 | {$DESCRIPTION 'Shell Control Property and Component Editors'} 41 | {$LIBSUFFIX '220'} 42 | {$DESIGNONLY} 43 | {$IMPLICITBUILD OFF} 44 | 45 | requires 46 | rtl, 47 | Vcl, 48 | designide, 49 | Vclx, 50 | vclshlctrls; 51 | 52 | contains 53 | RootEdit in '..\..\Source\RootEdit.pas' {RootPathEditDlg}, 54 | ShellReg in '..\ShellReg.pas'; 55 | 56 | end. 57 | -------------------------------------------------------------------------------- /Packages/D11/Vcl.Shell.Controls.groupproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {2FEBAC3C-AA6F-425D-8C6D-8FC6001CA2BE} 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | Default.Personality.12 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49 | -------------------------------------------------------------------------------- /Packages/D12/Vcl.Shell.Controls.groupproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {53BD3831-05AB-41EA-840C-83A606DE76E4} 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | Default.Personality.12 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49 | -------------------------------------------------------------------------------- /Packages/D13/Vcl.Shell.Controls.groupproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {24838E71-DF15-4E4D-B43F-1548A01C2B4E} 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | Default.Personality.12 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49 | -------------------------------------------------------------------------------- /Packages/XE10/Vcl.Shell.Controls.groupproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {941C9A68-996D-430B-A0C2-758BD97F8CD7} 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | Default.Personality.12 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49 | -------------------------------------------------------------------------------- /Packages/XE6/Vcl.Shell.Controls.groupproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {941C9A68-996D-430B-A0C2-758BD97F8CD7} 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | Default.Personality.12 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49 | -------------------------------------------------------------------------------- /Packages/XE8/Vcl.Shell.Controls.groupproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {941C9A68-996D-430B-A0C2-758BD97F8CD7} 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | Default.Personality.12 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49 | -------------------------------------------------------------------------------- /Packages/D10_1/Vcl.Shell.Controls.groupproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {941C9A68-996D-430B-A0C2-758BD97F8CD7} 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | Default.Personality.12 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49 | -------------------------------------------------------------------------------- /Packages/D10_2/Vcl.Shell.Controls.groupproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {1DA1F5D8-040A-429A-B841-588AB88C0AE5} 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | Default.Personality.12 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49 | -------------------------------------------------------------------------------- /Packages/D10_3/Vcl.Shell.Controls.groupproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {941C9A68-996D-430B-A0C2-758BD97F8CD7} 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | Default.Personality.12 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49 | -------------------------------------------------------------------------------- /Packages/D10_4/Vcl.Shell.Controls.groupproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {941C9A68-996D-430B-A0C2-758BD97F8CD7} 4 | 5 | 6 | 7 | 8 | 9 | 10 | 11 | 12 | 13 | 14 | Default.Personality.12 15 | 16 | 17 | 18 | 19 | 20 | 21 | 22 | 23 | 24 | 25 | 26 | 27 | 28 | 29 | 30 | 31 | 32 | 33 | 34 | 35 | 36 | 37 | 38 | 39 | 40 | 41 | 42 | 43 | 44 | 45 | 46 | 47 | 48 | 49 | -------------------------------------------------------------------------------- /.gitignore: -------------------------------------------------------------------------------- 1 | # Uncomment these types if you want even more clean repository. But be careful. 2 | # It can make harm to an existing project source. Read explanations below. 3 | # 4 | # Resource files are binaries containing manifest, project icon and version info. 5 | # They can not be viewed as text or compared by diff-tools. Consider replacing them with .rc files. 6 | #*.res 7 | # 8 | # Type library file (binary). In old Delphi versions it should be stored. 9 | # Since Delphi 2009 it is produced from .ridl file and can safely be ignored. 10 | #*.tlb 11 | # 12 | # Diagram Portfolio file. Used by the diagram editor up to Delphi 7. 13 | # Uncomment this if you are not using diagrams or use newer Delphi version. 14 | #*.ddp 15 | # 16 | # Visual LiveBindings file. Added in Delphi XE2. 17 | # Uncomment this if you are not using LiveBindings Designer. 18 | #*.vlb 19 | # 20 | # Deployment Manager configuration file for your project. Added in Delphi XE2. 21 | # Uncomment this if it is not mobile development and you do not use remote debug feature. 22 | #*.deployproj 23 | # 24 | # C++ object files produced when C/C++ Output file generation is configured. 25 | # Uncomment this if you are not using external objects (zlib library for example). 26 | #*.obj 27 | # 28 | 29 | # Delphi compiler-generated binaries (safe to delete) 30 | *.exe 31 | *.dll 32 | *.bpl 33 | *.bpi 34 | *.dcp 35 | *.so 36 | *.apk 37 | *.drc 38 | *.map 39 | *.dres 40 | *.rsm 41 | *.tds 42 | *.dcu 43 | *.lib 44 | *.a 45 | *.o 46 | *.ocx 47 | 48 | # Delphi autogenerated files (duplicated info) 49 | *.cfg 50 | *.hpp 51 | *Resource.rc 52 | 53 | # Delphi local files (user-specific info) 54 | *.local 55 | *.identcache 56 | *.projdata 57 | *.tvsconfig 58 | *.dsk 59 | 60 | # Delphi history and backups 61 | __history/ 62 | __recovery/ 63 | *.~* 64 | 65 | # Castalia statistics file (since XE7 Castalia is distributed with Delphi) 66 | *.stat 67 | 68 | # Boss dependency manager vendor folder https://github.com/HashLoad/boss 69 | modules/ 70 | -------------------------------------------------------------------------------- /Packages/ShellReg.pas: -------------------------------------------------------------------------------- 1 | {***************************************************************************} 2 | { } 3 | { Delphi Visual Component Library } 4 | { } 5 | { Copyright (c) 1995-2010 Embarcadero Technologies, Inc. } 6 | { } 7 | { You may only use this software if you are an authorized licensee } 8 | { of Delphi, C++Builder or RAD Studio (Embarcadero Products). } 9 | { This software is considered a Redistributable as defined under } 10 | { the software license agreement that comes with the Embarcadero Products } 11 | { and is subject to that software license agreement. } 12 | { } 13 | {***************************************************************************} 14 | unit ShellReg; 15 | 16 | interface 17 | 18 | procedure Register; 19 | 20 | implementation 21 | 22 | uses Classes, TypInfo, Controls, DesignIntf, ShellCtrls, ShellConsts, RootEdit; 23 | 24 | procedure Register; 25 | begin 26 | GroupDescendentsWith(TShellChangeNotifier, Controls.TControl); 27 | RegisterComponents(SPalletePage, [TShellTreeView, TShellComboBox, TShellListView, 28 | TShellChangeNotifier]); 29 | RegisterPropertyEditor(TypeInfo(TRoot), TShellTreeView, SPropertyName, TRootProperty); 30 | RegisterPropertyEditor(TypeInfo(TRoot), TShellComboBox, SPropertyName, TRootProperty); 31 | RegisterPropertyEditor(TypeInfo(TRoot), TShellListView, SPropertyName, TRootProperty); 32 | RegisterPropertyEditor(TypeInfo(TRoot), TShellChangeNotifier, SPropertyName, TRootProperty); 33 | RegisterComponentEditor(TShellTreeView, TRootEditor); 34 | RegisterComponentEditor(TShellListView, TRootEditor); 35 | RegisterComponentEditor(TShellComboBox, TRootEditor); 36 | RegisterComponentEditor(TShellChangeNotifier, TRootEditor); 37 | end; 38 | 39 | end. 40 | -------------------------------------------------------------------------------- /README.md: -------------------------------------------------------------------------------- 1 | # Shell Controls Packages and Utils [![License](https://img.shields.io/badge/License-Apache%202.0-yellowgreen.svg)](https://opensource.org/licenses/Apache-2.0) 2 | 3 | **Latest Version 1.1.3 - 29 Aug 2025** 4 | 5 | ** Packages, demo and Utility of Delphi ShellControl Components (missing by Embarcadero) 6 | 7 | Delphi version supported: XE6, XE8, XE10, D10.1, D10.2, D10.3, D10.4, D11, D12 and D13. 8 | 9 | For other versions, please add a request in the [Issue section](https://github.com/EtheaDev/DelphiShellControlsPackages/issues) of the project. 10 | 11 | ![Supporting Delphi](./Images/SupportingDelphi.jpg) 12 | 13 | ## Components 14 | Vcl.Shell.ShellCtrls.pas and Vcl.Shell.ShellConsts.pas are not distributed here, because they are distributed by Embarcadero inside Delphi! 15 | 16 | ## Installation Notes 17 | 18 | - Open the Vcl.Shell.Controls.groupproj file from Packages\[DelphiVersion] folder. 19 | - Build: vclshlctrls.dpk 20 | - Build and Install: dclshlctrls.dpk 21 | 22 | Then you can use those visual components at Desing-time: 23 | 24 | - **TShellComboBox** 25 | - **TShellListView** 26 | - **TShellTreeView** 27 | 28 | and the component **TShellChangeNotifier** to intercept changes to folders and files. 29 | 30 | A simple demo that explain the use of those components is located under: 31 | - Demo\ShellControlsDemo\ShellControlsDemo.dproj 32 | 33 | ### Preview of the Demo included: 34 | 35 | ![Shell Controls Demo](./Images/ShellControlsDemoDesktop.jpg) 36 | 37 | 38 | ## Release Notes 39 | 29 Aug 2025: ver. 1.1.3 40 | - Fixed Demo 41 | - Added support for Delphi 13 42 | 43 | 22 Sep 2024: ver. 1.1.2 44 | - Fixed option list for ListView in Demo 45 | 46 | 08 Jun 2024: ver. 1.1.1 47 | - Updated packages of ShellControls for Delphi 12.1 48 | 49 | 27 Oct 2023: ver. 1.1.0 50 | - Added packages of ShellControls for Delphi 12 51 | 52 | 26 May 2023: ver. 1.0.0 53 | - Added packages of ShellControls for many Delphi versions 54 | - Fixed ShellEdit.pas to show the propery editor according to IDE style 55 | - Added a simple Demo and a simple unit with some useful utilities 56 | 57 | ## License 58 | 59 | Licensed under the [Apache License, Version 2.0] (the "License"); 60 | Unless required by applicable law or agreed to in writing, software distributed under the License is distributed on an "AS IS" BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the License for the specific language governing permissions and limitations under the License. 61 | 62 | Original Copyright (c) 1995-2010 Embarcadero Technologies, Inc. 63 | You may only use this software if you are an authorized licensee of Delphi, C++Builder or RAD Studio (Embarcadero Products). 64 | This software is considered a Redistributable as defined under the software license agreement that comes with the Embarcadero Products and is subject to that software license agreement. 65 | -------------------------------------------------------------------------------- /Source/RootEdit.dfm: -------------------------------------------------------------------------------- 1 | object RootPathEditDlg: TRootPathEditDlg 2 | Left = 446 3 | Top = 190 4 | Caption = 'Select Root Path' 5 | ClientHeight = 217 6 | ClientWidth = 424 7 | Color = clBtnFace 8 | Font.Charset = DEFAULT_CHARSET 9 | Font.Color = clWindowText 10 | Font.Height = -13 11 | Font.Name = 'Segoe UI' 12 | Font.Style = [] 13 | OldCreateOrder = True 14 | OnClose = FormClose 15 | OnCreate = FormCreate 16 | DesignSize = ( 17 | 424 18 | 217) 19 | PixelsPerInch = 96 20 | TextHeight = 17 21 | object StandardGroupBox: TGroupBox 22 | Left = 8 23 | Top = 8 24 | Width = 404 25 | Height = 80 26 | Anchors = [akLeft, akTop, akRight] 27 | TabOrder = 0 28 | DesignSize = ( 29 | 404 30 | 80) 31 | object cbFolderType: TComboBox 32 | Left = 20 33 | Top = 30 34 | Width = 364 35 | Height = 25 36 | Anchors = [akLeft, akTop, akRight] 37 | TabOrder = 0 38 | end 39 | object rbUseFolder: TRadioButton 40 | Left = 20 41 | Top = 4 42 | Width = 155 43 | Height = 21 44 | Caption = 'Use Standard &Folder' 45 | TabOrder = 1 46 | OnClick = rbUseFolderClick 47 | end 48 | end 49 | object PathGroupBox: TGroupBox 50 | Left = 8 51 | Top = 94 52 | Width = 404 53 | Height = 70 54 | Anchors = [akLeft, akTop, akRight] 55 | TabOrder = 1 56 | DesignSize = ( 57 | 404 58 | 70) 59 | object ePath: TEdit 60 | Left = 17 61 | Top = 31 62 | Width = 327 63 | Height = 25 64 | Anchors = [akLeft, akTop, akRight] 65 | TabOrder = 0 66 | Text = 'C:\' 67 | end 68 | object btnBrowse: TButton 69 | Left = 350 70 | Top = 30 71 | Width = 34 72 | Height = 30 73 | Anchors = [akTop, akRight] 74 | Caption = '...' 75 | TabOrder = 1 76 | OnClick = btnBrowseClick 77 | end 78 | object rbUsePath: TRadioButton 79 | Left = 20 80 | Top = 4 81 | Width = 90 82 | Height = 21 83 | Caption = 'Use &Path' 84 | TabOrder = 2 85 | OnClick = rbUsePathClick 86 | end 87 | end 88 | object BottomPanel: TPanel 89 | Left = 0 90 | Top = 176 91 | Width = 424 92 | Height = 41 93 | Align = alBottom 94 | TabOrder = 2 95 | DesignSize = ( 96 | 424 97 | 41) 98 | object OKButton: TButton 99 | Left = 222 100 | Top = 5 101 | Width = 92 102 | Height = 31 103 | Anchors = [akTop, akRight] 104 | Caption = '&OK' 105 | Default = True 106 | ModalResult = 1 107 | TabOrder = 0 108 | OnClick = OKButtonClick 109 | end 110 | object CancelButton: TButton 111 | Left = 320 112 | Top = 5 113 | Width = 92 114 | Height = 31 115 | Anchors = [akTop, akRight] 116 | Cancel = True 117 | Caption = '&Cancel' 118 | TabOrder = 1 119 | OnClick = CancelButtonClick 120 | end 121 | end 122 | end 123 | -------------------------------------------------------------------------------- /ReadMe.htm: -------------------------------------------------------------------------------- 1 | 32 |

Shell Controls Packages and Utils License

33 |

Latest Version 1.1.3 - 29 Aug 2025

34 |

** Packages, demo and Utility of Delphi ShellControl Components (missing by Embarcadero)

35 |

Delphi version supported: XE6, XE8, XE10, D10.1, D10.2, D10.3, D10.4, D11, D12 and D13.

36 |

For other versions, please add a request in the Issue section of the project.

37 |

Supporting Delphi

38 |

Components

39 |

Vcl.Shell.ShellCtrls.pas and Vcl.Shell.ShellConsts.pas are not distributed here, because they are distributed by Embarcadero inside Delphi!

40 |

Installation Notes

41 | 46 |

Then you can use those visual components at Desing-time:

47 | 52 |

and the component TShellChangeNotifier to intercept changes to folders and files.

53 |

A simple demo that explain the use of those components is located under:

54 | 57 |

Preview of the Demo included:

58 |

Shell Controls Demo

59 |

Release Notes

60 |

29 Aug 2025: ver. 1.1.3

61 | 65 |

22 Sep 2024: ver. 1.1.2

66 | 69 |

08 Jun 2024: ver. 1.1.1

70 | 73 |

27 Oct 2023: ver. 1.1.0

74 | 77 |

26 May 2023: ver. 1.0.0

78 | 83 |

License

84 |

Licensed under the Apache License, Version 2.0; 85 | Unless required by applicable law or agreed to in writing, software distributed under the License is distributed on an “AS IS” BASIS, WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. See the License for the specific language governing permissions and limitations under the License.

86 |

Original Copyright (c) 1995-2010 Embarcadero Technologies, Inc. 87 | You may only use this software if you are an authorized licensee of Delphi, C++Builder or RAD Studio (Embarcadero Products). 88 | This software is considered a Redistributable as defined under the software license agreement that comes with the Embarcadero Products and is subject to that software license agreement.

89 | -------------------------------------------------------------------------------- /Demo/ShellControlsDemo/ShellControlsDemo.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {12C58CBE-9908-4321-A9FE-3F6ED54D7E54} 4 | ShellControlsDemo.dpr 5 | True 6 | Release 7 | 3 8 | Application 9 | VCL 10 | 20.2 11 | Win64 12 | ShellControlsDemo 13 | 14 | 15 | true 16 | 17 | 18 | true 19 | Base 20 | true 21 | 22 | 23 | true 24 | Base 25 | true 26 | 27 | 28 | true 29 | Base 30 | true 31 | 32 | 33 | true 34 | Cfg_1 35 | true 36 | true 37 | 38 | 39 | true 40 | Cfg_1 41 | true 42 | true 43 | 44 | 45 | true 46 | Base 47 | true 48 | 49 | 50 | true 51 | Cfg_2 52 | true 53 | true 54 | 55 | 56 | true 57 | Cfg_2 58 | true 59 | true 60 | 61 | 62 | false 63 | ShellControlsDemo.ico 64 | false 65 | $(BDS)\bin\default_app.manifest 66 | false 67 | false 68 | false 69 | false 70 | false 71 | 00400000 72 | ShellControlsDemo 73 | 1033 74 | .\Bin 75 | .\Dcu\$(Platform)\$(Config) 76 | ..\..\Source;$(DCC_UnitSearchPath) 77 | 78 | 79 | true 80 | PerMonitorV2 81 | 82 | 83 | true 84 | PerMonitorV2 85 | 86 | 87 | Debug 88 | true 89 | 90 | 91 | Debug 92 | true 93 | 94 | 95 | true 96 | 97 | 98 | true 99 | 100 | 101 | 102 | MainSource 103 | 104 | 105 |
MainForm
106 | 107 | 108 | 109 | Cfg_2 110 | Base 111 | 112 | 113 | Base 114 | 115 | 116 | Cfg_1 117 | Base 118 | 119 | 120 | 121 | Delphi.Personality.12 122 | 123 | 124 | 125 | 126 | ShellControlsDemo.dpr 127 | 128 | 129 | 130 | 131 | 132 | False 133 | True 134 | True 135 | 136 | 137 | 12 138 | 139 | 140 | 141 | 142 | -------------------------------------------------------------------------------- /Demo/ShellControlsDemo/MainUnit.pas: -------------------------------------------------------------------------------- 1 | unit MainUnit; 2 | 3 | interface 4 | 5 | uses 6 | WinApi.Windows, WinApi.Messages, System.SysUtils, 7 | System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, 8 | Vcl.Dialogs, Vcl.StdCtrls, Vcl.ComCtrls, 9 | Vcl.Shell.ShellCtrls, Vcl.ExtCtrls, System.Actions, 10 | Vcl.ActnList, Vcl.Buttons, Vcl.ToolWin, Vcl.ImgList, 11 | Vcl.Menus, System.ImageList; 12 | 13 | type 14 | TMainForm = class(TForm) 15 | ClientPanel: TPanel; 16 | LeftPanel: TPanel; 17 | ShellComboBox: TShellComboBox; 18 | ShellTreeView: TShellTreeView; 19 | VertSplitter: TSplitter; 20 | CenterPanel: TPanel; 21 | ShellListView: TShellListView; 22 | ActionList: TActionList; 23 | actnBack: TAction; 24 | actnRefresh: TAction; 25 | actnSorted: TAction; 26 | ImageList: TImageList; 27 | FileInfo: TPanel; 28 | PaintBox: TPaintBox; 29 | StatusBar: TStatusBar; 30 | RightSplitter: TSplitter; 31 | FileNameLabel: TLabel; 32 | PathLabel: TLabel; 33 | LastChangeLabel: TLabel; 34 | CreationLabel: TLabel; 35 | DisplayNameLabel: TLabel; 36 | TopPanel: TPanel; 37 | ToolBar: TToolBar; 38 | tbBack: TToolButton; 39 | tbRefresh: TToolButton; 40 | tbSorted: TToolButton; 41 | ViewStyle: TRadioGroup; 42 | tpSep: TToolButton; 43 | PopupMenu: TPopupMenu; 44 | Back1: TMenuItem; 45 | Refresh1: TMenuItem; 46 | Sorted1: TMenuItem; 47 | ShellChangeNotifier: TShellChangeNotifier; 48 | procedure ViewStyleClick(Sender: TObject); 49 | procedure FormCreate(Sender: TObject); 50 | procedure actnBackUpdate(Sender: TObject); 51 | procedure actnBackExecute(Sender: TObject); 52 | procedure actnRefreshExecute(Sender: TObject); 53 | procedure actnSortedUpdate(Sender: TObject); 54 | procedure actnSortedExecute(Sender: TObject); 55 | procedure PaintBoxPaint(Sender: TObject); 56 | procedure ShellListViewChange(Sender: TObject; Item: TListItem; 57 | Change: TItemChange); 58 | procedure ShellListViewExit(Sender: TObject); 59 | procedure ShellChangeNotifierChange; 60 | private 61 | procedure InitImageListIcons; 62 | procedure ClearFileInfo; 63 | end; 64 | 65 | var 66 | MainForm: TMainForm; 67 | 68 | implementation 69 | 70 | {$R *.dfm} 71 | 72 | uses 73 | Winapi.CommCtrl 74 | , Winapi.ShlObj 75 | , Vcl.Shell.Utils 76 | , System.TypInfo 77 | ; 78 | 79 | type 80 | TNTFolders = (rfCommonDesktopDirectory, rfCommonPrograms, rfCommonStartMenu, rfCommonStartup); 81 | 82 | procedure TMainForm.FormCreate(Sender: TObject); 83 | var 84 | I: TViewStyle; 85 | LViewStyleName: string; 86 | begin 87 | for I := Low(TViewStyle) to High(TViewStyle) do 88 | begin 89 | LViewStyleName := GetEnumName(TypeInfo(TViewStyle), Ord(I)); 90 | ViewStyle.Items.Add(LViewStyleName); 91 | end; 92 | ViewStyle.ItemIndex := 0; 93 | 94 | Caption := Application.Title; 95 | ClearFileInfo; 96 | InitImageListIcons; 97 | DisplayNameLabel.Font.Height := Round(Self.Font.Height * 1.6); 98 | DisplayNameLabel.Font.Style := [TFontStyle.fsBold]; 99 | PathLabel.Font.Height := Round(Self.Font.Height * 1.2); 100 | end; 101 | 102 | procedure TMainForm.InitImageListIcons; 103 | begin 104 | ; 105 | end; 106 | 107 | procedure TMainForm.ShellChangeNotifierChange; 108 | begin 109 | actnRefresh.Execute; 110 | end; 111 | 112 | procedure TMainForm.ShellListViewChange(Sender: TObject; Item: TListItem; 113 | Change: TItemChange); 114 | var 115 | LFileName: TFileName; 116 | LFileType: string; 117 | LCreation, LChanged: TDateTime; 118 | LFolder: TShellFolder; 119 | begin 120 | LFolder := ShellListView.SelectedFolder; 121 | if Assigned(LFolder) then 122 | begin 123 | DisplayNameLabel.Caption := LFolder.DisplayName; 124 | StatusBar.SimpleText := LFolder.PathName; 125 | if LFolder.IsFolder then 126 | begin 127 | FileNameLabel.Caption := ''; 128 | PathLabel.Caption := LFolder.PathName; 129 | LastChangeLabel.Caption := ''; 130 | CreationLabel.Caption := ''; 131 | end 132 | else 133 | begin 134 | LFileName := LFolder.PathName; 135 | FileNameLabel.Caption := ExtractFileName(LFolder.PathName); 136 | PathLabel.Caption := ExtractFilePath(LFolder.PathName); 137 | GetFileSummary(LFileName, LFileType, LCreation, LChanged); 138 | LastChangeLabel.Caption := Format('Last Changed: %s', [DateTimeToStr(LChanged)]); 139 | CreationLabel.Caption := Format('Creation Date: %s', [DateTimeToStr(LCreation)]); 140 | end; 141 | end 142 | else 143 | ClearFileInfo; 144 | PaintBox.Invalidate; 145 | end; 146 | 147 | procedure TMainForm.ShellListViewExit(Sender: TObject); 148 | begin 149 | ClearFileInfo; 150 | PaintBox.Invalidate; 151 | end; 152 | 153 | procedure TMainForm.PaintBoxPaint(Sender: TObject); 154 | var 155 | LFolder: TShellFolder; 156 | LIcon: TIcon; 157 | LRect: TRect; 158 | LItem: PItemIDLIst; 159 | begin 160 | LRect := TRect.Create(0,0,PaintBox.Width,PaintBox.Height); 161 | LIcon := TIcon.Create; 162 | try 163 | //Retrieve Icon from current file 164 | LFolder := ShellListView.SelectedFolder; 165 | if Assigned(LFolder) and ShellListView.Focused then 166 | begin 167 | LItem := LFolder.AbsoluteID; 168 | LIcon.Handle := GetAssociatedIcon(LItem, True, False); 169 | PaintBox.Canvas.StretchDraw(LRect, LIcon); 170 | end 171 | else 172 | begin 173 | PaintBox.Canvas.Brush.Color := FileInfo.Color; 174 | PaintBox.Canvas.Pen.Style := psSolid; 175 | PaintBox.Canvas.FillRect(LRect); 176 | end; 177 | finally 178 | LIcon.Free; 179 | end; 180 | end; 181 | 182 | procedure TMainForm.ViewStyleClick(Sender: TObject); 183 | begin 184 | ShellListView.ViewStyle := TViewStyle(ViewStyle.ItemIndex); 185 | end; 186 | 187 | procedure TMainForm.actnBackUpdate(Sender: TObject); 188 | begin 189 | actnBack.Enabled := (ShellTreeView.SelectedFolder <> nil) and 190 | (ShellTreeView.SelectedFolder.Level > 0); 191 | end; 192 | 193 | procedure TMainForm.actnBackExecute(Sender: TObject); 194 | begin 195 | ShellListView.Back(); 196 | end; 197 | 198 | procedure TMainForm.actnRefreshExecute(Sender: TObject); 199 | begin 200 | ShellListView.Refresh(); 201 | end; 202 | 203 | procedure TMainForm.actnSortedUpdate(Sender: TObject); 204 | begin 205 | actnSorted.Checked := ShellListView.Sorted; 206 | end; 207 | 208 | procedure TMainForm.ClearFileInfo; 209 | begin 210 | DisplayNameLabel.Caption := ''; 211 | FileNameLabel.Caption := ''; 212 | PathLabel.Caption := ''; 213 | LastChangeLabel.Caption := ''; 214 | CreationLabel.Caption := ''; 215 | end; 216 | 217 | procedure TMainForm.actnSortedExecute(Sender: TObject); 218 | begin 219 | ShellListView.Sorted := actnSorted.Checked; 220 | end; 221 | 222 | initialization 223 | {$IFDEF DEBUG} 224 | ReportMemoryLeaksOnShutdown := True; 225 | {$ENDIF} 226 | 227 | end. 228 | -------------------------------------------------------------------------------- /Source/RootEdit.pas: -------------------------------------------------------------------------------- 1 | {**************************************************************************} 2 | { } 3 | { Delphi Visual Component Library } 4 | { } 5 | { Copyright (c) 1995-2010 Embarcadero Technologies, Inc. } 6 | { } 7 | { You may only use this software if you are an authorized licensee } 8 | { of Delphi, C++Builder or RAD Studio (Embarcadero Products). } 9 | { This software is considered a Redistributable as defined under } 10 | { the software license agreement that comes with the Embarcadero Products } 11 | { and is subject to that software license agreement. } 12 | { } 13 | {**************************************************************************} 14 | unit RootEdit; 15 | 16 | interface 17 | 18 | uses 19 | Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, 20 | DesignIntf, DesignEditors, StdCtrls, ExtCtrls, ShellCtrls; 21 | 22 | type 23 | TRootPathEditDlg = class(TForm) 24 | StandardGroupBox: TGroupBox; 25 | cbFolderType: TComboBox; 26 | PathGroupBox: TGroupBox; 27 | ePath: TEdit; 28 | btnBrowse: TButton; 29 | rbUseFolder: TRadioButton; 30 | rbUsePath: TRadioButton; 31 | BottomPanel: TPanel; 32 | OKButton: TButton; 33 | CancelButton: TButton; 34 | procedure FormCreate(Sender: TObject); 35 | procedure FormClose(Sender: TObject; var Action: TCloseAction); 36 | procedure CancelButtonClick(Sender: TObject); 37 | procedure rbUseFolderClick(Sender: TObject); 38 | procedure rbUsePathClick(Sender: TObject); 39 | procedure OKButtonClick(Sender: TObject); 40 | procedure btnBrowseClick(Sender: TObject); 41 | private 42 | procedure UpdateState; 43 | public 44 | end; 45 | 46 | TRootProperty = class(TStringProperty) 47 | public 48 | procedure Edit; override; 49 | function GetAttributes: TPropertyAttributes; override; 50 | end; 51 | 52 | TRootEditor = class(TComponentEditor) 53 | public 54 | procedure ExecuteVerb(Index: Integer); override; 55 | function GetVerb(Index: Integer): String; override; 56 | function GetVerbCount: Integer; override; 57 | end; 58 | 59 | implementation 60 | 61 | {$R *.dfm} 62 | 63 | uses TypInfo, FileCtrl, Vcl.Themes, ToolsAPI, BrandingAPI 64 | {$IF (CompilerVersion >= 32.0)}, IDETheme.Utils{$IFEND}; 65 | resourcestring 66 | SPickRootPath = 'Please select a root path'; 67 | SEditRoot = 'E&dit Root'; 68 | 69 | const 70 | NTFolders = [rfCommonDesktopDirectory, rfCommonPrograms, rfCommonStartMenu, 71 | rfCommonStartup]; 72 | 73 | function PathIsCSIDL(Value: string): Boolean; 74 | begin 75 | Result := GetEnumValue(TypeInfo(TRootFolder), Value) >= 0; 76 | end; 77 | 78 | function RootPathEditor(Value : string): string; 79 | begin 80 | Result := Value; 81 | with TRootPathEditDlg.Create(Application) do 82 | try 83 | rbUseFolder.Checked := PathIsCSIDL(Result); 84 | rbUsePath.Checked := not rbUseFolder.Checked; 85 | if not PathIsCSIDL(Result) then 86 | begin 87 | cbFolderType.ItemIndex := 0; 88 | ePath.Text := Result; 89 | end 90 | else 91 | cbFolderType.ItemIndex := cbFolderType.Items.IndexOf(Result); 92 | 93 | UpdateState; 94 | ShowModal; 95 | if ModalResult = mrOK then 96 | begin 97 | if rbUsePath.Checked then 98 | Result := ePath.Text 99 | else 100 | Result := cbFolderType.Items[cbFolderType.ItemIndex]; 101 | end; 102 | finally 103 | Free; 104 | end; 105 | end; 106 | 107 | { TRootProperty } 108 | 109 | procedure TRootProperty.Edit; 110 | begin 111 | SetStrValue(RootPathEditor(GetStrValue)); 112 | end; 113 | 114 | function TRootProperty.GetAttributes: TPropertyAttributes; 115 | begin 116 | Result := [paDialog]; 117 | end; 118 | 119 | { TRootPathEditDlg } 120 | 121 | procedure TRootPathEditDlg.FormCreate(Sender: TObject); 122 | var 123 | FT: TRootFolder; 124 | {$IF (CompilerVersion >= 32.0)} 125 | LStyle: TCustomStyleServices; 126 | {$IFEND} 127 | begin 128 | inherited; 129 | {$IF (CompilerVersion >= 32.0)} 130 | {$IF (CompilerVersion <= 34.0)} 131 | if UseThemeFont then 132 | Self.Font.Assign(GetThemeFont); 133 | {$IFEND} 134 | {$IF CompilerVersion > 34.0} 135 | if TIDEThemeMetrics.Font.Enabled then 136 | Self.Font.Assign(TIDEThemeMetrics.Font.GetFont); 137 | {$IFEND} 138 | 139 | if ThemeProperties <> nil then 140 | begin 141 | LStyle := ThemeProperties.StyleServices; 142 | StyleElements := StyleElements - [seClient]; 143 | Color := LStyle.GetSystemColor(clWindow); 144 | BottomPanel.StyleElements := BottomPanel.StyleElements - [seClient]; 145 | BottomPanel.ParentBackground := False; 146 | BottomPanel.Color := LStyle.GetSystemColor(clBtnFace); 147 | IDEThemeManager.RegisterFormClass(TRootPathEditDlg); 148 | ThemeProperties.ApplyTheme(Self); 149 | end; 150 | {$IFEND} 151 | for FT := Low(TRootFolder) to High(TRootFolder) do 152 | if not ((Win32Platform = VER_PLATFORM_WIN32_WINDOWS) and (FT in NTFolders)) then 153 | cbFolderType.Items.Add(GetEnumName(TypeInfo(TRootFolder), Ord(FT))); 154 | cbFolderType.ItemIndex := 0; 155 | end; 156 | 157 | procedure TRootPathEditDlg.UpdateState; 158 | begin 159 | cbFolderType.Enabled := rbUseFolder.Checked; 160 | ePath.Enabled := not rbUseFolder.Checked; 161 | btnBrowse.Enabled := ePath.Enabled; 162 | end; 163 | 164 | procedure TRootPathEditDlg.FormClose(Sender: TObject; 165 | var Action: TCloseAction); 166 | begin 167 | Action := caFree; 168 | end; 169 | 170 | procedure TRootPathEditDlg.CancelButtonClick(Sender: TObject); 171 | begin 172 | ModalResult := mrCancel; 173 | Close; 174 | end; 175 | 176 | procedure TRootPathEditDlg.rbUseFolderClick(Sender: TObject); 177 | begin 178 | rbUsePath.Checked := not rbUseFolder.Checked; 179 | UpdateState; 180 | end; 181 | 182 | procedure TRootPathEditDlg.rbUsePathClick(Sender: TObject); 183 | begin 184 | rbUseFolder.Checked := not rbUsePath.Checked; 185 | UpdateState; 186 | end; 187 | 188 | procedure TRootPathEditDlg.OKButtonClick(Sender: TObject); 189 | begin 190 | ModalResult := mrOK; 191 | end; 192 | 193 | procedure TRootPathEditDlg.btnBrowseClick(Sender: TObject); 194 | var 195 | Path : widestring; 196 | Dir : string; 197 | begin 198 | Path := ePath.Text; 199 | Dir := ePath.Text; 200 | if SelectDirectory( SPickRootPath, '', Dir ) then 201 | ePath.Text := Dir; 202 | end; 203 | 204 | { TRootEditor } 205 | 206 | procedure TRootEditor.ExecuteVerb(Index: Integer); 207 | 208 | procedure EditRoot; 209 | const 210 | SRoot = 'root'; 211 | var 212 | Path : string; 213 | begin 214 | Path := RootPathEditor(GetPropValue(Component, SRoot, True)); 215 | SetPropValue(Component, SRoot, Path); 216 | Designer.Modified; 217 | end; 218 | 219 | begin 220 | 221 | case Index of 222 | 0 : EditRoot; 223 | end; 224 | end; 225 | 226 | function TRootEditor.GetVerb(Index: Integer): String; 227 | begin 228 | case Index of 229 | 0 : Result := SEditRoot; 230 | end; 231 | end; 232 | 233 | function TRootEditor.GetVerbCount: Integer; 234 | begin 235 | Result := 1; 236 | end; 237 | 238 | end. 239 | -------------------------------------------------------------------------------- /Packages/D10_1/dclshlctrls.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {11cfb78a-4261-4ca7-a4ab-13c000546b24} 4 | dclshlctrls.dpk 5 | Debug 6 | DCC32 7 | 18.2 8 | Release 9 | True 10 | Package 11 | VCL 12 | Win32 13 | 1 14 | 15 | 16 | true 17 | 18 | 19 | true 20 | Base 21 | true 22 | 23 | 24 | true 25 | Base 26 | true 27 | 28 | 29 | true 30 | Base 31 | true 32 | 33 | 34 | false 35 | false 36 | 24210 37 | true 38 | true 39 | CompanyName=Embarcadero Technologies, Inc.;FileDescription=CodeGear Win32 Shell Controls;FileVersion=15.0.3513.24210;InternalName=DCLSHLCTRLS150;LegalCopyright=Copyright © 2000-2002 Embarcadero Technologies, Inc.;LegalTrademarks=;OriginalFilename=DCLSHLCTRLS150.BPL;ProductName=Delphi;ProductVersion=14.0;Comments= 40 | 3513 41 | Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;WinApi;$(DCC_Namespace) 42 | 1033 43 | 15 44 | 00400000 45 | true 46 | false 47 | Shell Control Property and Component Editors 48 | true 49 | true 50 | true 51 | 240 52 | dclshlctrls 53 | ..\..\Lib\Delphi10_1\$(Platform)\$(Config) 54 | 55 | 56 | 7.0 57 | 0 58 | False 59 | True 60 | 0 61 | RELEASE;$(DCC_Define) 62 | 63 | 64 | 7.0 65 | False 66 | DEBUG;$(DCC_Define) 67 | 68 | 69 | 70 | MainSource 71 | 72 | 73 | 74 | 75 | 76 |
RootPathEditDlg
77 | 78 | 79 | 80 | Base 81 | 82 | 83 | Cfg_1 84 | Base 85 | 86 | 87 | Cfg_2 88 | Base 89 | 90 | 91 | 92 | 93 | 94 | Delphi.Personality.12 95 | Package 96 | 97 | 98 | 99 | False 100 | 101 | 102 | 103 | 104 | True 105 | False 106 | 15 107 | 0 108 | 3513 109 | 24210 110 | False 111 | False 112 | False 113 | False 114 | True 115 | 1033 116 | 1252 117 | 118 | 119 | Embarcadero Technologies, Inc. 120 | CodeGear Win32 Shell Controls 121 | 15.0.3513.24210 122 | DCLSHLCTRLS150 123 | Copyright © 2000-2002 Embarcadero Technologies, Inc. 124 | 125 | DCLSHLCTRLS150.BPL 126 | Delphi 127 | 14.0 128 | 129 | 130 | 131 | dclshlctrls.dpk 132 | 133 | 134 | 135 | 136 | True 137 | False 138 | 139 | 140 | 12 141 | 142 | 143 | -------------------------------------------------------------------------------- /Packages/D10_2/dclshlctrls.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {E5403EDE-2008-405D-A8E2-76B392A2F818} 4 | dclshlctrls.dpk 5 | Debug 6 | DCC32 7 | 18.4 8 | Release 9 | True 10 | Package 11 | VCL 12 | Win32 13 | 1 14 | 15 | 16 | true 17 | 18 | 19 | true 20 | Base 21 | true 22 | 23 | 24 | true 25 | Base 26 | true 27 | 28 | 29 | true 30 | Base 31 | true 32 | 33 | 34 | false 35 | false 36 | 24210 37 | true 38 | true 39 | CompanyName=Embarcadero Technologies, Inc.;FileDescription=CodeGear Win32 Shell Controls;FileVersion=15.0.3513.24210;InternalName=DCLSHLCTRLS150;LegalCopyright=Copyright © 2000-2002 Embarcadero Technologies, Inc.;LegalTrademarks=;OriginalFilename=DCLSHLCTRLS150.BPL;ProductName=Delphi;ProductVersion=14.0;Comments= 40 | 3513 41 | Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;WinApi;$(DCC_Namespace) 42 | 1033 43 | 15 44 | 00400000 45 | true 46 | false 47 | Shell Control Property and Component Editors 48 | true 49 | true 50 | true 51 | 250 52 | dclshlctrls 53 | ..\..\Lib\Delphi10_2\$(Platform)\$(Config) 54 | 55 | 56 | 7.0 57 | 0 58 | False 59 | True 60 | 0 61 | RELEASE;$(DCC_Define) 62 | 63 | 64 | 7.0 65 | False 66 | DEBUG;$(DCC_Define) 67 | 68 | 69 | 70 | MainSource 71 | 72 | 73 | 74 | 75 | 76 |
RootPathEditDlg
77 | 78 | 79 | 80 | Base 81 | 82 | 83 | Cfg_1 84 | Base 85 | 86 | 87 | Cfg_2 88 | Base 89 | 90 | 91 | 92 | 93 | 94 | Delphi.Personality.12 95 | Package 96 | 97 | 98 | 99 | False 100 | 101 | 102 | 103 | 104 | True 105 | False 106 | 15 107 | 0 108 | 3513 109 | 24210 110 | False 111 | False 112 | False 113 | False 114 | True 115 | 1033 116 | 1252 117 | 118 | 119 | Embarcadero Technologies, Inc. 120 | CodeGear Win32 Shell Controls 121 | 15.0.3513.24210 122 | DCLSHLCTRLS150 123 | Copyright © 2000-2002 Embarcadero Technologies, Inc. 124 | 125 | DCLSHLCTRLS150.BPL 126 | Delphi 127 | 14.0 128 | 129 | 130 | 131 | dclshlctrls.dpk 132 | 133 | 134 | 135 | 136 | True 137 | False 138 | 139 | 140 | 12 141 | 142 | 143 | -------------------------------------------------------------------------------- /Packages/D10_3/dclshlctrls.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {D9295B37-7F7E-4728-8B30-01F10D1D16CA} 4 | dclshlctrls.dpk 5 | Debug 6 | DCC32 7 | 18.8 8 | Release 9 | True 10 | Package 11 | VCL 12 | Win32 13 | 1 14 | 15 | 16 | true 17 | 18 | 19 | true 20 | Base 21 | true 22 | 23 | 24 | true 25 | Base 26 | true 27 | 28 | 29 | true 30 | Base 31 | true 32 | 33 | 34 | false 35 | false 36 | 24210 37 | true 38 | true 39 | CompanyName=Embarcadero Technologies, Inc.;FileDescription=CodeGear Win32 Shell Controls;FileVersion=15.0.3513.24210;InternalName=DCLSHLCTRLS150;LegalCopyright=Copyright © 2000-2002 Embarcadero Technologies, Inc.;LegalTrademarks=;OriginalFilename=DCLSHLCTRLS150.BPL;ProductName=Delphi;ProductVersion=14.0;Comments= 40 | 3513 41 | Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;WinApi;$(DCC_Namespace) 42 | 1033 43 | 15 44 | 00400000 45 | true 46 | false 47 | Shell Control Property and Component Editors 48 | true 49 | true 50 | true 51 | 260 52 | dclshlctrls 53 | ..\..\Lib\Delphi10_3\$(Platform)\$(Config) 54 | 55 | 56 | 7.0 57 | 0 58 | False 59 | True 60 | 0 61 | RELEASE;$(DCC_Define) 62 | 63 | 64 | 7.0 65 | False 66 | DEBUG;$(DCC_Define) 67 | 68 | 69 | 70 | MainSource 71 | 72 | 73 | 74 | 75 | 76 |
RootPathEditDlg
77 | 78 | 79 | 80 | Base 81 | 82 | 83 | Cfg_1 84 | Base 85 | 86 | 87 | Cfg_2 88 | Base 89 | 90 | 91 | 92 | 93 | 94 | Delphi.Personality.12 95 | Package 96 | 97 | 98 | 99 | False 100 | 101 | 102 | 103 | 104 | True 105 | False 106 | 15 107 | 0 108 | 3513 109 | 24210 110 | False 111 | False 112 | False 113 | False 114 | True 115 | 1033 116 | 1252 117 | 118 | 119 | Embarcadero Technologies, Inc. 120 | CodeGear Win32 Shell Controls 121 | 15.0.3513.24210 122 | DCLSHLCTRLS150 123 | Copyright © 2000-2002 Embarcadero Technologies, Inc. 124 | 125 | DCLSHLCTRLS150.BPL 126 | Delphi 127 | 14.0 128 | 129 | 130 | 131 | dclshlctrls.dpk 132 | 133 | 134 | 135 | 136 | True 137 | False 138 | 139 | 140 | 12 141 | 142 | 143 | -------------------------------------------------------------------------------- /Packages/D10_4/dclshlctrls.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {7B285BD0-9ED4-4460-B7A1-9F2CF5BB54C6} 4 | dclshlctrls.dpk 5 | Debug 6 | DCC32 7 | 19.2 8 | Release 9 | True 10 | Package 11 | VCL 12 | Win32 13 | 1 14 | 15 | 16 | true 17 | 18 | 19 | true 20 | Base 21 | true 22 | 23 | 24 | true 25 | Base 26 | true 27 | 28 | 29 | true 30 | Base 31 | true 32 | 33 | 34 | false 35 | false 36 | 24210 37 | true 38 | true 39 | CompanyName=Embarcadero Technologies, Inc.;FileDescription=CodeGear Win32 Shell Controls;FileVersion=15.0.3513.24210;InternalName=DCLSHLCTRLS150;LegalCopyright=Copyright © 2000-2002 Embarcadero Technologies, Inc.;LegalTrademarks=;OriginalFilename=DCLSHLCTRLS150.BPL;ProductName=Delphi;ProductVersion=14.0;Comments= 40 | 3513 41 | Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;WinApi;$(DCC_Namespace) 42 | 1033 43 | 15 44 | 00400000 45 | true 46 | false 47 | Shell Control Property and Component Editors 48 | true 49 | true 50 | true 51 | $(Auto) 52 | dclshlctrls 53 | ..\..\Lib\Delphi10_4\$(Platform)\$(Config) 54 | 55 | 56 | 7.0 57 | 0 58 | False 59 | True 60 | 0 61 | RELEASE;$(DCC_Define) 62 | 63 | 64 | 7.0 65 | False 66 | DEBUG;$(DCC_Define) 67 | 68 | 69 | 70 | MainSource 71 | 72 | 73 | 74 | 75 | 76 |
RootPathEditDlg
77 | 78 | 79 | 80 | Base 81 | 82 | 83 | Cfg_1 84 | Base 85 | 86 | 87 | Cfg_2 88 | Base 89 | 90 | 91 | 92 | 93 | 94 | Delphi.Personality.12 95 | Package 96 | 97 | 98 | 99 | False 100 | 101 | 102 | 103 | 104 | True 105 | False 106 | 15 107 | 0 108 | 3513 109 | 24210 110 | False 111 | False 112 | False 113 | False 114 | True 115 | 1033 116 | 1252 117 | 118 | 119 | Embarcadero Technologies, Inc. 120 | CodeGear Win32 Shell Controls 121 | 15.0.3513.24210 122 | DCLSHLCTRLS150 123 | Copyright © 2000-2002 Embarcadero Technologies, Inc. 124 | 125 | DCLSHLCTRLS150.BPL 126 | Delphi 127 | 14.0 128 | 129 | 130 | 131 | dclshlctrls.dpk 132 | 133 | 134 | 135 | 136 | True 137 | False 138 | 139 | 140 | 12 141 | 142 | 143 | -------------------------------------------------------------------------------- /Packages/D10_1/vclshlctrls.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {3C8A5836-BD08-45C6-BB0D-F346FF72F537} 4 | vclshlctrls.dpk 5 | Debug 6 | DCC32 7 | 18.2 8 | Release 9 | True 10 | Package 11 | VCL 12 | Win32 13 | 3 14 | 15 | 16 | true 17 | 18 | 19 | true 20 | Base 21 | true 22 | 23 | 24 | true 25 | Base 26 | true 27 | 28 | 29 | true 30 | Base 31 | true 32 | 33 | 34 | true 35 | Base 36 | true 37 | 38 | 39 | false 40 | false 41 | 24210 42 | true 43 | true 44 | CompanyName=Embarcadero Technologies, Inc.;FileDescription=Shell Controls;FileVersion=15.0.3513.24210;InternalName=VCLSHLCTRLS150;LegalCopyright=Copyright © 2000-2002 Embarcadero Technologies, Inc.;LegalTrademarks=;OriginalFilename=VCLSHLCTRLS150.BPL;ProductName=Delphi;ProductVersion=15.0;Comments= 45 | 3513 46 | Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace) 47 | 1033 48 | 15 49 | 00400000 50 | true 51 | false 52 | VCL Shell Controls 53 | true 54 | true 55 | true 56 | 240 57 | vclshlctrls 58 | ..\..\Lib\Delphi10_1\$(Platform)\$(Config) 59 | 60 | 61 | 7.0 62 | 0 63 | False 64 | True 65 | 0 66 | RELEASE;$(DCC_Define) 67 | 68 | 69 | 7.0 70 | False 71 | DEBUG;$(DCC_Define) 72 | 73 | 74 | 75 | MainSource 76 | 77 | 78 | 79 | 80 | 81 | 82 | Base 83 | 84 | 85 | Cfg_1 86 | Base 87 | 88 | 89 | Cfg_2 90 | Base 91 | 92 | 93 | 94 | 95 | 96 | Delphi.Personality.12 97 | Package 98 | 99 | 100 | 101 | False 102 | 103 | 104 | 105 | 106 | True 107 | False 108 | 15 109 | 0 110 | 3513 111 | 24210 112 | False 113 | False 114 | False 115 | False 116 | True 117 | 1033 118 | 1252 119 | 120 | 121 | Embarcadero Technologies, Inc. 122 | CodeGear Win32 Shell Controls 123 | 15.0.3513.24210 124 | VCLSHLCTRLS150 125 | Copyright © 2000-2002 Embarcadero Technologies, Inc. 126 | 127 | VCLSHLCTRLS150.BPL 128 | Delphi 129 | 15.0 130 | 131 | 132 | 133 | vclshlctrls.dpk 134 | 135 | 136 | 137 | 138 | True 139 | True 140 | 141 | 142 | 12 143 | 144 | 145 | -------------------------------------------------------------------------------- /Packages/D10_2/vclshlctrls.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {44F5C696-E280-45CD-A366-EB15B6926A32} 4 | vclshlctrls.dpk 5 | Debug 6 | DCC32 7 | 18.4 8 | Release 9 | True 10 | Package 11 | VCL 12 | Win32 13 | 3 14 | 15 | 16 | true 17 | 18 | 19 | true 20 | Base 21 | true 22 | 23 | 24 | true 25 | Base 26 | true 27 | 28 | 29 | true 30 | Base 31 | true 32 | 33 | 34 | true 35 | Base 36 | true 37 | 38 | 39 | false 40 | false 41 | 24210 42 | true 43 | true 44 | CompanyName=Embarcadero Technologies, Inc.;FileDescription=Shell Controls;FileVersion=15.0.3513.24210;InternalName=VCLSHLCTRLS150;LegalCopyright=Copyright © 2000-2002 Embarcadero Technologies, Inc.;LegalTrademarks=;OriginalFilename=VCLSHLCTRLS150.BPL;ProductName=Delphi;ProductVersion=15.0;Comments= 45 | 3513 46 | Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace) 47 | 1033 48 | 15 49 | 00400000 50 | true 51 | false 52 | VCL Shell Controls 53 | true 54 | true 55 | true 56 | 250 57 | vclshlctrls 58 | ..\..\Lib\Delphi10_2\$(Platform)\$(Config) 59 | 60 | 61 | 7.0 62 | 0 63 | False 64 | True 65 | 0 66 | RELEASE;$(DCC_Define) 67 | 68 | 69 | 7.0 70 | False 71 | DEBUG;$(DCC_Define) 72 | 73 | 74 | 75 | MainSource 76 | 77 | 78 | 79 | 80 | 81 | 82 | Base 83 | 84 | 85 | Cfg_1 86 | Base 87 | 88 | 89 | Cfg_2 90 | Base 91 | 92 | 93 | 94 | 95 | 96 | Delphi.Personality.12 97 | Package 98 | 99 | 100 | 101 | False 102 | 103 | 104 | 105 | 106 | True 107 | False 108 | 15 109 | 0 110 | 3513 111 | 24210 112 | False 113 | False 114 | False 115 | False 116 | True 117 | 1033 118 | 1252 119 | 120 | 121 | Embarcadero Technologies, Inc. 122 | CodeGear Win32 Shell Controls 123 | 15.0.3513.24210 124 | VCLSHLCTRLS150 125 | Copyright © 2000-2002 Embarcadero Technologies, Inc. 126 | 127 | VCLSHLCTRLS150.BPL 128 | Delphi 129 | 15.0 130 | 131 | 132 | 133 | vclshlctrls.dpk 134 | 135 | 136 | 137 | 138 | True 139 | True 140 | 141 | 142 | 12 143 | 144 | 145 | -------------------------------------------------------------------------------- /Packages/D10_3/vclshlctrls.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {79784384-51C0-4876-AE09-86CB2C73DE24} 4 | vclshlctrls.dpk 5 | Debug 6 | DCC32 7 | 18.8 8 | Release 9 | True 10 | Package 11 | VCL 12 | Win32 13 | 3 14 | 15 | 16 | true 17 | 18 | 19 | true 20 | Base 21 | true 22 | 23 | 24 | true 25 | Base 26 | true 27 | 28 | 29 | true 30 | Base 31 | true 32 | 33 | 34 | true 35 | Base 36 | true 37 | 38 | 39 | false 40 | false 41 | 24210 42 | true 43 | true 44 | CompanyName=Embarcadero Technologies, Inc.;FileDescription=Shell Controls;FileVersion=15.0.3513.24210;InternalName=VCLSHLCTRLS150;LegalCopyright=Copyright © 2000-2002 Embarcadero Technologies, Inc.;LegalTrademarks=;OriginalFilename=VCLSHLCTRLS150.BPL;ProductName=Delphi;ProductVersion=15.0;Comments= 45 | 3513 46 | Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace) 47 | 1033 48 | 15 49 | 00400000 50 | true 51 | false 52 | VCL Shell Controls 53 | true 54 | true 55 | true 56 | 260 57 | vclshlctrls 58 | ..\..\Lib\Delphi10_3\$(Platform)\$(Config) 59 | 60 | 61 | 7.0 62 | 0 63 | False 64 | True 65 | 0 66 | RELEASE;$(DCC_Define) 67 | 68 | 69 | 7.0 70 | False 71 | DEBUG;$(DCC_Define) 72 | 73 | 74 | 75 | MainSource 76 | 77 | 78 | 79 | 80 | 81 | 82 | Base 83 | 84 | 85 | Cfg_1 86 | Base 87 | 88 | 89 | Cfg_2 90 | Base 91 | 92 | 93 | 94 | 95 | 96 | Delphi.Personality.12 97 | Package 98 | 99 | 100 | 101 | False 102 | 103 | 104 | 105 | 106 | True 107 | False 108 | 15 109 | 0 110 | 3513 111 | 24210 112 | False 113 | False 114 | False 115 | False 116 | True 117 | 1033 118 | 1252 119 | 120 | 121 | Embarcadero Technologies, Inc. 122 | CodeGear Win32 Shell Controls 123 | 15.0.3513.24210 124 | VCLSHLCTRLS150 125 | Copyright © 2000-2002 Embarcadero Technologies, Inc. 126 | 127 | VCLSHLCTRLS150.BPL 128 | Delphi 129 | 15.0 130 | 131 | 132 | 133 | vclshlctrls.dpk 134 | 135 | 136 | 137 | 138 | True 139 | True 140 | 141 | 142 | 12 143 | 144 | 145 | -------------------------------------------------------------------------------- /Packages/D10_4/vclshlctrls.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {22E18A78-118C-4AC9-B373-B640E1D13043} 4 | vclshlctrls.dpk 5 | Debug 6 | DCC32 7 | 19.2 8 | Release 9 | True 10 | Package 11 | VCL 12 | Win32 13 | 3 14 | 15 | 16 | true 17 | 18 | 19 | true 20 | Base 21 | true 22 | 23 | 24 | true 25 | Base 26 | true 27 | 28 | 29 | true 30 | Base 31 | true 32 | 33 | 34 | true 35 | Base 36 | true 37 | 38 | 39 | false 40 | false 41 | 24210 42 | true 43 | true 44 | CompanyName=Embarcadero Technologies, Inc.;FileDescription=Shell Controls;FileVersion=15.0.3513.24210;InternalName=VCLSHLCTRLS150;LegalCopyright=Copyright © 2000-2002 Embarcadero Technologies, Inc.;LegalTrademarks=;OriginalFilename=VCLSHLCTRLS150.BPL;ProductName=Delphi;ProductVersion=15.0;Comments= 45 | 3513 46 | Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace) 47 | 1033 48 | 15 49 | 00400000 50 | true 51 | false 52 | VCL Shell Controls 53 | true 54 | true 55 | true 56 | $(Auto) 57 | vclshlctrls 58 | ..\..\Lib\Delphi10_4\$(Platform)\$(Config) 59 | 60 | 61 | 7.0 62 | 0 63 | False 64 | True 65 | 0 66 | RELEASE;$(DCC_Define) 67 | 68 | 69 | 7.0 70 | False 71 | DEBUG;$(DCC_Define) 72 | 73 | 74 | 75 | MainSource 76 | 77 | 78 | 79 | 80 | 81 | 82 | Base 83 | 84 | 85 | Cfg_1 86 | Base 87 | 88 | 89 | Cfg_2 90 | Base 91 | 92 | 93 | 94 | 95 | 96 | Delphi.Personality.12 97 | Package 98 | 99 | 100 | 101 | False 102 | 103 | 104 | 105 | 106 | True 107 | False 108 | 15 109 | 0 110 | 3513 111 | 24210 112 | False 113 | False 114 | False 115 | False 116 | True 117 | 1033 118 | 1252 119 | 120 | 121 | Embarcadero Technologies, Inc. 122 | CodeGear Win32 Shell Controls 123 | 15.0.3513.24210 124 | VCLSHLCTRLS150 125 | Copyright © 2000-2002 Embarcadero Technologies, Inc. 126 | 127 | VCLSHLCTRLS150.BPL 128 | Delphi 129 | 15.0 130 | 131 | 132 | 133 | vclshlctrls.dpk 134 | 135 | 136 | 137 | 138 | True 139 | True 140 | 141 | 142 | 12 143 | 144 | 145 | -------------------------------------------------------------------------------- /Packages/D11/dclshlctrls.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {5C0DFBB8-7485-4B9D-B005-ED0C53FD8731} 4 | dclshlctrls.dpk 5 | Debug 6 | DCC32 7 | 19.5 8 | Release 9 | True 10 | Package 11 | VCL 12 | Win32 13 | 1 14 | 15 | 16 | true 17 | 18 | 19 | true 20 | Base 21 | true 22 | 23 | 24 | true 25 | Base 26 | true 27 | 28 | 29 | true 30 | Base 31 | true 32 | 33 | 34 | false 35 | false 36 | 24210 37 | true 38 | true 39 | CompanyName=Embarcadero Technologies, Inc.;FileDescription=CodeGear Win32 Shell Controls;FileVersion=15.0.3513.24210;InternalName=DCLSHLCTRLS150;LegalCopyright=Copyright © 2000-2002 Embarcadero Technologies, Inc.;LegalTrademarks=;OriginalFilename=DCLSHLCTRLS150.BPL;ProductName=Delphi;ProductVersion=14.0;Comments= 40 | 3513 41 | Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;WinApi;$(DCC_Namespace) 42 | 1033 43 | 15 44 | 00400000 45 | true 46 | false 47 | Shell Control Property and Component Editors 48 | true 49 | true 50 | true 51 | $(Auto) 52 | dclshlctrls 53 | ..\..\Lib\Delphi11\$(Platform)\$(Config) 54 | 55 | 56 | 7.0 57 | 0 58 | False 59 | True 60 | 0 61 | RELEASE;$(DCC_Define) 62 | 63 | 64 | 7.0 65 | False 66 | DEBUG;$(DCC_Define) 67 | 68 | 69 | 70 | MainSource 71 | 72 | 73 | 74 | 75 | 76 |
RootPathEditDlg
77 | 78 | 79 | 80 | Base 81 | 82 | 83 | Cfg_1 84 | Base 85 | 86 | 87 | Cfg_2 88 | Base 89 | 90 | 91 | 92 | 93 | 94 | Delphi.Personality.12 95 | Package 96 | 97 | 98 | 99 | False 100 | 101 | 102 | 103 | 104 | True 105 | False 106 | 15 107 | 0 108 | 3513 109 | 24210 110 | False 111 | False 112 | False 113 | False 114 | True 115 | 1033 116 | 1252 117 | 118 | 119 | Embarcadero Technologies, Inc. 120 | CodeGear Win32 Shell Controls 121 | 15.0.3513.24210 122 | DCLSHLCTRLS150 123 | Copyright © 2000-2002 Embarcadero Technologies, Inc. 124 | 125 | DCLSHLCTRLS150.BPL 126 | Delphi 127 | 14.0 128 | 129 | 130 | 131 | dclshlctrls.dpk 132 | 133 | 134 | 135 | 136 | 137 | 138 | True 139 | False 140 | 141 | 142 | 12 143 | 144 | 145 | -------------------------------------------------------------------------------- /Packages/D11/vclshlctrls.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {B7B9F3DB-34EA-4EE8-8A34-D7F746257CD7} 4 | vclshlctrls.dpk 5 | Debug 6 | DCC32 7 | 19.5 8 | Release 9 | True 10 | Package 11 | VCL 12 | Win32 13 | 3 14 | 15 | 16 | true 17 | 18 | 19 | true 20 | Base 21 | true 22 | 23 | 24 | true 25 | Base 26 | true 27 | 28 | 29 | true 30 | Base 31 | true 32 | 33 | 34 | true 35 | Base 36 | true 37 | 38 | 39 | false 40 | false 41 | 24210 42 | true 43 | true 44 | CompanyName=Embarcadero Technologies, Inc.;FileDescription=Shell Controls;FileVersion=15.0.3513.24210;InternalName=VCLSHLCTRLS150;LegalCopyright=Copyright © 2000-2002 Embarcadero Technologies, Inc.;LegalTrademarks=;OriginalFilename=VCLSHLCTRLS150.BPL;ProductName=Delphi;ProductVersion=15.0;Comments= 45 | 3513 46 | Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace) 47 | 1033 48 | 15 49 | 00400000 50 | true 51 | false 52 | VCL Shell Controls 53 | true 54 | true 55 | true 56 | $(Auto) 57 | vclshlctrls 58 | ..\..\Lib\Delphi11\$(Platform)\$(Config) 59 | 60 | 61 | 7.0 62 | 0 63 | False 64 | True 65 | 0 66 | RELEASE;$(DCC_Define) 67 | 68 | 69 | 7.0 70 | False 71 | DEBUG;$(DCC_Define) 72 | 73 | 74 | 75 | MainSource 76 | 77 | 78 | 79 | 80 | 81 | 82 | Base 83 | 84 | 85 | Cfg_1 86 | Base 87 | 88 | 89 | Cfg_2 90 | Base 91 | 92 | 93 | 94 | 95 | 96 | Delphi.Personality.12 97 | Package 98 | 99 | 100 | 101 | False 102 | 103 | 104 | 105 | 106 | True 107 | False 108 | 15 109 | 0 110 | 3513 111 | 24210 112 | False 113 | False 114 | False 115 | False 116 | True 117 | 1033 118 | 1252 119 | 120 | 121 | Embarcadero Technologies, Inc. 122 | CodeGear Win32 Shell Controls 123 | 15.0.3513.24210 124 | VCLSHLCTRLS150 125 | Copyright © 2000-2002 Embarcadero Technologies, Inc. 126 | 127 | VCLSHLCTRLS150.BPL 128 | Delphi 129 | 15.0 130 | 131 | 132 | 133 | vclshlctrls.dpk 134 | 135 | 136 | 137 | 138 | 139 | 140 | True 141 | True 142 | 143 | 144 | 12 145 | 146 | 147 | -------------------------------------------------------------------------------- /Packages/XE6/dclshlctrls.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {11cfb78a-4261-4ca7-a4ab-13c000546b24} 4 | dclshlctrls.dpk 5 | Debug 6 | DCC32 7 | 19.5 8 | Release 9 | True 10 | Package 11 | VCL 12 | Win32 13 | 1 14 | 15 | 16 | true 17 | 18 | 19 | true 20 | Base 21 | true 22 | 23 | 24 | true 25 | Base 26 | true 27 | 28 | 29 | true 30 | Base 31 | true 32 | 33 | 34 | false 35 | false 36 | 24210 37 | true 38 | true 39 | CompanyName=Embarcadero Technologies, Inc.;FileDescription=CodeGear Win32 Shell Controls;FileVersion=15.0.3513.24210;InternalName=DCLSHLCTRLS150;LegalCopyright=Copyright © 2000-2002 Embarcadero Technologies, Inc.;LegalTrademarks=;OriginalFilename=DCLSHLCTRLS150.BPL;ProductName=Delphi;ProductVersion=14.0;Comments= 40 | 3513 41 | Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace) 42 | 1033 43 | 15 44 | 00400000 45 | true 46 | false 47 | Shell Control Property and Component Editors 48 | true 49 | true 50 | true 51 | 200 52 | dclshlctrls 53 | ..\..\Lib\$(Platform)\$(Config) 54 | ..\..\Source;$(DCC_UnitSearchPath) 55 | 56 | 57 | Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) 58 | vcl;rtl;vclactnband;vclx;vclshlctrls;$(DCC_UsePackage) 59 | 60 | 61 | 7.0 62 | 0 63 | False 64 | False 65 | 0 66 | RELEASE;$(DCC_Define) 67 | 68 | 69 | 7.0 70 | False 71 | DEBUG;$(DCC_Define) 72 | 73 | 74 | 75 | MainSource 76 | 77 | 78 | 79 | 80 | 81 | 82 | 83 | 84 |
RootPathEditDlg
85 | 86 | 87 | 88 | Cfg_2 89 | Base 90 | 91 | 92 | Base 93 | 94 | 95 | Cfg_1 96 | Base 97 | 98 | 99 | 100 | 101 | 102 | Delphi.Personality.12 103 | Package 104 | 105 | 106 | 107 | False 108 | 109 | 110 | 111 | 112 | True 113 | False 114 | 15 115 | 0 116 | 3513 117 | 24210 118 | False 119 | False 120 | False 121 | False 122 | True 123 | 1033 124 | 1252 125 | 126 | 127 | Embarcadero Technologies, Inc. 128 | CodeGear Win32 Shell Controls 129 | 15.0.3513.24210 130 | DCLSHLCTRLS150 131 | Copyright © 2000-2002 Embarcadero Technologies, Inc. 132 | 133 | DCLSHLCTRLS150.BPL 134 | Delphi 135 | 14.0 136 | 137 | 138 | 139 | dclshlctrls.dpk 140 | 141 | 142 | 143 | 144 | True 145 | False 146 | 147 | 148 | 12 149 | 150 | 151 | -------------------------------------------------------------------------------- /Packages/D12/vclshlctrls.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {85D3FFF0-BE2A-4310-98C4-5487097E41B2} 4 | vclshlctrls.dpk 5 | Debug 6 | DCC32 7 | 20.2 8 | Release 9 | True 10 | Package 11 | VCL 12 | Win32 13 | 3 14 | vclshlctrls 15 | 16 | 17 | true 18 | 19 | 20 | true 21 | Base 22 | true 23 | 24 | 25 | true 26 | Base 27 | true 28 | 29 | 30 | true 31 | Base 32 | true 33 | 34 | 35 | true 36 | Base 37 | true 38 | 39 | 40 | true 41 | Base 42 | true 43 | 44 | 45 | false 46 | false 47 | 24210 48 | true 49 | true 50 | CompanyName=Embarcadero Technologies, Inc.;FileDescription=Shell Controls;FileVersion=15.0.3513.24210;InternalName=VCLSHLCTRLS150;LegalCopyright=Copyright © 2000-2002 Embarcadero Technologies, Inc.;LegalTrademarks=;OriginalFilename=VCLSHLCTRLS150.BPL;ProductName=Delphi;ProductVersion=15.0;Comments= 51 | 3513 52 | Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace) 53 | 1033 54 | 15 55 | 00400000 56 | true 57 | false 58 | VCL Shell Controls 59 | true 60 | true 61 | true 62 | $(Auto) 63 | vclshlctrls 64 | ..\..\Lib\Delphi12\$(Platform)\$(Config) 65 | 66 | 67 | 7.0 68 | 0 69 | False 70 | True 71 | 0 72 | RELEASE;$(DCC_Define) 73 | 74 | 75 | 7.0 76 | False 77 | DEBUG;$(DCC_Define) 78 | 79 | 80 | 81 | MainSource 82 | 83 | 84 | 85 | 86 | 87 | 88 | Base 89 | 90 | 91 | Cfg_1 92 | Base 93 | 94 | 95 | Cfg_2 96 | Base 97 | 98 | 99 | 100 | 101 | 102 | Delphi.Personality.12 103 | Package 104 | 105 | 106 | 107 | False 108 | 109 | 110 | 111 | 112 | True 113 | False 114 | 15 115 | 0 116 | 3513 117 | 24210 118 | False 119 | False 120 | False 121 | False 122 | True 123 | 1033 124 | 1252 125 | 126 | 127 | Embarcadero Technologies, Inc. 128 | CodeGear Win32 Shell Controls 129 | 15.0.3513.24210 130 | VCLSHLCTRLS150 131 | Copyright © 2000-2002 Embarcadero Technologies, Inc. 132 | 133 | VCLSHLCTRLS150.BPL 134 | Delphi 135 | 15.0 136 | 137 | 138 | 139 | vclshlctrls.dpk 140 | 141 | 142 | 143 | 144 | 145 | 146 | True 147 | True 148 | False 149 | 150 | 151 | 12 152 | 153 | 154 | -------------------------------------------------------------------------------- /Packages/D13/vclshlctrls.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {C794160B-CB0D-4255-9782-0746D09B30B0} 4 | vclshlctrls.dpk 5 | Debug 6 | DCC32 7 | 20.3 8 | Release 9 | True 10 | Package 11 | VCL 12 | Win32 13 | 3 14 | vclshlctrls 15 | 16 | 17 | true 18 | 19 | 20 | true 21 | Base 22 | true 23 | 24 | 25 | true 26 | Base 27 | true 28 | 29 | 30 | true 31 | Base 32 | true 33 | 34 | 35 | true 36 | Base 37 | true 38 | 39 | 40 | true 41 | Base 42 | true 43 | 44 | 45 | false 46 | false 47 | 24210 48 | true 49 | true 50 | CompanyName=Embarcadero Technologies, Inc.;FileDescription=Shell Controls;FileVersion=15.0.3513.24210;InternalName=VCLSHLCTRLS150;LegalCopyright=Copyright © 2000-2002 Embarcadero Technologies, Inc.;LegalTrademarks=;OriginalFilename=VCLSHLCTRLS150.BPL;ProductName=Delphi;ProductVersion=15.0;Comments= 51 | 3513 52 | Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace) 53 | 1033 54 | 15 55 | 00400000 56 | true 57 | false 58 | VCL Shell Controls 59 | true 60 | true 61 | true 62 | $(Auto) 63 | vclshlctrls 64 | ..\..\Lib\Delphi13\$(Platform)\$(Config) 65 | 66 | 67 | 7.0 68 | 0 69 | False 70 | True 71 | 0 72 | RELEASE;$(DCC_Define) 73 | 74 | 75 | 7.0 76 | False 77 | DEBUG;$(DCC_Define) 78 | 79 | 80 | 81 | MainSource 82 | 83 | 84 | 85 | 86 | 87 | 88 | Base 89 | 90 | 91 | Cfg_1 92 | Base 93 | 94 | 95 | Cfg_2 96 | Base 97 | 98 | 99 | 100 | 101 | 102 | Delphi.Personality.12 103 | Package 104 | 105 | 106 | 107 | False 108 | 109 | 110 | 111 | 112 | True 113 | False 114 | 15 115 | 0 116 | 3513 117 | 24210 118 | False 119 | False 120 | False 121 | False 122 | True 123 | 1033 124 | 1252 125 | 126 | 127 | Embarcadero Technologies, Inc. 128 | CodeGear Win32 Shell Controls 129 | 15.0.3513.24210 130 | VCLSHLCTRLS150 131 | Copyright © 2000-2002 Embarcadero Technologies, Inc. 132 | 133 | VCLSHLCTRLS150.BPL 134 | Delphi 135 | 15.0 136 | 137 | 138 | 139 | vclshlctrls.dpk 140 | 141 | 142 | 143 | 144 | 145 | 146 | True 147 | True 148 | False 149 | 150 | 151 | 12 152 | 153 | 154 | -------------------------------------------------------------------------------- /Packages/D12/dclshlctrls.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {07947681-D75B-4BDA-A72E-D52235BFAFCD} 4 | dclshlctrls.dpk 5 | Debug 6 | DCC32 7 | 20.2 8 | Release 9 | True 10 | Package 11 | VCL 12 | Win32 13 | 3 14 | dclshlctrls 15 | 16 | 17 | true 18 | 19 | 20 | true 21 | Base 22 | true 23 | 24 | 25 | true 26 | Base 27 | true 28 | 29 | 30 | true 31 | Base 32 | true 33 | 34 | 35 | true 36 | Base 37 | true 38 | 39 | 40 | true 41 | Base 42 | true 43 | 44 | 45 | false 46 | false 47 | 24210 48 | true 49 | true 50 | CompanyName=Embarcadero Technologies, Inc.;FileDescription=CodeGear Win32 Shell Controls;FileVersion=15.0.3513.24210;InternalName=DCLSHLCTRLS150;LegalCopyright=Copyright © 2000-2002 Embarcadero Technologies, Inc.;LegalTrademarks=;OriginalFilename=DCLSHLCTRLS150.BPL;ProductName=Delphi;ProductVersion=14.0;Comments= 51 | 3513 52 | Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;WinApi;$(DCC_Namespace) 53 | 1033 54 | 15 55 | 00400000 56 | true 57 | false 58 | Shell Control Property and Component Editors 59 | true 60 | true 61 | true 62 | $(Auto) 63 | dclshlctrls 64 | ..\..\Lib\Delphi12\$(Platform)\$(Config) 65 | 66 | 67 | 7.0 68 | 0 69 | False 70 | True 71 | 0 72 | RELEASE;$(DCC_Define) 73 | 74 | 75 | 7.0 76 | False 77 | DEBUG;$(DCC_Define) 78 | 79 | 80 | 81 | MainSource 82 | 83 | 84 | 85 | 86 | 87 |
RootPathEditDlg
88 | 89 | 90 | 91 | Base 92 | 93 | 94 | Cfg_1 95 | Base 96 | 97 | 98 | Cfg_2 99 | Base 100 | 101 | 102 | 103 | 104 | 105 | Delphi.Personality.12 106 | Package 107 | 108 | 109 | 110 | False 111 | 112 | 113 | 114 | 115 | True 116 | False 117 | 15 118 | 0 119 | 3513 120 | 24210 121 | False 122 | False 123 | False 124 | False 125 | True 126 | 1033 127 | 1252 128 | 129 | 130 | Embarcadero Technologies, Inc. 131 | CodeGear Win32 Shell Controls 132 | 15.0.3513.24210 133 | DCLSHLCTRLS150 134 | Copyright © 2000-2002 Embarcadero Technologies, Inc. 135 | 136 | DCLSHLCTRLS150.BPL 137 | Delphi 138 | 14.0 139 | 140 | 141 | 142 | dclshlctrls.dpk 143 | 144 | 145 | 146 | 147 | 148 | 149 | True 150 | True 151 | False 152 | 153 | 154 | 12 155 | 156 | 157 | -------------------------------------------------------------------------------- /Packages/D13/dclshlctrls.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {096AAED8-701D-4CD5-AE9F-7E87BFFB2D21} 4 | dclshlctrls.dpk 5 | Debug 6 | DCC32 7 | 20.3 8 | Release 9 | True 10 | Package 11 | VCL 12 | Win32 13 | 3 14 | dclshlctrls 15 | 16 | 17 | true 18 | 19 | 20 | true 21 | Base 22 | true 23 | 24 | 25 | true 26 | Base 27 | true 28 | 29 | 30 | true 31 | Base 32 | true 33 | 34 | 35 | true 36 | Base 37 | true 38 | 39 | 40 | true 41 | Base 42 | true 43 | 44 | 45 | false 46 | false 47 | 24210 48 | true 49 | true 50 | CompanyName=Embarcadero Technologies, Inc.;FileDescription=CodeGear Win32 Shell Controls;FileVersion=15.0.3513.24210;InternalName=DCLSHLCTRLS150;LegalCopyright=Copyright © 2000-2002 Embarcadero Technologies, Inc.;LegalTrademarks=;OriginalFilename=DCLSHLCTRLS150.BPL;ProductName=Delphi;ProductVersion=14.0;Comments= 51 | 3513 52 | Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;WinApi;$(DCC_Namespace) 53 | 1033 54 | 15 55 | 00400000 56 | true 57 | false 58 | Shell Control Property and Component Editors 59 | true 60 | true 61 | true 62 | $(Auto) 63 | dclshlctrls 64 | ..\..\Lib\Delphi13\$(Platform)\$(Config) 65 | 66 | 67 | 7.0 68 | 0 69 | False 70 | True 71 | 0 72 | RELEASE;$(DCC_Define) 73 | 74 | 75 | 7.0 76 | False 77 | DEBUG;$(DCC_Define) 78 | 79 | 80 | 81 | MainSource 82 | 83 | 84 | 85 | 86 | 87 |
RootPathEditDlg
88 | 89 | 90 | 91 | Base 92 | 93 | 94 | Cfg_1 95 | Base 96 | 97 | 98 | Cfg_2 99 | Base 100 | 101 | 102 | 103 | 104 | 105 | Delphi.Personality.12 106 | Package 107 | 108 | 109 | 110 | False 111 | 112 | 113 | 114 | 115 | True 116 | False 117 | 15 118 | 0 119 | 3513 120 | 24210 121 | False 122 | False 123 | False 124 | False 125 | True 126 | 1033 127 | 1252 128 | 129 | 130 | Embarcadero Technologies, Inc. 131 | CodeGear Win32 Shell Controls 132 | 15.0.3513.24210 133 | DCLSHLCTRLS150 134 | Copyright © 2000-2002 Embarcadero Technologies, Inc. 135 | 136 | DCLSHLCTRLS150.BPL 137 | Delphi 138 | 14.0 139 | 140 | 141 | 142 | dclshlctrls.dpk 143 | 144 | 145 | 146 | 147 | 148 | 149 | True 150 | True 151 | False 152 | 153 | 154 | 12 155 | 156 | 157 | -------------------------------------------------------------------------------- /Packages/XE8/dclshlctrls.dproj: -------------------------------------------------------------------------------- 1 | 2 | 3 | {11cfb78a-4261-4ca7-a4ab-13c000546b24} 4 | dclshlctrls.dpk 5 | Debug 6 | DCC32 7 | 19.5 8 | Release 9 | True 10 | Package 11 | VCL 12 | Win32 13 | 1 14 | 15 | 16 | true 17 | 18 | 19 | true 20 | Base 21 | true 22 | 23 | 24 | true 25 | Base 26 | true 27 | 28 | 29 | true 30 | Base 31 | true 32 | 33 | 34 | true 35 | Cfg_2 36 | true 37 | true 38 | 39 | 40 | false 41 | false 42 | 24210 43 | true 44 | true 45 | CompanyName=Embarcadero Technologies, Inc.;FileDescription=CodeGear Win32 Shell Controls;FileVersion=15.0.3513.24210;InternalName=DCLSHLCTRLS150;LegalCopyright=Copyright © 2000-2002 Embarcadero Technologies, Inc.;LegalTrademarks=;OriginalFilename=DCLSHLCTRLS150.BPL;ProductName=Delphi;ProductVersion=14.0;Comments= 46 | 3513 47 | Vcl;Vcl.Imaging;Vcl.Touch;Vcl.Samples;Vcl.Shell;System;Xml;Data;Datasnap;Web;Soap;$(DCC_Namespace) 48 | 1033 49 | 15 50 | 00400000 51 | true 52 | false 53 | Shell Control Property and Component Editors 54 | true 55 | true 56 | true 57 | 220 58 | dclshlctrls 59 | ..\..\Lib\$(Platform)\$(Config) 60 | ..\..\Source;$(DCC_UnitSearchPath) 61 | 62 | 63 | Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace) 64 | vcl;rtl;vclactnband;vclx;vclshlctrls;$(DCC_UsePackage) 65 | 66 | 67 | 7.0 68 | 0 69 | False 70 | False 71 | 0 72 | RELEASE;$(DCC_Define) 73 | 74 | 75 | 7.0 76 | False 77 | DEBUG;$(DCC_Define) 78 | 79 | 80 | 81 | MainSource 82 | 83 | 84 | 85 | 86 | 87 | 88 | 89 | 90 |
RootPathEditDlg
91 | 92 | 93 | 94 | Cfg_2 95 | Base 96 | 97 | 98 | Base 99 | 100 | 101 | Cfg_1 102 | Base 103 | 104 | 105 | 106 | 107 | 108 | Delphi.Personality.12 109 | Package 110 | 111 | 112 | 113 | False 114 | 115 | 116 | 117 | 118 | True 119 | False 120 | 15 121 | 0 122 | 3513 123 | 24210 124 | False 125 | False 126 | False 127 | False 128 | True 129 | 1033 130 | 1252 131 | 132 | 133 | Embarcadero Technologies, Inc. 134 | CodeGear Win32 Shell Controls 135 | 15.0.3513.24210 136 | DCLSHLCTRLS150 137 | Copyright © 2000-2002 Embarcadero Technologies, Inc. 138 | 139 | DCLSHLCTRLS150.BPL 140 | Delphi 141 | 14.0 142 | 143 | 144 | 145 | dclshlctrls.dpk 146 | 147 | 148 | 149 | 150 | True 151 | False 152 | 153 | 154 | 12 155 | 156 | 157 | --------------------------------------------------------------------------------