diff --git a/components/mbColorLib/HSLColorPicker.pas b/components/mbColorLib/HSLColorPicker.pas
index 3555a907c..c9f61a634 100644
--- a/components/mbColorLib/HSLColorPicker.pas
+++ b/components/mbColorLib/HSLColorPicker.pas
@@ -509,6 +509,9 @@ begin
     FHSPicker.RelHue := H;
     FHSPicker.RelSaturation := S;
     FLVPicker.SelectedColor := Value;
+    FRed := GetRValue(Value);
+    FGreen := GetGValue(Value);
+    FBlue := GetBValue(Value);
   end;
 end;
 
diff --git a/components/mbColorLib/examples/fulldemo/main.lfm b/components/mbColorLib/examples/fulldemo/main.lfm
index 591278457..c7501bbde 100644
--- a/components/mbColorLib/examples/fulldemo/main.lfm
+++ b/components/mbColorLib/examples/fulldemo/main.lfm
@@ -3,7 +3,7 @@ object Form1: TForm1
   Height = 416
   Top = 197
   Width = 594
-  Caption = 'mbColor Lib v2.1 Demo'
+  Caption = 'mbColor Lib v2.2 Demo'
   ClientHeight = 416
   ClientWidth = 594
   Font.Color = clWindowText
@@ -31,12 +31,10 @@ object Form1: TForm1
         Height = 360
         Top = 8
         Width = 454
-        SelectedColor = 3552968
-        Saturation = 147
+        Luminance = 128
         HSPickerHintFormat = 'H: %h S: %s'#13'Hex: #%hex'
         LPickerHintFormat = 'Luminance: %l'
         VPickerHintFormat = 'Value: %value (selected)'
-        MaxLuminance = 255
         Anchors = [akTop, akLeft, akRight, akBottom]
         TabOrder = 0
         OnChange = HSLColorPicker1Change
@@ -498,7 +496,6 @@ object Form1: TForm1
             'clBlack'
           )
           HintFormat = 'RGB(%r, %g, %b)'#13'Hex: #%hex'
-          AutoHeight = True
           TabOrder = 0
           OnSelColorChange = mbColorPalette1SelColorChange
           OnMouseMove = mbColorPalette1MouseMove
@@ -907,13 +904,10 @@ object Form1: TForm1
         Height = 155
         Top = 6
         Width = 211
-        SelectedColor = 15406357
         HintFormat = 'H: %h S: %s'#13'Hex: %hex'
         TabOrder = 0
         OnMouseMove = HSColorPicker1MouseMove
-        Hue = 240
         Luminance = 128
-        Saturation = 215
         MarkerStyle = msSquare
         OnChange = HSColorPicker1Change
       end
diff --git a/components/mbColorLib/examples/fulldemo/main.pas b/components/mbColorLib/examples/fulldemo/main.pas
index 0b6c08ddd..7bcb857e8 100644
--- a/components/mbColorLib/examples/fulldemo/main.pas
+++ b/components/mbColorLib/examples/fulldemo/main.pas
@@ -336,7 +336,7 @@ begin
     WriteString('InternetShortcut','IconFile', '"' + Application.ExeName + '"');
   finally
     Free;
-  end; 
+  end;
 end;
 
 procedure TForm1.HColorPicker1GetHintStr(Sender: TObject; X, Y: Integer;
diff --git a/components/mbColorLib/mbcolorliblaz.lpk b/components/mbColorLib/mbcolorliblaz.lpk
index e5b6acd0f..7227b205f 100644
--- a/components/mbColorLib/mbcolorliblaz.lpk
+++ b/components/mbColorLib/mbcolorliblaz.lpk
@@ -14,7 +14,7 @@
     </CompilerOptions>
     <Description Value="Comprehensive color selection library with more than 30 components"/>
     <License Value="License is granted to use, modify and redistribute these units in your applications as you see fit. You are given COMPLETE FREEDOM with the sources found in this pack; you're free to use it in ANY kind of app without even mentioning my name, my site or any other stuff, that depends on your good will and nothing else. I will accept any modifications and incorporate them in this pack if they'll help make it better. You are under NO obligation to pay for these components to neither me nor anyone else trying to sell them in their current form. If you wish to support development of these components you can do so by contributing some source or making a donation, again this solely depends on your good will."/>
-    <Version Major="2" Minor="1"/>
+    <Version Major="2" Minor="2"/>
     <Files Count="46">
       <Item1>
         <Filename Value="PalUtils.pas"/>