Added missing files

Fixed default theme for RAD Studio 10.1 Berlin Added support for RAD Studio 10.3 Updated VCL Styles library.
RRUZ · Jun 29, 2017 · cb79f6a · cb79f6a
1 parent 36400ef
commit cb79f6a
Show file tree

Hide file tree

Showing 41 changed files with 892 additions and 114 deletions.
diff --git a/delphi-ide-theme-editor/BuildDITE.bat b/delphi-ide-theme-editor/BuildDITE.bat
@@ -6,7 +6,7 @@ pause
 EXIT
 
 :INNO
-"C:\Program Files (x86)\Inno Setup 5\iscc.exe" "C:\Delphi\github\delphi-ide-theme-editor\delphi-ide-theme-editor\DelphiIDEThemeEditor.iss"
+"C:\Program Files (x86)\Inno Setup 5\iscc.exe" "DelphiIDEThemeEditor.iss"
 set INNO_STATUS=%ERRORLEVEL%
 if %INNO_STATUS%==0 GOTO END
 pause

diff --git a/delphi-ide-theme-editor/DITE.Main.dfm b/delphi-ide-theme-editor/DITE.Main.dfm
@@ -326,9 +326,6 @@ object FrmMain: TFrmMain
     Color = clLime
     ParentBackground = False
     TabOrder = 15
-    ExplicitLeft = 732
-    ExplicitTop = 15
-    ExplicitHeight = 569
   end
   object RadioButtonFore: TRadioButton
     Left = 244
