LCL: Add new TComboBoxEx and TCheckComboBox components. Issue #26515, patch from Vojtech Cihak.

git-svn-id: trunk@46271 -

images/components_images_list.txt

@@ -13,6 +13,7 @@ components/tcalculatordialog.png
 components/tcalendar.png
 components/tcalendardialog.png
 components/tcheckbox.png
+components/tcheckcombobox.png
 components/tcheckgroup.png
 components/tchecklistbox.png
 components/tcolorbox.png
@@ -20,6 +21,7 @@ components/tcolorbutton.png
 components/tcolordialog.png
 components/tcolorlistbox.png
 components/tcombobox.png
+components/tcomboboxex.png
 components/tcontrolbar.png
 components/tcoolbar.png
 components/tdatasource.png

lcl/alllclunits.pp

@@ -26,7 +26,7 @@ uses
   ValEdit, lazcanvas, lazdialogs, lazregions, customdrawn_common, 
   customdrawncontrols, customdrawndrawers, lazdeviceapis, LDockTree, 
   LazFreeTypeIntfDrawer, customdrawn_winxp, customdrawn_android, Arrow, 
-  EditBtn, LazarusPackageIntf;
+  EditBtn, ComboEx, LazarusPackageIntf;
 
 implementation
 

lcl/comboex.pas

@@ -386,7 +386,6 @@ implementation
 
 procedure Register;
 begin
-  {$I comboex.lrs}
   RegisterComponents('Misc', [TComboBoxEx, TCheckComboBox]);
 end;
 

lcl/fpmake.pp

@@ -151,6 +151,7 @@ begin
     t.Dependencies.AddUnit('calendar');
     t.Dependencies.AddUnit('registerlcl');
     t.Dependencies.AddUnit('valedit');
+    t.Dependencies.AddUnit('comboex');
     t.Dependencies.AddUnit('lazcanvas');
     t.Dependencies.AddUnit('lazdialogs');
     t.Dependencies.AddUnit('lazregions');
@@ -273,6 +274,7 @@ begin
     T:=P.Targets.AddUnit('calendar.pp');
     T:=P.Targets.AddUnit('registerlcl.pas');
     T:=P.Targets.AddUnit('valedit.pas');
+    T:=P.Targets.AddUnit('comboex.pas');
     T:=P.Targets.AddUnit('lazcanvas.pas');
     T:=P.Targets.AddUnit('lazdialogs.pas');
     T:=P.Targets.AddUnit('lazregions.pas');

lcl/lclbase.lpk

@@ -26,7 +26,7 @@
     <License Value="modified LGPL-2
 "/>
     <Version Major="1" Minor="3"/>
-    <Files Count="281">
+    <Files Count="282">
       <Item1>
         <Filename Value="checklst.pas"/>
         <UnitName Value="CheckLst"/>
@@ -1157,6 +1157,10 @@
         <HasRegisterProc Value="True"/>
         <UnitName Value="EditBtn"/>
       </Item281>
+      <Item282>
+        <Filename Value="comboex.pas"/>
+        <UnitName Value="ComboEx"/>
+      </Item282>
     </Files>
     <LazDoc Paths="../docs/xml/lcl"/>
     <i18n>

lcl/registerlcl.pas

@@ -15,7 +15,7 @@ uses
   PairSplitter, ExtDlgs, StdActns, DbCtrls, DBGrids, DBActns, EditBtn,
   ActnList, FileCtrl, Graphics, XMLPropStorage, IniPropStorage,
   ColorBox, ButtonPanel, LResources, LazHelpHTML, PopupNotifier, AsyncProcess,
-  UTF8Process, ShellCtrls, ValEdit;
+  UTF8Process, ShellCtrls, ValEdit, ComboEx;
 
 procedure Register;
 procedure RegisterLCLBase;
@@ -48,10 +48,10 @@ begin
   RegisterUnit('EditBtn',@EditBtn.Register);
   RegisterUnit('ActnList',@ActnList.Register);
   RegisterUnit('FileCtrl',@FileCtrl.Register);
+  RegisterUnit('ComboEx', @ComboEx.Register);
   RegisterUnit('Graphics',@Graphics.Register);
-  RegisterUnit('XMLPropStorage',@XMLPropStorage.Register);
-  RegisterUnit('IniPropStorage',@IniPropStorage.Register);
   RegisterUnit('ColorBox',@ColorBox.Register);
+  RegisterUnit('ValEdit', @ValEdit.Register);
   RegisterUnit('ButtonPanel',@ButtonPanel.Register);
   RegisterUnit('LResources',@LResources.Register);
   RegisterUnit('LazHelpHTML',@LazHelpHTML.Register);
@@ -59,7 +59,8 @@ begin
   RegisterUnit('AsyncProcess', @AsyncProcess.Register);
   RegisterUnit('UTF8Process', @UTF8Process.Register);
   RegisterUnit('ShellCtrls', @ShellCtrls.Register);
-  RegisterUnit('ValEdit', @ValEdit.Register);
+  RegisterUnit('XMLPropStorage',@XMLPropStorage.Register);
+  RegisterUnit('IniPropStorage',@IniPropStorage.Register);
 end;
 
 procedure RegisterLCLBase;