Added BGRAColorTheme in demo

test/test_bccombobox/umain.lfm

@@ -42,6 +42,7 @@ object Form1: TForm1
     Width = 55
     Caption = 'Flash'
     Checked = False
+    Theme = BGRAColorTheme1
     OnChange = RadioButtonChange
   end
   object RadioWin7: TBGRAThemeRadioButton
@@ -51,6 +52,7 @@ object Form1: TForm1
     Width = 53
     Caption = 'Win7'
     Checked = True
+    Theme = BGRAColorTheme1
     OnChange = RadioButtonChange
   end
   object RadioCustom: TBGRAThemeRadioButton
@@ -60,6 +62,17 @@ object Form1: TForm1
     Width = 69
     Caption = 'Custom'
     Checked = False
+    Theme = BGRAColorTheme1
     OnChange = RadioButtonChange
   end
+  object BGRAColorTheme1: TBGRAColorTheme
+    ColorNormal = clBlack
+    ColorHover = clHotLight
+    ColorActive = clGreen
+    ColorDisabled = clGray
+    ColorFocused = clMoneyGreen
+    ColorText = clBlack
+    Left = 120
+    Top = 88
+  end
 end

test/test_bccombobox/umain.pas

@@ -6,7 +6,7 @@ interface
 
 uses
   Classes, SysUtils, Forms, Controls, Graphics, Dialogs, StdCtrls, BCComboBox,
-  BCListBox, LCLType, BCSamples, BGRAThemeRadioButton, Types;
+  BCListBox, LCLType, BCSamples, BGRAThemeRadioButton, BGRAColorTheme, Types;
 
 type
 
@@ -14,6 +14,7 @@ type
 
   TForm1 = class(TForm)
     BCComboBox1: TBCComboBox;
+    BGRAColorTheme1: TBGRAColorTheme;
     Label1: TLabel;
     Label2: TLabel;
     RadioCustom: TBGRAThemeRadioButton;