@@ -460,7 +457,7 @@ object FrmMain: TFrmMain
     Left = 508
     Top = 311
     Bitmap = {
-      494C01010600090008000B000E00FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
+      494C01010600090004000B000E00FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
       00000000000036000000280000002C0000001C00000001002000000000004013
       0000000000000000000000000000000000000000000000000000000000000000
       0000000000000000000000000000000000000000000000000000000000000000
@@ -633,7 +630,7 @@ object FrmMain: TFrmMain
     Left = 188
     Top = 267
     Bitmap = {
-      494C010105000900080010001000FFFFFFFF2110FFFFFFFFFFFFFFFF424D3600
+      494C010105000900040010001000FFFFFFFF2110FFFFFFFFFFFFFFFF424D3600
       0000000000003600000028000000400000002000000001002000000000000020
       0000000000000000000000000000000000000000000000000000000000000000
       00000600002E2F00067E610018B684002ED57E003BD2550034AE24001B720300
@@ -1023,7 +1020,7 @@ object FrmMain: TFrmMain
     Left = 412
     Top = 307
     Bitmap = {
-      494C010106000900080010001000FFFFFFFF2110FFFFFFFFFFFFFFFF424D3600
+      494C010106000900040010001000FFFFFFFF2110FFFFFFFFFFFFFFFF424D3600
       0000000000003600000028000000400000002000000001002000000000000020
       0000000000000000000000000000000000000000000000000000000000000000
       000000000001000000070000000D0000001A000000340203034E0203024E0000

diff --git a/delphi-ide-theme-editor/DITE.Main.pas b/delphi-ide-theme-editor/DITE.Main.pas
@@ -265,6 +265,7 @@ implementation
   CommCtrl,
   Vcl.Styles,
   Vcl.Styles.Utils.Graphics,
+  Vcl.Styles.FontAwesome,
   Vcl.Themes,
   Vcl.ListActns,
   uVclStylesFix,
@@ -853,7 +854,7 @@ procedure TFrmMain.LoadNCControls;
   NCControls.ShowSystemMenu := False;
   NCControls.Images := ImageListNCArea;
 
-  LNCButton := NCControls.ButtonsList.Add;
+  LNCButton := NCControls.Controls.AddEx<TNCButton>;
   LNCButton.Style := nsSplitButton;
   LNCButton.ImageStyle := isGrayHot;
   LNCButton.ImageIndex := 0;
@@ -862,7 +863,7 @@ procedure TFrmMain.LoadNCControls;
   LNCButton.DropDownMenu := PopupMenuThemes;
   // LNCButton.OnClick := ButtonNCClick;
 
-  LNCButton := NCControls.ButtonsList.Add;
+  LNCButton := NCControls.Controls.AddEx<TNCButton>;
   LNCButton.Style := nsTranparent;
   LNCButton.ImageStyle := isGrayHot;
   LNCButton.ImageIndex := 3;
@@ -873,7 +874,7 @@ procedure TFrmMain.LoadNCControls;
   LNCButton.Caption := '';
   LNCButton.OnClick := ImageHueClick;
 
-  LNCButton := NCControls.ButtonsList.Add;
+  LNCButton := NCControls.Controls.AddEx<TNCButton>;
   LNCButton.Style := nsTranparent;
   LNCButton.ImageStyle := isGrayHot;
   LNCButton.ImageIndex := 2;
@@ -884,7 +885,7 @@ procedure TFrmMain.LoadNCControls;
   LNCButton.Caption := '';
   LNCButton.OnClick := ImageConfClick;
 
-  LNCButton := NCControls.ButtonsList.Add;
+  LNCButton := NCControls.Controls.AddEx<TNCButton>;
   LNCButton.Style := nsTranparent;
   LNCButton.ImageStyle := isGrayHot;
   LNCButton.ImageIndex := 1;
@@ -895,7 +896,7 @@ procedure TFrmMain.LoadNCControls;
   LNCButton.Caption := '';
   LNCButton.OnClick := ImageBugClick;
 
-  LNCButton := NCControls.ButtonsList.Add;
+  LNCButton := NCControls.Controls.AddEx<TNCButton>;
   LNCButton.Style := nsTranparent;
   LNCButton.ImageStyle := isGrayHot;
   LNCButton.ImageIndex := 4;
@@ -906,7 +907,7 @@ procedure TFrmMain.LoadNCControls;
   LNCButton.Caption := '';
   LNCButton.OnClick := ImageUpdateClick;
 
-  LNCButton := NCControls.ButtonsList.Add;
+  LNCButton := NCControls.Controls.AddEx<TNCButton>;
   LNCButton.Style := nsTranparent;
   LNCButton.ImageStyle := isGrayHot;
   LNCButton.ImageIndex := 5;
@@ -925,27 +926,27 @@ procedure TFrmMain.LoadIcons;
  Icons := TObjectDictionary<string, TIcon>.Create([doOwnsValues]);
 
  Icons.Add('Apply', TIcon.Create);
- Icons['Apply'].Handle := AwesomeFont.GetIcon(fa_check, 16, 16, StyleServices.GetSystemColor(clMenuText), StyleServices.GetSystemColor(clMenu), 0, TImageAlignment.iaCenter);
+ Icons['Apply'].Handle := FontAwesome.GetIcon(fa_check, 16, 16, StyleServices.GetSystemColor(clMenuText), StyleServices.GetSystemColor(clMenu), 0, TImageAlignment.iaCenter);
  LIndex := ImageList1.AddIcon(Icons['Apply']);
  ActionApplyTheme.ImageIndex := LIndex;
 
  Icons.Add('delete', TIcon.Create);
- Icons['delete'].Handle := AwesomeFont.GetIcon(fa_remove, 16, 16, StyleServices.GetSystemColor(clMenuText), StyleServices.GetSystemColor(clMenu), 0, TImageAlignment.iaCenter);
+ Icons['delete'].Handle := FontAwesome.GetIcon(fa_remove, 16, 16, StyleServices.GetSystemColor(clMenuText), StyleServices.GetSystemColor(clMenu), 0, TImageAlignment.iaCenter);
  LIndex := ImageList1.AddIcon(Icons['delete']);
  ActionDeleteTheme.ImageIndex := LIndex;
 
  Icons.Add('export', TIcon.Create);
- Icons['export'].Handle := AwesomeFont.GetIcon(fa_chevron_right, 16, 16, StyleServices.GetSystemColor(clMenuText), StyleServices.GetSystemColor(clMenu), 0, TImageAlignment.iaCenter);
+ Icons['export'].Handle := FontAwesome.GetIcon(fa_chevron_right, 16, 16, StyleServices.GetSystemColor(clMenuText), StyleServices.GetSystemColor(clMenu), 0, TImageAlignment.iaCenter);
  LIndex := ImageList1.AddIcon(Icons['export']);
  ActionExoLazarusClrSch.ImageIndex := LIndex;
 
  Icons.Add('import', TIcon.Create);
- Icons['import'].Handle := AwesomeFont.GetIcon(fa_chevron_left, 16, 16, StyleServices.GetSystemColor(clMenuText), StyleServices.GetSystemColor(clMenu), 0, TImageAlignment.iaCenter);
+ Icons['import'].Handle := FontAwesome.GetIcon(fa_chevron_left, 16, 16, StyleServices.GetSystemColor(clMenuText), StyleServices.GetSystemColor(clMenu), 0, TImageAlignment.iaCenter);
  LIndex := ImageList1.AddIcon(Icons['import']);
  ActionImportThemeReg.ImageIndex := LIndex;
 
  Icons.Add('github', TIcon.Create);
- Icons['github'].Handle := AwesomeFont.GetIcon(fa_github, 24, 24, StyleServices.GetSystemColor(clHighlight), StyleServices.GetSystemColor(clBtnFace), 0, TImageAlignment.iaCenter);
+ Icons['github'].Handle := FontAwesome.GetIcon(fa_github, 24, 24, StyleServices.GetSystemColor(clHighlight), StyleServices.GetSystemColor(clBtnFace), 0, TImageAlignment.iaCenter);
 
  end;
 

diff --git a/delphi-ide-theme-editor/DITE.dproj b/delphi-ide-theme-editor/DITE.dproj
@@ -2,7 +2,7 @@
     <PropertyGroup>
         <ProjectGuid>{070E7AF4-DE7B-4A14-A9BC-894BF4D296B5}</ProjectGuid>
         <MainSource>DITE.dpr</MainSource>
-        <ProjectVersion>18.1</ProjectVersion>
+        <ProjectVersion>18.2</ProjectVersion>
         <Base>True</Base>
         <Config Condition="'$(Config)'==''">Release</Config>
         <AppType>Application</AppType>
@@ -52,6 +52,12 @@
         <Cfg_2>true</Cfg_2>
         <Base>true</Base>
     </PropertyGroup>
+    <PropertyGroup Condition="('$(Platform)'=='Win64' and '$(Cfg_2)'=='true') or '$(Cfg_2_Win64)'!=''">
+        <Cfg_2_Win64>true</Cfg_2_Win64>
+        <CfgParent>Cfg_2</CfgParent>
+        <Cfg_2>true</Cfg_2>
+        <Base>true</Base>
+    </PropertyGroup>
     <PropertyGroup Condition="'$(Base)'!=''">
         <SanitizedProjectName>DITE</SanitizedProjectName>
         <VerInfo_Build>255</VerInfo_Build>
@@ -71,16 +77,20 @@
         <DCC_K>false</DCC_K>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Base_Win32)'!=''">
+        <UWP_DelphiLogo150>$(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_150.png</UWP_DelphiLogo150>
+        <UWP_DelphiLogo44>$(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_44.png</UWP_DelphiLogo44>
         <AppEnableRuntimeThemes>true</AppEnableRuntimeThemes>
         <DCC_UsePackage>mbColorLibDXE4;$(DCC_UsePackage)</DCC_UsePackage>
         <DCC_Namespace>Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;Bde;$(DCC_Namespace)</DCC_Namespace>
-        <VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
+        <VerInfo_Keys>CompanyName=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(ModuleName);FileDescription=$(ModuleName);ProductName=$(ModuleName)</VerInfo_Keys>
         <Manifest_File>$(BDS)\bin\default_app.manifest</Manifest_File>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Base_Win64)'!=''">
+        <UWP_DelphiLogo150>$(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_150.png</UWP_DelphiLogo150>
+        <UWP_DelphiLogo44>$(BDS)\bin\Artwork\Windows\UWP\delphi_UwpDefault_44.png</UWP_DelphiLogo44>
         <AppEnableRuntimeThemes>true</AppEnableRuntimeThemes>
         <DCC_Namespace>Data.Win;Datasnap.Win;Web.Win;Soap.Win;Xml.Win;$(DCC_Namespace)</DCC_Namespace>
-        <VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
+        <VerInfo_Keys>CompanyName=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(ModuleName);FileDescription=$(ModuleName);ProductName=$(ModuleName)</VerInfo_Keys>
         <Manifest_File>$(BDS)\bin\default_app.manifest</Manifest_File>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_1)'!=''">
@@ -96,14 +106,14 @@
         <VerInfo_Release>99</VerInfo_Release>
         <DCC_DebugDCUs>true</DCC_DebugDCUs>
         <VerInfo_Build>9999</VerInfo_Build>
-        <VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=9.9.99.9999;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
+        <VerInfo_Keys>CompanyName=;FileVersion=9.9.99.9999;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(ModuleName);FileDescription=$(ModuleName);ProductName=$(ModuleName)</VerInfo_Keys>
         <Manifest_File>$(BDS)\bin\default_app.manifest</Manifest_File>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_1_Win64)'!=''">
         <AppEnableRuntimeThemes>true</AppEnableRuntimeThemes>
         <Manifest_File>$(BDS)\bin\default_app.manifest</Manifest_File>
         <VerInfo_Build>0</VerInfo_Build>
-        <VerInfo_Keys>CompanyName=;FileDescription=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductName=;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
+        <VerInfo_Keys>CompanyName=;FileVersion=1.0.0.0;InternalName=;LegalCopyright=;LegalTrademarks=;OriginalFilename=;ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(ModuleName);FileDescription=$(ModuleName);ProductName=$(ModuleName)</VerInfo_Keys>
         <DCC_RemoteDebug>true</DCC_RemoteDebug>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_2)'!=''">
@@ -113,17 +123,21 @@
         <DCC_DebugInformation>0</DCC_DebugInformation>
     </PropertyGroup>
     <PropertyGroup Condition="'$(Cfg_2_Win32)'!=''">
+        <BT_BuildType>Debug</BT_BuildType>
         <AppEnableRuntimeThemes>true</AppEnableRuntimeThemes>
         <VerInfo_Release>1</VerInfo_Release>
         <DCC_DebugInformation>true</DCC_DebugInformation>
         <DCC_MapFile>3</DCC_MapFile>
         <DCC_GenerateStackFrames>true</DCC_GenerateStackFrames>
         <VerInfo_MinorVer>92</VerInfo_MinorVer>
-        <VerInfo_Build>21</VerInfo_Build>
+        <VerInfo_Build>33</VerInfo_Build>
         <DCC_UNIT_PLATFORM>false</DCC_UNIT_PLATFORM>
-        <VerInfo_Keys>CompanyName=The road to Delphi;FileDescription=Delphi IDE Theme Editor;FileVersion=1.92.1.21;InternalName=DITE;LegalCopyright=RRUZ 2017;LegalTrademarks=;OriginalFilename=;ProductName=Delphi IDE Theme Editor;ProductVersion=1.0.0.0;Comments=</VerInfo_Keys>
+        <VerInfo_Keys>CompanyName=The road to Delphi;FileDescription=Delphi IDE Theme Editor;FileVersion=1.92.1.33;InternalName=DITE;LegalCopyright=RRUZ 2017;LegalTrademarks=;OriginalFilename=;ProductName=Delphi IDE Theme Editor;ProductVersion=1.0.0.0;Comments=;ProgramID=com.embarcadero.$(MSBuildProjectName)</VerInfo_Keys>
         <Manifest_File>$(BDS)\bin\default_app.manifest</Manifest_File>
     </PropertyGroup>
+    <PropertyGroup Condition="'$(Cfg_2_Win64)'!=''">
+        <BT_BuildType>Debug</BT_BuildType>
+    </PropertyGroup>
     <ItemGroup>
         <DelphiCompile Include="$(MainSource)">
             <MainSource>MainSource</MainSource>
@@ -248,27 +262,12 @@
                         <Overwrite>true</Overwrite>
                     </Platform>
                 </DeployFile>
-                <DeployClass Name="DependencyModule">
-                    <Platform Name="Win32">
-                        <Operation>0</Operation>
-                        <Extensions>.dll;.bpl</Extensions>
-                    </Platform>
+                <DeployClass Name="ProjectiOSDeviceResourceRules">
                     <Platform Name="iOSDevice64">
                         <Operation>1</Operation>
-                        <Extensions>.dylib</Extensions>
-                    </Platform>
-                    <Platform Name="OSX32">
-                        <RemoteDir>Contents\MacOS</RemoteDir>
-                        <Operation>1</Operation>
-                        <Extensions>.dylib</Extensions>
                     </Platform>
                     <Platform Name="iOSDevice32">
                         <Operation>1</Operation>
-                        <Extensions>.dylib</Extensions>
-                    </Platform>
-                    <Platform Name="iOSSimulator">
-                        <Operation>1</Operation>
-                        <Extensions>.dylib</Extensions>
                     </Platform>
                 </DeployClass>
                 <DeployClass Name="ProjectOSXResource">
@@ -354,6 +353,14 @@
                         <Extensions>.framework</Extensions>
                     </Platform>
                 </DeployClass>
+                <DeployClass Name="ProjectUWPManifest">
+                    <Platform Name="Win32">
+                        <Operation>1</Operation>
+                    </Platform>
+                    <Platform Name="Win64">
+                        <Operation>1</Operation>
+                    </Platform>
+                </DeployClass>
                 <DeployClass Name="iPhone_Launch640">
                     <Platform Name="iOSSimulator">
                         <Operation>1</Operation>
@@ -466,6 +473,16 @@
                         <Operation>1</Operation>
                     </Platform>
                 </DeployClass>
+                <DeployClass Name="UWP_DelphiLogo44">
+                    <Platform Name="Win32">
+                        <RemoteDir>Assets</RemoteDir>
+                        <Operation>1</Operation>
+                    </Platform>
+                    <Platform Name="Win64">
+                        <RemoteDir>Assets</RemoteDir>
+                        <Operation>1</Operation>
+                    </Platform>
+                </DeployClass>
                 <DeployClass Name="ProjectiOSEntitlements">
                     <Platform Name="iOSDevice64">
                         <RemoteDir>..\</RemoteDir>
@@ -500,6 +517,16 @@
                         <Operation>1</Operation>
                     </Platform>
                 </DeployClass>
+                <DeployClass Name="UWP_DelphiLogo150">
+                    <Platform Name="Win32">
+                        <RemoteDir>Assets</RemoteDir>
+                        <Operation>1</Operation>
+                    </Platform>
+                    <Platform Name="Win64">
+                        <RemoteDir>Assets</RemoteDir>
+                        <Operation>1</Operation>
+                    </Platform>
+                </DeployClass>
                 <DeployClass Name="iPad_Launch2048">
                     <Platform Name="iOSSimulator">
                         <Operation>1</Operation>
@@ -619,12 +646,27 @@
                         <Operation>1</Operation>
                     </Platform>
                 </DeployClass>
-                <DeployClass Name="ProjectiOSDeviceResourceRules">
+                <DeployClass Name="DependencyModule">
+                    <Platform Name="Win32">
+                        <Operation>0</Operation>
+                        <Extensions>.dll;.bpl</Extensions>
+                    </Platform>
                     <Platform Name="iOSDevice64">
                         <Operation>1</Operation>
+                        <Extensions>.dylib</Extensions>
+                    </Platform>
+                    <Platform Name="OSX32">
+                        <RemoteDir>Contents\MacOS</RemoteDir>
+                        <Operation>1</Operation>
+                        <Extensions>.dylib</Extensions>
                     </Platform>
                     <Platform Name="iOSDevice32">
                         <Operation>1</Operation>
+                        <Extensions>.dylib</Extensions>
+                    </Platform>
+                    <Platform Name="iOSSimulator">
+                        <Operation>1</Operation>
+                        <Extensions>.dylib</Extensions>
                     </Platform>
                 </DeployClass>
                 <ProjectRoot Platform="Win64" Name="$(PROJECTNAME)"/>

diff --git a/delphi-ide-theme-editor/DITE.res b/delphi-ide-theme-editor/DITE.res
diff --git a/delphi-ide-theme-editor/DefaultThemes.RES b/delphi-ide-theme-editor/DefaultThemes.RES
diff --git a/delphi-ide-theme-editor/Units/DITE.Settings.pas b/delphi-ide-theme-editor/Units/DITE.Settings.pas
@@ -14,7 +14,7 @@
 // The Original Code is uSettings.pas.
 //
 // The Initial Developer of the Original Code is Rodrigo Ruz V.
-// Portions created by Rodrigo Ruz V. are Copyright (C) 2011-2016 Rodrigo Ruz V.
+// Portions created by Rodrigo Ruz V. are Copyright (C) 2011-2017 Rodrigo Ruz V.
 // All Rights Reserved.
 //
 //**************************************************************************************************

diff --git a/delphi-ide-theme-editor/Units/EclipseThemes.pas b/delphi-ide-theme-editor/Units/EclipseThemes.pas
@@ -14,7 +14,7 @@
 // The Original Code is EclipseThemes.pas.
 //
 // The Initial Developer of the Original Code is Rodrigo Ruz V.
-// Portions created by Rodrigo Ruz V. are Copyright (C) 2011-2016 Rodrigo Ruz V.
+// Portions created by Rodrigo Ruz V. are Copyright (C) 2011-2017 Rodrigo Ruz V.
 // All Rights Reserved.
 //
 // **************************************************************************************************

diff --git a/delphi-ide-theme-editor/Units/VSThemes.pas b/delphi-ide-theme-editor/Units/VSThemes.pas
@@ -14,7 +14,7 @@
 // The Original Code is VSThemes.pas.
 //
 // The Initial Developer of the Original Code is Rodrigo Ruz V.
-// Portions created by Rodrigo Ruz V. are Copyright (C) 2011-2016 Rodrigo Ruz V.
+// Portions created by Rodrigo Ruz V. are Copyright (C) 2011-2017 Rodrigo Ruz V.
 // All Rights Reserved.
 //
 // **************************************************************************************************

diff --git a/delphi-ide-theme-editor/Units/uAdditionalSettings.pas b/delphi-ide-theme-editor/Units/uAdditionalSettings.pas
@@ -14,7 +14,7 @@
 // The Original Code is uMisc.pas.
 //
 // The Initial Developer of the Original Code is Rodrigo Ruz V.
-// Portions created by Rodrigo Ruz V. are Copyright (C) 2011-2016 Rodrigo Ruz V.
+// Portions created by Rodrigo Ruz V. are Copyright (C) 2011-2017 Rodrigo Ruz V.
 // All Rights Reserved.
 //
 //**************************************************************************************************
@@ -25,7 +25,7 @@ interface
 uses
   Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
   Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.ComCtrls, Vcl.StdCtrls, Vcl.ImgList,
-  Vcl.ExtCtrls, uDelphiVersions;
+  Vcl.ExtCtrls, uDelphiVersions, System.ImageList;
 
 type
   TFrmAdditionalSettings = class(TForm)

diff --git a/delphi-ide-theme-editor/Units/uAppMethodVersions.pas b/delphi-ide-theme-editor/Units/uAppMethodVersions.pas
@@ -14,7 +14,7 @@
 // The Original Code is uAppMethodVersions.pas
 //
 // The Initial Developer of the Original Code is Rodrigo Ruz V.
-// Portions created by Rodrigo Ruz V. are Copyright (C) 2011-2016 Rodrigo Ruz V.
+// Portions created by Rodrigo Ruz V. are Copyright (C) 2011-2017 Rodrigo Ruz V.
 // All Rights Reserved.
 //
 // **************************************************************************************************