diff --git a/components/gradcontrols/examples/Forms/unit1.lfm b/components/gradcontrols/examples/Forms/unit1.lfm
index 68aadaa75..8dc2a3326 100644
--- a/components/gradcontrols/examples/Forms/unit1.lfm
+++ b/components/gradcontrols/examples/Forms/unit1.lfm
@@ -1,31 +1,31 @@
 object Form1: TForm1
-  Left = 300
-  Height = 490
-  Top = 146
+  Left = 292
+  Height = 492
+  Top = 130
   Width = 884
   Caption = 'Form1'
-  ClientHeight = 490
+  ClientHeight = 492
   ClientWidth = 884
   OnCreate = FormCreate
   OnDestroy = FormDestroy
   ParentFont = False
   LCLVersion = '0.9.27'
   object Panel1: TPanel
-    Height = 490
+    Height = 492
     Width = 646
     Align = alClient
     Caption = 'Panel1'
-    ClientHeight = 490
+    ClientHeight = 492
     ClientWidth = 646
     TabOrder = 0
     object GradTabControl1: TGradTabControl
       Left = 1
-      Height = 488
+      Height = 490
       Top = 1
       Width = 644
       Align = alClient
-      ControlStyle = [csAcceptsControls]
-      ActivePage = GradTabPage3
+      ControlStyle = [csAcceptsControls, csOwnedChildsSelectable]
+      ActivePage = GradTabPage2
       OnTabButtonMouseDown = GradTabControl1TabButtonMouseDown
       OnTabButtonMouseUp = GradTabControl1TabButtonMouseUp
       OnTabButtonMouseMove = GradTabControl1TabButtonMouseMove
@@ -34,20 +34,56 @@ object Form1: TForm1
       OnMouseDown = GradTabControl1MouseDown
       OnMouseWheelUp = GradTabControl1MouseWheelUp
       OnMouseWheelDown = GradTabControl1MouseWheelDown
-      PageIndex = 3
+      OnPagesBarDragOver = nil
+      PageIndex = 1
       TabHeight = 20
       MoveIncrement = 1
       OnPageChanged = GradTabControl1PageChanged
+      Images = ImageList1
       object GradTabPage1: TGradTabPage
         Left = 2
         Height = 464
         Top = 22
         Width = 640
-        PageIndex = 1
         Caption = 'abc'
         Color = clGrayText
         TabColor = clBlue
-        TabTextAlignment = taCenter
+        TabGlyph.Data = {
+          36040000424D3604000000000000360000002800000010000000100000000100
+          20000000000000040000640000006400000000000000000000006E554E8D704E
+          44A6683F35A51C0E0E1286C6DC2D6BC2E1995FBCDDB855B4D4D24CA9CAE843A0
+          C0EA3E9CBCD5429EBFBC50A8C79F79B9D03B0000230000002300664E4982593D
+          37706D4237706186964470D0F2F65FC7EBFF53BBDFFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF2990B5FF349CC0FF55B7D9FA85C9E14F00002300513C36266E4B
+          428E4C2D266B76BBD26F6BD2F5FF5DBAD5FF51AFCDFF52ACC8FF4AA8C7FF45A3
+          C3FF469FBCFF3D99B8FF409EBBFF4FB5D9FF7ACDEB820000230000000006583E
+          357C603A30B57BAFC16D5EBBDBFC5EC1E3FF5ABBDCFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF3395B6FF42A2C4FF54B1D1FD7EC0D28800002300000023006948
+          3E835F39308E85CCE65A6BD2F6FF5FC7EBFF53BBDFFF47B0D4FF44A4C3FF3A9A
+          B7FF2890B4FF2990B5FF349CC0FF4EB6DAFF7DCCE67800002300000000075E3F
+          386D5F382E6974B7CD7268C5E2FF55B0CDFF4EAFCEFF4AABCDFF43A9CCFF3DA3
+          C7FF3DA0C1FF40A1C1FF49A4C3FF51AFCDFF7ACCE98200002300000000045E41
+          378A653E337785B8C45169C4E5FC60C7EBFF53BBDFFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF2990B5FF349CC0FF57B5D5FD87BBCC7700002300000023002C23
+          1A1D5132298A70B1C6716AD2F6FF60C7EAFF5CB7D3FF4FABC7FF42A1C0FF3B9B
+          B9FF3995B0FF3892AFFF369CBFFF4EB6DAFF7BCEE9810000230000000004704E
+          44966C42379A7ABBCE715DB8D2FF50B2D4FF49B3D8FF44B0D4FF41A8CDFF39A0
+          C4FF349DC2FF35A0C6FF40A5C6FF4FACC8FF7ECAE48600002300000000056244
+          3BB15030289F749DA8536CCDEEFB5FC7EBFF53BBDFFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF2990B5FF349CC0FF55B6D8FD82C0CD6C00002300000023006446
+          3D96472C245D7BC4DD6C6AD2F6FF60BDD9FF4FB0CDFF4AAAC8FF4CA8C4FF49A4
+          C1FF3D9AB8FF3697B6FF409DBBFF4EB6DAFF7ACCE98200002300644E46806848
+          3F8E55352D7E84C5D96A5BBAD9FC59BEE1FF59B9DBFF50B1D3FF3CA4C8FF3099
+          BDFF3193B5FF3999BBFF40A4C7FF50AFCFFD7CC3D787000023006B524A7C704C
+          45895C392D6C7FC3DA4F6CD2F5FE5FC7EBFF53BBDFFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF2991B5FF349CC0FF4FB6DAFF82CDE56F00002300000000063622
+          1B264D2E28747DC6DF6C6BCCEBFF49AFCFFF3BA6C9FF34A2C5FF2E9EC3FF2D9D
+          C2FF2D9CBFFF2F9BBEFF369EC0FF50B2D2FF79CCEA8200002300000000096242
+          3ABC523228A47AA4B35537A2C3F3189FCFFF189FCFFF189FCFFF189FCFFF189F
+          CFFF189FCFFF189FCFFF189FCFFF2E9FC4F77BB8C86900002300000023007B53
+          4966674034941A00000A71A1A2243A9FBD9E319FC1BC2E9FC3D32B9EC4EA2B9F
+          C3EC2D9FC3D6309FC3BF37A0C0A45EA1AD310000230000002300
+        }
         object ToggleBox2: TToggleBox
           Left = 357
           Height = 23
@@ -57,15 +93,150 @@ object Form1: TForm1
           TabOrder = 0
         end
       end
-      object GradTabPage2: TGradTabPage
+      object GradTabPage4: TGradTabPage
         Left = 2
         Height = 464
         Top = 22
         Width = 640
+        PageIndex = 2
+        Caption = 'äöü-test'
+        TabColor = clBlue
+        TabGlyph.Data = {
+          36040000424D3604000000000000360000002800000010000000100000000100
+          20000000000000040000640000006400000000000000000000006E554E8D704E
+          44A6683F35A51C0E0E1286C6DC2D6BC2E1995FBCDDB855B4D4D24CA9CAE843A0
+          C0EA3E9CBCD5429EBFBC50A8C79F79B9D03B0000230000002300664E4982593D
+          37706D4237706186964470D0F2F65FC7EBFF53BBDFFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF2990B5FF349CC0FF55B7D9FA85C9E14F00002300513C36266E4B
+          428E4C2D266B76BBD26F6BD2F5FF5DBAD5FF51AFCDFF52ACC8FF4AA8C7FF45A3
+          C3FF469FBCFF3D99B8FF409EBBFF4FB5D9FF7ACDEB820000230000000006583E
+          357C603A30B57BAFC16D5EBBDBFC5EC1E3FF5ABBDCFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF3395B6FF42A2C4FF54B1D1FD7EC0D28800002300000023006948
+          3E835F39308E85CCE65A6BD2F6FF5FC7EBFF53BBDFFF47B0D4FF44A4C3FF3A9A
+          B7FF2890B4FF2990B5FF349CC0FF4EB6DAFF7DCCE67800002300000000075E3F
+          386D5F382E6974B7CD7268C5E2FF55B0CDFF4EAFCEFF4AABCDFF43A9CCFF3DA3
+          C7FF3DA0C1FF40A1C1FF49A4C3FF51AFCDFF7ACCE98200002300000000045E41
+          378A653E337785B8C45169C4E5FC60C7EBFF53BBDFFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF2990B5FF349CC0FF57B5D5FD87BBCC7700002300000023002C23
+          1A1D5132298A70B1C6716AD2F6FF60C7EAFF5CB7D3FF4FABC7FF42A1C0FF3B9B
+          B9FF3995B0FF3892AFFF369CBFFF4EB6DAFF7BCEE9810000230000000004704E
+          44966C42379A7ABBCE715DB8D2FF50B2D4FF49B3D8FF44B0D4FF41A8CDFF39A0
+          C4FF349DC2FF35A0C6FF40A5C6FF4FACC8FF7ECAE48600002300000000056244
+          3BB15030289F749DA8536CCDEEFB5FC7EBFF53BBDFFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF2990B5FF349CC0FF55B6D8FD82C0CD6C00002300000023006446
+          3D96472C245D7BC4DD6C6AD2F6FF60BDD9FF4FB0CDFF4AAAC8FF4CA8C4FF49A4
+          C1FF3D9AB8FF3697B6FF409DBBFF4EB6DAFF7ACCE98200002300644E46806848
+          3F8E55352D7E84C5D96A5BBAD9FC59BEE1FF59B9DBFF50B1D3FF3CA4C8FF3099
+          BDFF3193B5FF3999BBFF40A4C7FF50AFCFFD7CC3D787000023006B524A7C704C
+          45895C392D6C7FC3DA4F6CD2F5FE5FC7EBFF53BBDFFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF2991B5FF349CC0FF4FB6DAFF82CDE56F00002300000000063622
+          1B264D2E28747DC6DF6C6BCCEBFF49AFCFFF3BA6C9FF34A2C5FF2E9EC3FF2D9D
+          C2FF2D9CBFFF2F9BBEFF369EC0FF50B2D2FF79CCEA8200002300000000096242
+          3ABC523228A47AA4B35537A2C3F3189FCFFF189FCFFF189FCFFF189FCFFF189F
+          CFFF189FCFFF189FCFFF189FCFFF2E9FC4F77BB8C86900002300000023007B53
+          4966674034941A00000A71A1A2243A9FBD9E319FC1BC2E9FC3D32B9EC4EA2B9F
+          C3EC2D9FC3D6309FC3BF37A0C0A45EA1AD310000230000002300
+        }
+      end
+      object GradTabPage3: TGradTabPage
+        Left = 2
+        Height = 466
+        Top = 22
+        Width = 640
+        PageIndex = 3
+        Caption = 'GradTabPage3'
+        TabColor = clBlue
+        TabGlyph.Data = {
+          36040000424D3604000000000000360000002800000010000000100000000100
+          20000000000000040000640000006400000000000000000000006E554E8D704E
+          44A6683F35A51C0E0E1286C6DC2D6BC2E1995FBCDDB855B4D4D24CA9CAE843A0
+          C0EA3E9CBCD5429EBFBC50A8C79F79B9D03B0000230000002300664E4982593D
+          37706D4237706186964470D0F2F65FC7EBFF53BBDFFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF2990B5FF349CC0FF55B7D9FA85C9E14F00002300513C36266E4B
+          428E4C2D266B76BBD26F6BD2F5FF5DBAD5FF51AFCDFF52ACC8FF4AA8C7FF45A3
+          C3FF469FBCFF3D99B8FF409EBBFF4FB5D9FF7ACDEB820000230000000006583E
+          357C603A30B57BAFC16D5EBBDBFC5EC1E3FF5ABBDCFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF3395B6FF42A2C4FF54B1D1FD7EC0D28800002300000023006948
+          3E835F39308E85CCE65A6BD2F6FF5FC7EBFF53BBDFFF47B0D4FF44A4C3FF3A9A
+          B7FF2890B4FF2990B5FF349CC0FF4EB6DAFF7DCCE67800002300000000075E3F
+          386D5F382E6974B7CD7268C5E2FF55B0CDFF4EAFCEFF4AABCDFF43A9CCFF3DA3
+          C7FF3DA0C1FF40A1C1FF49A4C3FF51AFCDFF7ACCE98200002300000000045E41
+          378A653E337785B8C45169C4E5FC60C7EBFF53BBDFFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF2990B5FF349CC0FF57B5D5FD87BBCC7700002300000023002C23
+          1A1D5132298A70B1C6716AD2F6FF60C7EAFF5CB7D3FF4FABC7FF42A1C0FF3B9B
+          B9FF3995B0FF3892AFFF369CBFFF4EB6DAFF7BCEE9810000230000000004704E
+          44966C42379A7ABBCE715DB8D2FF50B2D4FF49B3D8FF44B0D4FF41A8CDFF39A0
+          C4FF349DC2FF35A0C6FF40A5C6FF4FACC8FF7ECAE48600002300000000056244
+          3BB15030289F749DA8536CCDEEFB5FC7EBFF53BBDFFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF2990B5FF349CC0FF55B6D8FD82C0CD6C00002300000023006446
+          3D96472C245D7BC4DD6C6AD2F6FF60BDD9FF4FB0CDFF4AAAC8FF4CA8C4FF49A4
+          C1FF3D9AB8FF3697B6FF409DBBFF4EB6DAFF7ACCE98200002300644E46806848
+          3F8E55352D7E84C5D96A5BBAD9FC59BEE1FF59B9DBFF50B1D3FF3CA4C8FF3099
+          BDFF3193B5FF3999BBFF40A4C7FF50AFCFFD7CC3D787000023006B524A7C704C
+          45895C392D6C7FC3DA4F6CD2F5FE5FC7EBFF53BBDFFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF2991B5FF349CC0FF4FB6DAFF82CDE56F00002300000000063622
+          1B264D2E28747DC6DF6C6BCCEBFF49AFCFFF3BA6C9FF34A2C5FF2E9EC3FF2D9D
+          C2FF2D9CBFFF2F9BBEFF369EC0FF50B2D2FF79CCEA8200002300000000096242
+          3ABC523228A47AA4B35537A2C3F3189FCFFF189FCFFF189FCFFF189FCFFF189F
+          CFFF189FCFFF189FCFFF189FCFFF2E9FC4F77BB8C86900002300000023007B53
+          4966674034941A00000A71A1A2243A9FBD9E319FC1BC2E9FC3D32B9EC4EA2B9F
+          C3EC2D9FC3D6309FC3BF37A0C0A45EA1AD310000230000002300
+        }
+        object Button3: TButton
+          Left = 99
+          Height = 25
+          Top = 71
+          Width = 75
+          Caption = 'Button3'
+          TabOrder = 0
+        end
+      end
+      object GradTabPage2: TGradTabPage
+        Left = 2
+        Height = 466
+        Top = 22
+        Width = 640
+        PageIndex = 1
         Caption = 'GradTabPage2'
         TabPopupMenu = PopupMenu1
-        TabColor = clBlue
-        TabTextAlignment = taCenter
+        TabColor = clGreen
+        TabGlyph.Data = {
+          36040000424D3604000000000000360000002800000010000000100000000100
+          20000000000000040000640000006400000000000000000000006E554E8D704E
+          44A6683F35A51C0E0E1286C6DC2D6BC2E1995FBCDDB855B4D4D24CA9CAE843A0
+          C0EA3E9CBCD5429EBFBC50A8C79F79B9D03B0000230000002300664E4982593D
+          37706D4237706186964470D0F2F65FC7EBFF53BBDFFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF2990B5FF349CC0FF55B7D9FA85C9E14F00002300513C36266E4B
+          428E4C2D266B76BBD26F6BD2F5FF5DBAD5FF51AFCDFF52ACC8FF4AA8C7FF45A3
+          C3FF469FBCFF3D99B8FF409EBBFF4FB5D9FF7ACDEB820000230000000006583E
+          357C603A30B57BAFC16D5EBBDBFC5EC1E3FF5ABBDCFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF3395B6FF42A2C4FF54B1D1FD7EC0D28800002300000023006948
+          3E835F39308E85CCE65A6BD2F6FF5FC7EBFF53BBDFFF47B0D4FF44A4C3FF3A9A
+          B7FF2890B4FF2990B5FF349CC0FF4EB6DAFF7DCCE67800002300000000075E3F
+          386D5F382E6974B7CD7268C5E2FF55B0CDFF4EAFCEFF4AABCDFF43A9CCFF3DA3
+          C7FF3DA0C1FF40A1C1FF49A4C3FF51AFCDFF7ACCE98200002300000000045E41
+          378A653E337785B8C45169C4E5FC60C7EBFF53BBDFFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF2990B5FF349CC0FF57B5D5FD87BBCC7700002300000023002C23
+          1A1D5132298A70B1C6716AD2F6FF60C7EAFF5CB7D3FF4FABC7FF42A1C0FF3B9B
+          B9FF3995B0FF3892AFFF369CBFFF4EB6DAFF7BCEE9810000230000000004704E
+          44966C42379A7ABBCE715DB8D2FF50B2D4FF49B3D8FF44B0D4FF41A8CDFF39A0
+          C4FF349DC2FF35A0C6FF40A5C6FF4FACC8FF7ECAE48600002300000000056244
+          3BB15030289F749DA8536CCDEEFB5FC7EBFF53BBDFFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF2990B5FF349CC0FF55B6D8FD82C0CD6C00002300000023006446
+          3D96472C245D7BC4DD6C6AD2F6FF60BDD9FF4FB0CDFF4AAAC8FF4CA8C4FF49A4
+          C1FF3D9AB8FF3697B6FF409DBBFF4EB6DAFF7ACCE98200002300644E46806848
+          3F8E55352D7E84C5D96A5BBAD9FC59BEE1FF59B9DBFF50B1D3FF3CA4C8FF3099
+          BDFF3193B5FF3999BBFF40A4C7FF50AFCFFD7CC3D787000023006B524A7C704C
+          45895C392D6C7FC3DA4F6CD2F5FE5FC7EBFF53BBDFFF47B0D4FF3CA4C8FF3099
+          BDFF2890B4FF2991B5FF349CC0FF4FB6DAFF82CDE56F00002300000000063622
+          1B264D2E28747DC6DF6C6BCCEBFF49AFCFFF3BA6C9FF34A2C5FF2E9EC3FF2D9D
+          C2FF2D9CBFFF2F9BBEFF369EC0FF50B2D2FF79CCEA8200002300000000096242
+          3ABC523228A47AA4B35537A2C3F3189FCFFF189FCFFF189FCFFF189FCFFF189F
+          CFFF189FCFFF189FCFFF189FCFFF2E9FC4F77BB8C86900002300000023007B53
+          4966674034941A00000A71A1A2243A9FBD9E319FC1BC2E9FC3D32B9EC4EA2B9F
+          C3EC2D9FC3D6309FC3BF37A0C0A45EA1AD310000230000002300
+        }
+        TabShowGlyph = True
         object PageControl1: TPageControl
           Left = 173
           Height = 200
@@ -103,42 +274,14 @@ object Form1: TForm1
           TabOrder = 2
         end
       end
-      object GradTabPage4: TGradTabPage
-        Left = 2
-        Height = 464
-        Top = 22
-        Width = 640
-        PageIndex = 2
-        Caption = 'äöü-test'
-        TabColor = clBlue
-        TabTextAlignment = taCenter
-      end
-      object GradTabPage3: TGradTabPage
-        Left = 2
-        Height = 464
-        Top = 22
-        Width = 640
-        PageIndex = 3
-        Caption = 'GradTabPage3'
-        TabColor = clGreen
-        TabTextAlignment = taCenter
-        object Button3: TButton
-          Left = 99
-          Height = 25
-          Top = 71
-          Width = 75
-          Caption = 'Button3'
-          TabOrder = 0
-        end
-      end
     end
   end
   object Panel2: TPanel
     Left = 646
-    Height = 490
+    Height = 492
     Width = 238
     Align = alRight
-    ClientHeight = 490
+    ClientHeight = 492
     ClientWidth = 238
     TabOrder = 1
     object Label1: TLabel
@@ -155,6 +298,7 @@ object Form1: TForm1
       Top = 16
       Width = 100
       ItemHeight = 13
+      MaxLength = -1
       OnChange = ComboBox1Change
       Style = csDropDownList
       TabOrder = 0
@@ -305,7 +449,7 @@ object Form1: TForm1
       OnItemClick = CheckGroup1ItemClick
       TabOrder = 8
       Data = {
-        03000000020202
+        03000000030202
       }
     end
   end
@@ -317,6 +461,7 @@ object Form1: TForm1
     end
   end
   object ImageList1: TImageList
+    OnChange = nil
     left = 656
     top = 397
     Bitmap = {
diff --git a/components/gradcontrols/examples/Forms/unit1.lrs b/components/gradcontrols/examples/Forms/unit1.lrs
index d8d5f922a..5ce7b137e 100644
--- a/components/gradcontrols/examples/Forms/unit1.lrs
+++ b/components/gradcontrols/examples/Forms/unit1.lrs
@@ -1,145 +1,329 @@
 { Das ist eine automatisch erzeugte Lazarus-Ressourcendatei }
 
 LazarusResources.Add('TForm1','FORMDATA',[
-  'TPF0'#6'TForm1'#5'Form1'#4'Left'#3','#1#6'Height'#3#234#1#3'Top'#3#146#0#5'W'
-  +'idth'#3't'#3#7'Caption'#6#5'Form1'#12'ClientHeight'#3#234#1#11'ClientWidth'
+  'TPF0'#6'TForm1'#5'Form1'#4'Left'#3'$'#1#6'Height'#3#236#1#3'Top'#3#130#0#5'W'
+  +'idth'#3't'#3#7'Caption'#6#5'Form1'#12'ClientHeight'#3#236#1#11'ClientWidth'
   +#3't'#3#8'OnCreate'#7#10'FormCreate'#9'OnDestroy'#7#11'FormDestroy'#10'Paren'
-  +'tFont'#8#10'LCLVersion'#6#6'0.9.27'#0#6'TPanel'#6'Panel1'#6'Height'#3#234#1
+  +'tFont'#8#10'LCLVersion'#6#6'0.9.27'#0#6'TPanel'#6'Panel1'#6'Height'#3#236#1
   +#5'Width'#3#134#2#5'Align'#7#8'alClient'#7'Caption'#6#6'Panel1'#12'ClientHei'
-  +'ght'#3#234#1#11'ClientWidth'#3#134#2#8'TabOrder'#2#0#0#15'TGradTabControl'
-  +#15'GradTabControl1'#4'Left'#2#1#6'Height'#3#232#1#3'Top'#2#1#5'Width'#3#132
-  +#2#5'Align'#7#8'alClient'#12'ControlStyle'#11#17'csAcceptsControls'#0#10'Act'
-  +'ivePage'#7#12'GradTabPage3'#20'OnTabButtonMouseDown'#7'!GradTabControl1TabB'
-  +'uttonMouseDown'#18'OnTabButtonMouseUp'#7#31'GradTabControl1TabButtonMouseUp'
-  +#20'OnTabButtonMouseMove'#7'!GradTabControl1TabButtonMouseMove'#10'OnDragDro'
-  +'p'#7#23'GradTabControl1DragDrop'#10'OnDragOver'#7#23'GradTabControl1DragOve'
-  +'r'#11'OnMouseDown'#7#24'GradTabControl1MouseDown'#14'OnMouseWheelUp'#7#27'G'
-  +'radTabControl1MouseWheelUp'#16'OnMouseWheelDown'#7#29'GradTabControl1MouseW'
-  +'heelDown'#9'PageIndex'#2#3#9'TabHeight'#2#20#13'MoveIncrement'#2#1#13'OnPag'
-  +'eChanged'#7#26'GradTabControl1PageChanged'#0#12'TGradTabPage'#12'GradTabPag'
-  +'e1'#4'Left'#2#2#6'Height'#3#208#1#3'Top'#2#22#5'Width'#3#128#2#9'PageIndex'
-  +#2#1#7'Caption'#6#3'abc'#5'Color'#7#10'clGrayText'#8'TabColor'#7#6'clBlue'#16
-  +'TabTextAlignment'#7#8'taCenter'#0#10'TToggleBox'#10'ToggleBox2'#4'Left'#3'e'
-  +#1#6'Height'#2#23#3'Top'#3#155#0#5'Width'#2'Z'#7'Caption'#6#10'ToggleBox2'#8
-  +'TabOrder'#2#0#0#0#0#12'TGradTabPage'#12'GradTabPage2'#4'Left'#2#2#6'Height'
-  +#3#208#1#3'Top'#2#22#5'Width'#3#128#2#7'Caption'#6#12'GradTabPage2'#12'TabPo'
-  +'pupMenu'#7#10'PopupMenu1'#8'TabColor'#7#6'clBlue'#16'TabTextAlignment'#7#8
-  +'taCenter'#0#12'TPageControl'#12'PageControl1'#4'Left'#3#173#0#6'Height'#3
-  +#200#0#3'Top'#2'9'#5'Width'#3#200#0#10'ActivePage'#7#9'TabSheet3'#8'TabIndex'
-  +#2#2#8'TabOrder'#2#0#10'OnDragDrop'#7#20'PageControl1DragDrop'#10'OnDragOver'
-  +#7#20'PageControl1DragOver'#0#9'TTabSheet'#9'TabSheet1'#7'Caption'#6#9'TabSh'
-  +'eet1'#0#0#9'TTabSheet'#9'TabSheet2'#7'Caption'#6#9'TabSheet2'#0#0#9'TTabShe'
-  +'et'#9'TabSheet3'#7'Caption'#6#9'TabSheet3'#0#0#0#7'TButton'#7'Button2'#4'Le'
-  +'ft'#2'/'#6'Height'#2#25#3'Top'#2#28#5'Width'#2'K'#7'Caption'#6#7'Button2'#8
-  +'TabOrder'#2#1#0#0#6'TPanel'#6'Panel3'#4'Left'#3#173#1#6'Height'#2'2'#3'Top'
-  +#2'Y'#5'Width'#3#170#0#7'Caption'#6#6'Panel3'#8'TabOrder'#2#2#0#0#0#12'TGrad'
-  +'TabPage'#12'GradTabPage4'#4'Left'#2#2#6'Height'#3#208#1#3'Top'#2#22#5'Width'
-  +#3#128#2#9'PageIndex'#2#2#7'Caption'#6#11#195#164#195#182#195#188'-test'#8'T'
-  +'abColor'#7#6'clBlue'#16'TabTextAlignment'#7#8'taCenter'#0#0#12'TGradTabPage'
-  +#12'GradTabPage3'#4'Left'#2#2#6'Height'#3#208#1#3'Top'#2#22#5'Width'#3#128#2
-  +#9'PageIndex'#2#3#7'Caption'#6#12'GradTabPage3'#8'TabColor'#7#7'clGreen'#16
-  +'TabTextAlignment'#7#8'taCenter'#0#7'TButton'#7'Button3'#4'Left'#2'c'#6'Heig'
-  +'ht'#2#25#3'Top'#2'G'#5'Width'#2'K'#7'Caption'#6#7'Button3'#8'TabOrder'#2#0#0
-  +#0#0#0#0#6'TPanel'#6'Panel2'#4'Left'#3#134#2#6'Height'#3#234#1#5'Width'#3#238
-  +#0#5'Align'#7#7'alRight'#12'ClientHeight'#3#234#1#11'ClientWidth'#3#238#0#8
-  +'TabOrder'#2#1#0#6'TLabel'#6'Label1'#4'Left'#2#16#6'Height'#2#14#3'Top'#3#160
-  +#0#5'Width'#2'2'#7'Caption'#6#9'TabHeight'#11'ParentColor'#8#0#0#9'TComboBox'
-  +#9'ComboBox1'#4'Left'#2#16#6'Height'#2#21#3'Top'#2#16#5'Width'#2'd'#10'ItemH'
-  +'eight'#2#13#8'OnChange'#7#15'ComboBox1Change'#5'Style'#7#14'csDropDownList'
-  +#8'TabOrder'#2#0#0#0#11'TRadioGroup'#11'RadioGroup1'#4'Left'#3#128#0#6'Heigh'
-  +'t'#2'q'#3'Top'#2#16#5'Width'#2'd'#8'AutoFill'#9#7'Caption'#6#12'Tab Positio'
-  +'n'#28'ChildSizing.LeftRightSpacing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6
-  +#29'ChildSizing.EnlargeHorizontal'#7#24'crsHomogenousChildResize'#27'ChildSi'
-  +'zing.EnlargeVertical'#7#24'crsHomogenousChildResize'#28'ChildSizing.ShrinkH'
-  +'orizontal'#7#14'crsScaleChilds'#26'ChildSizing.ShrinkVertical'#7#14'crsScal'
-  +'eChilds'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'Chil'
-  +'dSizing.ControlsPerLine'#2#1#12'ClientHeight'#2'_'#11'ClientWidth'#2'`'#9'I'
-  +'temIndex'#2#0#13'Items.Strings'#1#6#5'tpTop'#6#8'tpBottom'#6#6'tpLeft'#6#7
-  +'tpRight'#0#7'OnClick'#7#16'RadioGroup1Click'#8'TabOrder'#2#1#0#0#9'TCheckBo'
-  +'x'#9'CheckBox1'#4'Left'#2#16#6'Height'#2#16#3'Top'#2'p'#5'Width'#2'd'#8'Aut'
-  +'oSize'#8#7'Caption'#6#9'Long Tabs'#7'OnClick'#7#14'CheckBox1Click'#8'TabOrd'
-  +'er'#2#2#0#0#11'TGradButton'#10'NewPageBtn'#4'Left'#2#16#6'Height'#2#25#3'To'
-  +'p'#2'0'#5'Width'#2'd'#7'Caption'#6#8'New Page'#10'Font.Color'#7#7'clWhite'#7
-  +'OnClick'#7#15'NewPageBtnClick'#8'TabOrder'#2#3#7'TabStop'#9#11'NormalBlend'
-  +#5#0#0#0#0#0#0#0#128#254'?'#9'OverBlend'#5'5^'#186'I'#12#2'+'#167#254'?'#9'B'
-  +'aseColor'#7#6'clBlue'#5'Color'#7#6'clBlue'#16'NormalBlendColor'#7#7'clWhite'
-  +#14'OverBlendColor'#7#8'clSilver'#15'BackgroundColor'#7#9'clBtnFace'#15'Show'
-  +'FocusBorder'#9#20'GlyphBackgroundColor'#7#7'clWhite'#10'ClickColor'#7#6'clB'
-  ,'lue'#22'AutoWidthBorderSpacing'#2#15#23'AutoHeightBorderSpacing'#2#15#0#0#11
-  +'TGradButton'#9'DeleteBtn'#4'Left'#2#16#6'Height'#2#25#3'Top'#2'P'#5'Width'#2
-  +'d'#7'Caption'#6#6'Delete'#10'Font.Color'#7#7'clWhite'#7'OnClick'#7#14'Delet'
-  +'eBtnClick'#8'TabOrder'#2#4#7'TabStop'#9#11'NormalBlend'#5#0#0#0#0#0#0#0#128
-  +#254'?'#9'OverBlend'#5'5^'#186'I'#12#2'+'#167#254'?'#9'BaseColor'#7#6'clBlue'
-  +#5'Color'#7#6'clBlue'#16'NormalBlendColor'#7#7'clWhite'#14'OverBlendColor'#7
-  +#8'clSilver'#15'BackgroundColor'#7#9'clBtnFace'#15'ShowFocusBorder'#9#20'Gly'
-  +'phBackgroundColor'#7#7'clWhite'#10'ClickColor'#7#6'clBlue'#22'AutoWidthBord'
-  +'erSpacing'#2#15#23'AutoHeightBorderSpacing'#2#15#0#0#9'TSpinEdit'#9'SpinEdi'
-  +'t2'#4'Left'#2#16#6'Height'#2#19#3'Top'#3#176#0#5'Width'#2'd'#13'OnEditingDo'
-  +'ne'#7#20'SpinEdit2EditingDone'#8'TabOrder'#2#5#0#0#5'TEdit'#5'Edit1'#4'Left'
-  +#2#16#6'Height'#2#19#3'Top'#3#136#0#5'Width'#2'H'#8'TabOrder'#2#6#4'Text'#6#5
-  +'Edit1'#0#0#11'TGradButton'#11'GradButton1'#4'Left'#2'Z'#6'Height'#2#19#3'To'
-  +'p'#3#136#0#5'Width'#2#26#7'Caption'#6#3'set'#10'Font.Color'#7#7'clWhite'#7
-  +'OnClick'#7#16'GradButton1Click'#8'TabOrder'#2#7#7'TabStop'#9#11'NormalBlend'
-  +#5#0#0#0#0#0#0#0#128#254'?'#9'OverBlend'#5'5^'#186'I'#12#2'+'#167#254'?'#9'B'
-  +'aseColor'#7#6'clBlue'#5'Color'#7#6'clBlue'#16'NormalBlendColor'#7#7'clWhite'
-  +#14'OverBlendColor'#7#8'clSilver'#15'BackgroundColor'#7#9'clBtnFace'#15'Show'
-  +'FocusBorder'#9#20'GlyphBackgroundColor'#7#7'clWhite'#10'ClickColor'#7#6'clB'
-  +'lue'#22'AutoWidthBorderSpacing'#2#15#23'AutoHeightBorderSpacing'#2#15#0#0#11
-  +'TCheckGroup'#11'CheckGroup1'#4'Left'#3#128#0#6'Height'#2'i'#3'Top'#3#143#0#5
-  +'Width'#2'd'#8'AutoFill'#9#7'Caption'#6#14'Scroll Buttons'#28'ChildSizing.Le'
-  +'ftRightSpacing'#2#6#28'ChildSizing.TopBottomSpacing'#2#6#29'ChildSizing.Enl'
-  +'argeHorizontal'#7#24'crsHomogenousChildResize'#27'ChildSizing.EnlargeVertic'
-  +'al'#7#24'crsHomogenousChildResize'#28'ChildSizing.ShrinkHorizontal'#7#14'cr'
-  +'sScaleChilds'#26'ChildSizing.ShrinkVertical'#7#14'crsScaleChilds'#18'ChildS'
-  +'izing.Layout'#7#29'cclLeftToRightThenTopToBottom'#27'ChildSizing.ControlsPe'
-  +'rLine'#2#1#13'Items.Strings'#1#6#4'Auto'#6#7'LeftTop'#6#11'RightBottom'#0#7
-  +'OnClick'#7#16'CheckGroup1Click'#11'OnItemClick'#7#20'CheckGroup1ItemClick'#8
-  +'TabOrder'#2#8#4'Data'#10#7#0#0#0#3#0#0#0#2#2#2#0#0#0#10'TPopupMenu'#10'Popu'
-  +'pMenu1'#4'left'#3#222#2#3'top'#3#141#1#0#9'TMenuItem'#9'MenuItem1'#7'Captio'
-  +'n'#6#9'New Item1'#0#0#0#10'TImageList'#10'ImageList1'#4'left'#3#144#2#3'top'
-  +#3#141#1#6'Bitmap'#10#14#4#0#0'Li'#1#0#0#0#16#0#0#0#16#0#0#0#0#0'#'#0'{SIfg@'
-  +'4'#148#26#0#0#10'q'#161#162'$:'#159#189#158'1'#159#193#188'.'#159#195#211'+'
-  +#158#196#234'+'#159#195#236'-'#159#195#214'0'#159#195#191'7'#160#192#164'^'
-  +#161#173'1'#0#0'#'#0#0#0'#'#0#0#0#0#9'bB:'#188'R2('#164'z'#164#179'U7'#162
-  +#195#243#24#159#207#255#24#159#207#255#24#159#207#255#24#159#207#255#24#159
-  +#207#255#24#159#207#255#24#159#207#255#24#159#207#255'.'#159#196#247'{'#184
-  +#200'i'#0#0'#'#0#0#0#0#6'6"'#27'&M.(t}'#198#223'lk'#204#235#255'I'#175#207
-  +#255';'#166#201#255'4'#162#197#255'.'#158#195#255'-'#157#194#255'-'#156#191
-  +#255'/'#155#190#255'6'#158#192#255'P'#178#210#255'y'#204#234#130#0#0'#'#0'kR'
-  +'J|pLE'#137'\9-l'#195#218'Ol'#210#245#254'_'#199#235#255'S'#187#223#255'G'
-  +#176#212#255'<'#164#200#255'0'#153#189#255'('#144#180#255')'#145#181#255'4'
-  +#156#192#255'O'#182#218#255#130#205#229'o'#0#0'#'#0'dNF'#128'hH?'#142'U5-~'
-  +#132#197#217'j['#186#217#252'Y'#190#225#255'Y'#185#219#255'P'#177#211#255'<'
-  +#164#200#255'0'#153#189#255'1'#147#181#255'9'#153#187#255'@'#164#199#255'P'
-  +#175#207#253'|'#195#215#135#0#0'#'#0#0#0'#'#0'dF='#150'G,$]{'#196#221'lj'#210
-  +#246#255'`'#189#217#255'O'#176#205#255'J'#170#200#255'L'#168#196#255'I'#164
-  +#193#255'='#154#184#255'6'#151#182#255'@'#157#187#255'N'#182#218#255'z'#204
-  +#233#130#0#0'#'#0#0#0#0#5'bD;'#177'P0('#159't'#157#168'Sl'#205#238#251'_'#199
-  +#235#255'S'#187#223#255'G'#176#212#255'<'#164#200#255'0'#153#189#255'('#144
-  +#180#255')'#144#181#255'4'#156#192#255'U'#182#216#253#130#192#205'l'#0#0'#'#0
-  +#0#0#0#4'pND'#150'lB7'#154'z'#187#206'q]'#184#210#255'P'#178#212#255'I'#179
-  +#216#255'D'#176#212#255'A'#168#205#255'9'#160#196#255'4'#157#194#255'5'#160
-  +#198#255'@'#165#198#255'O'#172#200#255'~'#202#228#134#0#0'#'#0#0#0'#'#0',#'
-  +#26#29'Q2)'#138'p'#177#198'qj'#210#246#255'`'#199#234#255'\'#183#211#255'O'
-  +#171#199#255'B'#161#192#255';'#155#185#255'9'#149#176#255'8'#146#175#255'6'
-  +#156#191#255'N'#182#218#255'{'#206#233#129#0#0'#'#0#0#0#0#4'^A7'#138'e>3w'
-  +#133#184#196'Qi'#196#229#252'`'#199#235#255'S'#187#223#255'G'#176#212#255'<'
-  +#164#200#255'0'#153#189#255'('#144#180#255')'#144#181#255'4'#156#192#255'W'
-  +#181#213#253#135#187#204'w'#0#0'#'#0#0#0#0#7'^?8m_8.it'#183#205'rh'#197#226
+  +'ght'#3#236#1#11'ClientWidth'#3#134#2#8'TabOrder'#2#0#0#15'TGradTabControl'
+  +#15'GradTabControl1'#4'Left'#2#1#6'Height'#3#234#1#3'Top'#2#1#5'Width'#3#132
+  +#2#5'Align'#7#8'alClient'#12'ControlStyle'#11#17'csAcceptsControls'#23'csOwn'
+  +'edChildsSelectable'#0#10'ActivePage'#7#12'GradTabPage2'#20'OnTabButtonMouse'
+  +'Down'#7'!GradTabControl1TabButtonMouseDown'#18'OnTabButtonMouseUp'#7#31'Gra'
+  +'dTabControl1TabButtonMouseUp'#20'OnTabButtonMouseMove'#7'!GradTabControl1Ta'
+  +'bButtonMouseMove'#10'OnDragDrop'#7#23'GradTabControl1DragDrop'#10'OnDragOve'
+  +'r'#7#23'GradTabControl1DragOver'#11'OnMouseDown'#7#24'GradTabControl1MouseD'
+  +'own'#14'OnMouseWheelUp'#7#27'GradTabControl1MouseWheelUp'#16'OnMouseWheelDo'
+  +'wn'#7#29'GradTabControl1MouseWheelDown'#18'OnPagesBarDragOver'#13#9'PageInd'
+  +'ex'#2#1#9'TabHeight'#2#20#13'MoveIncrement'#2#1#13'OnPageChanged'#7#26'Grad'
+  +'TabControl1PageChanged'#6'Images'#7#10'ImageList1'#0#12'TGradTabPage'#12'Gr'
+  +'adTabPage1'#4'Left'#2#2#6'Height'#3#208#1#3'Top'#2#22#5'Width'#3#128#2#7'Ca'
+  +'ption'#6#3'abc'#5'Color'#7#10'clGrayText'#8'TabColor'#7#6'clBlue'#13'TabGly'
+  +'ph.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#16#0#0#0
+  +#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'#0#0#0'd'#0#0#0#0#0#0#0#0#0#0#0'nUN'#141
+  +'pND'#166'h?5'#165#28#14#14#18#134#198#220'-k'#194#225#153'_'#188#221#184'U'
+  +#180#212#210'L'#169#202#232'C'#160#192#234'>'#156#188#213'B'#158#191#188'P'
+  +#168#199#159'y'#185#208';'#0#0'#'#0#0#0'#'#0'fNI'#130'Y=7pmB7pa'#134#150'Dp'
+  +#208#242#246'_'#199#235#255'S'#187#223#255'G'#176#212#255'<'#164#200#255'0'
+  +#153#189#255'('#144#180#255')'#144#181#255'4'#156#192#255'U'#183#217#250#133
+  +#201#225'O'#0#0'#'#0'Q<6&nKB'#142'L-&kv'#187#210'ok'#210#245#255']'#186#213
+  +#255'Q'#175#205#255'R'#172#200#255'J'#168#199#255'E'#163#195#255'F'#159#188
+  +#255'='#153#184#255'@'#158#187#255'O'#181#217#255'z'#205#235#130#0#0'#'#0#0#0
+  +#0#6'X>5|`:0'#181'{'#175#193'm^'#187#219#252'^'#193#227#255'Z'#187#220#255'G'
+  +#176#212#255'<'#164#200#255'0'#153#189#255'('#144#180#255'3'#149#182#255'B'
+  +#162#196#255'T'#177#209#253'~'#192#210#136#0#0'#'#0#0#0'#'#0'iH>'#131'_90'
+  +#142#133#204#230'Zk'#210#246#255'_'#199#235#255'S'#187#223#255'G'#176#212#255
+  +'D'#164#195#255':'#154#183#255'('#144#180#255')'#144#181#255'4'#156#192#255
+  +'N'#182#218#255'}'#204#230'x'#0#0'#'#0#0#0#0#7'^?8m_8.it'#183#205'rh'#197#226
   +#255'U'#176#205#255'N'#175#206#255'J'#171#205#255'C'#169#204#255'='#163#199
   +#255'='#160#193#255'@'#161#193#255'I'#164#195#255'Q'#175#205#255'z'#204#233
-  +#130#0#0'#'#0#0#0'#'#0'iH>'#131'_90'#142#133#204#230'Zk'#210#246#255'_'#199
-  ,#235#255'S'#187#223#255'G'#176#212#255'D'#164#195#255':'#154#183#255'('#144
-  +#180#255')'#144#181#255'4'#156#192#255'N'#182#218#255'}'#204#230'x'#0#0'#'#0
+  +#130#0#0'#'#0#0#0#0#4'^A7'#138'e>3w'#133#184#196'Qi'#196#229#252'`'#199#235
+  +#255'S'#187#223#255'G'#176#212#255'<'#164#200#255'0'#153#189#255'('#144#180
+  +#255')'#144#181#255'4'#156#192#255'W'#181#213#253#135#187#204'w'#0#0'#'#0#0#0
+  +'#'#0',#'#26#29'Q2)'#138'p'#177#198'qj'#210#246#255'`'#199#234#255'\'#183#211
+  +#255'O'#171#199#255'B'#161#192#255';'#155#185#255'9'#149#176#255'8'#146#175
+  +#255'6'#156#191#255'N'#182#218#255'{'#206#233#129#0#0'#'#0#0#0#0#4'pND'#150
+  +'lB7'#154'z'#187#206'q]'#184#210#255'P'#178#212#255'I'#179#216#255'D'#176#212
+  +#255'A'#168#205#255'9'#160#196#255'4'#157#194#255'5'#160#198#255'@'#165#198
+  +#255'O'#172#200#255'~'#202#228#134#0#0'#'#0#0#0#0#5'bD;'#177'P0('#159't'#157
+  +#168'Sl'#205#238#251'_'#199#235#255'S'#187#223#255'G'#176#212#255'<'#164#200
+  +#255'0'#153#189#255'('#144#180#255')'#144#181#255'4'#156#192#255'U'#182#216
+  +#253#130#192#205'l'#0#0'#'#0#0#0'#'#0'dF='#150'G,$]{'#196#221'lj'#210#246#255
+  +'`'#189#217#255'O'#176#205#255'J'#170#200#255'L'#168#196#255'I'#164#193#255
+  +'='#154#184#255'6'#151#182#255'@'#157#187#255'N'#182#218#255'z'#204#233#130#0
+  +#0'#'#0'dNF'#128'hH?'#142'U5-~'#132#197#217'j['#186#217#252'Y'#190#225#255'Y'
+  +#185#219#255'P'#177#211#255'<'#164#200#255'0'#153#189#255'1'#147#181#255'9'
+  +#153#187#255'@'#164#199#255'P'#175#207#253'|'#195#215#135#0#0'#'#0'kRJ|pLE'
+  +#137'\9-l'#195#218'Ol'#210#245#254'_'#199#235#255'S'#187#223#255'G'#176#212
+  +#255'<'#164#200#255'0'#153#189#255'('#144#180#255')'#145#181#255'4'#156#192
+  +#255'O'#182#218#255#130#205#229'o'#0#0'#'#0#0#0#0#6'6"'#27'&M.(t}'#198#223'l'
+  +'k'#204#235#255'I'#175#207#255';'#166#201#255'4'#162#197#255'.'#158#195#255
+  +'-'#157#194#255'-'#156#191#255'/'#155#190#255'6'#158#192#255'P'#178#210#255
+  +'y'#204#234#130#0#0'#'#0#0#0#0#9'bB:'#188'R2('#164'z'#164#179'U7'#162#195#243
+  +#24#159#207#255#24#159#207#255#24#159#207#255#24#159#207#255#24#159#207#255
+  +#24#159#207#255#24#159#207#255#24#159#207#255'.'#159#196#247'{'#184#200'i'#0
+  +#0'#'#0#0#0'#'#0'{SIfg@4'#148#26#0#0#10'q'#161#162'$:'#159#189#158'1'#159#193
+  +#188'.'#159#195#211'+'#158#196#234'+'#159#195#236'-'#159#195#214'0'#159#195
+  ,#191'7'#160#192#164'^'#161#173'1'#0#0'#'#0#0#0'#'#0#0#10'TToggleBox'#10'Togg'
+  +'leBox2'#4'Left'#3'e'#1#6'Height'#2#23#3'Top'#3#155#0#5'Width'#2'Z'#7'Captio'
+  +'n'#6#10'ToggleBox2'#8'TabOrder'#2#0#0#0#0#12'TGradTabPage'#12'GradTabPage4'
+  +#4'Left'#2#2#6'Height'#3#208#1#3'Top'#2#22#5'Width'#3#128#2#9'PageIndex'#2#2
+  +#7'Caption'#6#11#195#164#195#182#195#188'-test'#8'TabColor'#7#6'clBlue'#13'T'
+  +'abGlyph.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4#0#0#0#0#0#0'6'#0#0#0'('#0#0#0#16#0
+  +#0#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'#0#0#0'd'#0#0#0#0#0#0#0#0#0#0#0'nUN'
+  +#141'pND'#166'h?5'#165#28#14#14#18#134#198#220'-k'#194#225#153'_'#188#221#184
+  +'U'#180#212#210'L'#169#202#232'C'#160#192#234'>'#156#188#213'B'#158#191#188
+  +'P'#168#199#159'y'#185#208';'#0#0'#'#0#0#0'#'#0'fNI'#130'Y=7pmB7pa'#134#150
+  +'Dp'#208#242#246'_'#199#235#255'S'#187#223#255'G'#176#212#255'<'#164#200#255
+  +'0'#153#189#255'('#144#180#255')'#144#181#255'4'#156#192#255'U'#183#217#250
+  +#133#201#225'O'#0#0'#'#0'Q<6&nKB'#142'L-&kv'#187#210'ok'#210#245#255']'#186
+  +#213#255'Q'#175#205#255'R'#172#200#255'J'#168#199#255'E'#163#195#255'F'#159
+  +#188#255'='#153#184#255'@'#158#187#255'O'#181#217#255'z'#205#235#130#0#0'#'#0
   +#0#0#0#6'X>5|`:0'#181'{'#175#193'm^'#187#219#252'^'#193#227#255'Z'#187#220
   +#255'G'#176#212#255'<'#164#200#255'0'#153#189#255'('#144#180#255'3'#149#182
-  +#255'B'#162#196#255'T'#177#209#253'~'#192#210#136#0#0'#'#0'Q<6&nKB'#142'L-&k'
-  +'v'#187#210'ok'#210#245#255']'#186#213#255'Q'#175#205#255'R'#172#200#255'J'
-  +#168#199#255'E'#163#195#255'F'#159#188#255'='#153#184#255'@'#158#187#255'O'
-  +#181#217#255'z'#205#235#130#0#0'#'#0'fNI'#130'Y=7pmB7pa'#134#150'Dp'#208#242
-  +#246'_'#199#235#255'S'#187#223#255'G'#176#212#255'<'#164#200#255'0'#153#189
-  +#255'('#144#180#255')'#144#181#255'4'#156#192#255'U'#183#217#250#133#201#225
-  +'O'#0#0'#'#0'nUN'#141'pND'#166'h?5'#165#28#14#14#18#134#198#220'-k'#194#225
-  +#153'_'#188#221#184'U'#180#212#210'L'#169#202#232'C'#160#192#234'>'#156#188
-  +#213'B'#158#191#188'P'#168#199#159'y'#185#208';'#0#0'#'#0#0#0'#'#0#0#0#0
+  +#255'B'#162#196#255'T'#177#209#253'~'#192#210#136#0#0'#'#0#0#0'#'#0'iH>'#131
+  +'_90'#142#133#204#230'Zk'#210#246#255'_'#199#235#255'S'#187#223#255'G'#176
+  +#212#255'D'#164#195#255':'#154#183#255'('#144#180#255')'#144#181#255'4'#156
+  +#192#255'N'#182#218#255'}'#204#230'x'#0#0'#'#0#0#0#0#7'^?8m_8.it'#183#205'rh'
+  +#197#226#255'U'#176#205#255'N'#175#206#255'J'#171#205#255'C'#169#204#255'='
+  +#163#199#255'='#160#193#255'@'#161#193#255'I'#164#195#255'Q'#175#205#255'z'
+  +#204#233#130#0#0'#'#0#0#0#0#4'^A7'#138'e>3w'#133#184#196'Qi'#196#229#252'`'
+  +#199#235#255'S'#187#223#255'G'#176#212#255'<'#164#200#255'0'#153#189#255'('
+  +#144#180#255')'#144#181#255'4'#156#192#255'W'#181#213#253#135#187#204'w'#0#0
+  +'#'#0#0#0'#'#0',#'#26#29'Q2)'#138'p'#177#198'qj'#210#246#255'`'#199#234#255
+  +'\'#183#211#255'O'#171#199#255'B'#161#192#255';'#155#185#255'9'#149#176#255
+  +'8'#146#175#255'6'#156#191#255'N'#182#218#255'{'#206#233#129#0#0'#'#0#0#0#0#4
+  +'pND'#150'lB7'#154'z'#187#206'q]'#184#210#255'P'#178#212#255'I'#179#216#255
+  +'D'#176#212#255'A'#168#205#255'9'#160#196#255'4'#157#194#255'5'#160#198#255
+  +'@'#165#198#255'O'#172#200#255'~'#202#228#134#0#0'#'#0#0#0#0#5'bD;'#177'P0('
+  +#159't'#157#168'Sl'#205#238#251'_'#199#235#255'S'#187#223#255'G'#176#212#255
+  +'<'#164#200#255'0'#153#189#255'('#144#180#255')'#144#181#255'4'#156#192#255
+  +'U'#182#216#253#130#192#205'l'#0#0'#'#0#0#0'#'#0'dF='#150'G,$]{'#196#221'lj'
+  +#210#246#255'`'#189#217#255'O'#176#205#255'J'#170#200#255'L'#168#196#255'I'
+  +#164#193#255'='#154#184#255'6'#151#182#255'@'#157#187#255'N'#182#218#255'z'
+  +#204#233#130#0#0'#'#0'dNF'#128'hH?'#142'U5-~'#132#197#217'j['#186#217#252'Y'
+  +#190#225#255'Y'#185#219#255'P'#177#211#255'<'#164#200#255'0'#153#189#255'1'
+  +#147#181#255'9'#153#187#255'@'#164#199#255'P'#175#207#253'|'#195#215#135#0#0
+  +'#'#0'kRJ|pLE'#137'\9-l'#195#218'Ol'#210#245#254'_'#199#235#255'S'#187#223
+  +#255'G'#176#212#255'<'#164#200#255'0'#153#189#255'('#144#180#255')'#145#181
+  +#255'4'#156#192#255'O'#182#218#255#130#205#229'o'#0#0'#'#0#0#0#0#6'6"'#27'&M'
+  +'.(t}'#198#223'lk'#204#235#255'I'#175#207#255';'#166#201#255'4'#162#197#255
+  +'.'#158#195#255'-'#157#194#255'-'#156#191#255'/'#155#190#255'6'#158#192#255
+  +'P'#178#210#255'y'#204#234#130#0#0'#'#0#0#0#0#9'bB:'#188'R2('#164'z'#164#179
+  +'U7'#162#195#243#24#159#207#255#24#159#207#255#24#159#207#255#24#159#207#255
+  +#24#159#207#255#24#159#207#255#24#159#207#255#24#159#207#255'.'#159#196#247
+  +'{'#184#200'i'#0#0'#'#0#0#0'#'#0'{SIfg@4'#148#26#0#0#10'q'#161#162'$:'#159
+  +#189#158'1'#159#193#188'.'#159#195#211'+'#158#196#234'+'#159#195#236'-'#159
+  +#195#214'0'#159#195#191'7'#160#192#164'^'#161#173'1'#0#0'#'#0#0#0'#'#0#0#0#12
+  +'TGradTabPage'#12'GradTabPage3'#4'Left'#2#2#6'Height'#3#210#1#3'Top'#2#22#5
+  +'Width'#3#128#2#9'PageIndex'#2#3#7'Caption'#6#12'GradTabPage3'#8'TabColor'#7
+  +#6'clBlue'#13'TabGlyph.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4#0#0#0#0#0#0'6'#0#0#0
+  +'('#0#0#0#16#0#0#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'#0#0#0'd'#0#0#0#0#0#0
+  +#0#0#0#0#0'nUN'#141'pND'#166'h?5'#165#28#14#14#18#134#198#220'-k'#194#225#153
+  +'_'#188#221#184'U'#180#212#210'L'#169#202#232'C'#160#192#234'>'#156#188#213
+  +'B'#158#191#188'P'#168#199#159'y'#185#208';'#0#0'#'#0#0#0'#'#0'fNI'#130'Y=7p'
+  +'mB7pa'#134#150'Dp'#208#242#246'_'#199#235#255'S'#187#223#255'G'#176#212#255
+  +'<'#164#200#255'0'#153#189#255'('#144#180#255')'#144#181#255'4'#156#192#255
+  +'U'#183#217#250#133#201#225'O'#0#0'#'#0'Q<6&nKB'#142'L-&kv'#187#210'ok'#210
+  +#245#255']'#186#213#255'Q'#175#205#255'R'#172#200#255'J'#168#199#255'E'#163
+  +#195#255'F'#159#188#255'='#153#184#255'@'#158#187#255'O'#181#217#255'z'#205
+  +#235#130#0#0'#'#0#0#0#0#6'X>5|`:0'#181'{'#175#193'm^'#187#219#252'^'#193#227
+  ,#255'Z'#187#220#255'G'#176#212#255'<'#164#200#255'0'#153#189#255'('#144#180
+  +#255'3'#149#182#255'B'#162#196#255'T'#177#209#253'~'#192#210#136#0#0'#'#0#0#0
+  +'#'#0'iH>'#131'_90'#142#133#204#230'Zk'#210#246#255'_'#199#235#255'S'#187#223
+  +#255'G'#176#212#255'D'#164#195#255':'#154#183#255'('#144#180#255')'#144#181
+  +#255'4'#156#192#255'N'#182#218#255'}'#204#230'x'#0#0'#'#0#0#0#0#7'^?8m_8.it'
+  +#183#205'rh'#197#226#255'U'#176#205#255'N'#175#206#255'J'#171#205#255'C'#169
+  +#204#255'='#163#199#255'='#160#193#255'@'#161#193#255'I'#164#195#255'Q'#175
+  +#205#255'z'#204#233#130#0#0'#'#0#0#0#0#4'^A7'#138'e>3w'#133#184#196'Qi'#196
+  +#229#252'`'#199#235#255'S'#187#223#255'G'#176#212#255'<'#164#200#255'0'#153
+  +#189#255'('#144#180#255')'#144#181#255'4'#156#192#255'W'#181#213#253#135#187
+  +#204'w'#0#0'#'#0#0#0'#'#0',#'#26#29'Q2)'#138'p'#177#198'qj'#210#246#255'`'
+  +#199#234#255'\'#183#211#255'O'#171#199#255'B'#161#192#255';'#155#185#255'9'
+  +#149#176#255'8'#146#175#255'6'#156#191#255'N'#182#218#255'{'#206#233#129#0#0
+  +'#'#0#0#0#0#4'pND'#150'lB7'#154'z'#187#206'q]'#184#210#255'P'#178#212#255'I'
+  +#179#216#255'D'#176#212#255'A'#168#205#255'9'#160#196#255'4'#157#194#255'5'
+  +#160#198#255'@'#165#198#255'O'#172#200#255'~'#202#228#134#0#0'#'#0#0#0#0#5'b'
+  +'D;'#177'P0('#159't'#157#168'Sl'#205#238#251'_'#199#235#255'S'#187#223#255'G'
+  +#176#212#255'<'#164#200#255'0'#153#189#255'('#144#180#255')'#144#181#255'4'
+  +#156#192#255'U'#182#216#253#130#192#205'l'#0#0'#'#0#0#0'#'#0'dF='#150'G,$]{'
+  +#196#221'lj'#210#246#255'`'#189#217#255'O'#176#205#255'J'#170#200#255'L'#168
+  +#196#255'I'#164#193#255'='#154#184#255'6'#151#182#255'@'#157#187#255'N'#182
+  +#218#255'z'#204#233#130#0#0'#'#0'dNF'#128'hH?'#142'U5-~'#132#197#217'j['#186
+  +#217#252'Y'#190#225#255'Y'#185#219#255'P'#177#211#255'<'#164#200#255'0'#153
+  +#189#255'1'#147#181#255'9'#153#187#255'@'#164#199#255'P'#175#207#253'|'#195
+  +#215#135#0#0'#'#0'kRJ|pLE'#137'\9-l'#195#218'Ol'#210#245#254'_'#199#235#255
+  +'S'#187#223#255'G'#176#212#255'<'#164#200#255'0'#153#189#255'('#144#180#255
+  +')'#145#181#255'4'#156#192#255'O'#182#218#255#130#205#229'o'#0#0'#'#0#0#0#0#6
+  +'6"'#27'&M.(t}'#198#223'lk'#204#235#255'I'#175#207#255';'#166#201#255'4'#162
+  +#197#255'.'#158#195#255'-'#157#194#255'-'#156#191#255'/'#155#190#255'6'#158
+  +#192#255'P'#178#210#255'y'#204#234#130#0#0'#'#0#0#0#0#9'bB:'#188'R2('#164'z'
+  +#164#179'U7'#162#195#243#24#159#207#255#24#159#207#255#24#159#207#255#24#159
+  +#207#255#24#159#207#255#24#159#207#255#24#159#207#255#24#159#207#255'.'#159
+  +#196#247'{'#184#200'i'#0#0'#'#0#0#0'#'#0'{SIfg@4'#148#26#0#0#10'q'#161#162'$'
+  +':'#159#189#158'1'#159#193#188'.'#159#195#211'+'#158#196#234'+'#159#195#236
+  +'-'#159#195#214'0'#159#195#191'7'#160#192#164'^'#161#173'1'#0#0'#'#0#0#0'#'#0
+  +#0#7'TButton'#7'Button3'#4'Left'#2'c'#6'Height'#2#25#3'Top'#2'G'#5'Width'#2
+  +'K'#7'Caption'#6#7'Button3'#8'TabOrder'#2#0#0#0#0#12'TGradTabPage'#12'GradTa'
+  +'bPage2'#4'Left'#2#2#6'Height'#3#210#1#3'Top'#2#22#5'Width'#3#128#2#9'PageIn'
+  +'dex'#2#1#7'Caption'#6#12'GradTabPage2'#12'TabPopupMenu'#7#10'PopupMenu1'#8
+  +'TabColor'#7#7'clGreen'#13'TabGlyph.Data'#10':'#4#0#0'6'#4#0#0'BM6'#4#0#0#0#0
+  +#0#0'6'#0#0#0'('#0#0#0#16#0#0#0#16#0#0#0#1#0' '#0#0#0#0#0#0#4#0#0'd'#0#0#0'd'
+  +#0#0#0#0#0#0#0#0#0#0#0'nUN'#141'pND'#166'h?5'#165#28#14#14#18#134#198#220'-k'
+  +#194#225#153'_'#188#221#184'U'#180#212#210'L'#169#202#232'C'#160#192#234'>'
+  +#156#188#213'B'#158#191#188'P'#168#199#159'y'#185#208';'#0#0'#'#0#0#0'#'#0'f'
+  +'NI'#130'Y=7pmB7pa'#134#150'Dp'#208#242#246'_'#199#235#255'S'#187#223#255'G'
+  +#176#212#255'<'#164#200#255'0'#153#189#255'('#144#180#255')'#144#181#255'4'
+  +#156#192#255'U'#183#217#250#133#201#225'O'#0#0'#'#0'Q<6&nKB'#142'L-&kv'#187
+  +#210'ok'#210#245#255']'#186#213#255'Q'#175#205#255'R'#172#200#255'J'#168#199
+  +#255'E'#163#195#255'F'#159#188#255'='#153#184#255'@'#158#187#255'O'#181#217
+  +#255'z'#205#235#130#0#0'#'#0#0#0#0#6'X>5|`:0'#181'{'#175#193'm^'#187#219#252
+  +'^'#193#227#255'Z'#187#220#255'G'#176#212#255'<'#164#200#255'0'#153#189#255
+  +'('#144#180#255'3'#149#182#255'B'#162#196#255'T'#177#209#253'~'#192#210#136#0
+  +#0'#'#0#0#0'#'#0'iH>'#131'_90'#142#133#204#230'Zk'#210#246#255'_'#199#235#255
+  +'S'#187#223#255'G'#176#212#255'D'#164#195#255':'#154#183#255'('#144#180#255
+  +')'#144#181#255'4'#156#192#255'N'#182#218#255'}'#204#230'x'#0#0'#'#0#0#0#0#7
+  +'^?8m_8.it'#183#205'rh'#197#226#255'U'#176#205#255'N'#175#206#255'J'#171#205
+  +#255'C'#169#204#255'='#163#199#255'='#160#193#255'@'#161#193#255'I'#164#195
+  +#255'Q'#175#205#255'z'#204#233#130#0#0'#'#0#0#0#0#4'^A7'#138'e>3w'#133#184
+  +#196'Qi'#196#229#252'`'#199#235#255'S'#187#223#255'G'#176#212#255'<'#164#200
+  +#255'0'#153#189#255'('#144#180#255')'#144#181#255'4'#156#192#255'W'#181#213
+  +#253#135#187#204'w'#0#0'#'#0#0#0'#'#0',#'#26#29'Q2)'#138'p'#177#198'qj'#210
+  +#246#255'`'#199#234#255'\'#183#211#255'O'#171#199#255'B'#161#192#255';'#155
+  +#185#255'9'#149#176#255'8'#146#175#255'6'#156#191#255'N'#182#218#255'{'#206
+  +#233#129#0#0'#'#0#0#0#0#4'pND'#150'lB7'#154'z'#187#206'q]'#184#210#255'P'#178
+  ,#212#255'I'#179#216#255'D'#176#212#255'A'#168#205#255'9'#160#196#255'4'#157
+  +#194#255'5'#160#198#255'@'#165#198#255'O'#172#200#255'~'#202#228#134#0#0'#'#0
+  +#0#0#0#5'bD;'#177'P0('#159't'#157#168'Sl'#205#238#251'_'#199#235#255'S'#187
+  +#223#255'G'#176#212#255'<'#164#200#255'0'#153#189#255'('#144#180#255')'#144
+  +#181#255'4'#156#192#255'U'#182#216#253#130#192#205'l'#0#0'#'#0#0#0'#'#0'dF='
+  +#150'G,$]{'#196#221'lj'#210#246#255'`'#189#217#255'O'#176#205#255'J'#170#200
+  +#255'L'#168#196#255'I'#164#193#255'='#154#184#255'6'#151#182#255'@'#157#187
+  +#255'N'#182#218#255'z'#204#233#130#0#0'#'#0'dNF'#128'hH?'#142'U5-~'#132#197
+  +#217'j['#186#217#252'Y'#190#225#255'Y'#185#219#255'P'#177#211#255'<'#164#200
+  +#255'0'#153#189#255'1'#147#181#255'9'#153#187#255'@'#164#199#255'P'#175#207
+  +#253'|'#195#215#135#0#0'#'#0'kRJ|pLE'#137'\9-l'#195#218'Ol'#210#245#254'_'
+  +#199#235#255'S'#187#223#255'G'#176#212#255'<'#164#200#255'0'#153#189#255'('
+  +#144#180#255')'#145#181#255'4'#156#192#255'O'#182#218#255#130#205#229'o'#0#0
+  +'#'#0#0#0#0#6'6"'#27'&M.(t}'#198#223'lk'#204#235#255'I'#175#207#255';'#166
+  +#201#255'4'#162#197#255'.'#158#195#255'-'#157#194#255'-'#156#191#255'/'#155
+  +#190#255'6'#158#192#255'P'#178#210#255'y'#204#234#130#0#0'#'#0#0#0#0#9'bB:'
+  +#188'R2('#164'z'#164#179'U7'#162#195#243#24#159#207#255#24#159#207#255#24#159
+  +#207#255#24#159#207#255#24#159#207#255#24#159#207#255#24#159#207#255#24#159
+  +#207#255'.'#159#196#247'{'#184#200'i'#0#0'#'#0#0#0'#'#0'{SIfg@4'#148#26#0#0
+  +#10'q'#161#162'$:'#159#189#158'1'#159#193#188'.'#159#195#211'+'#158#196#234
+  +'+'#159#195#236'-'#159#195#214'0'#159#195#191'7'#160#192#164'^'#161#173'1'#0
+  +#0'#'#0#0#0'#'#0#12'TabShowGlyph'#9#0#12'TPageControl'#12'PageControl1'#4'Le'
+  +'ft'#3#173#0#6'Height'#3#200#0#3'Top'#2'9'#5'Width'#3#200#0#10'ActivePage'#7
+  +#9'TabSheet3'#8'TabIndex'#2#2#8'TabOrder'#2#0#10'OnDragDrop'#7#20'PageContro'
+  +'l1DragDrop'#10'OnDragOver'#7#20'PageControl1DragOver'#0#9'TTabSheet'#9'TabS'
+  +'heet1'#7'Caption'#6#9'TabSheet1'#0#0#9'TTabSheet'#9'TabSheet2'#7'Caption'#6
+  +#9'TabSheet2'#0#0#9'TTabSheet'#9'TabSheet3'#7'Caption'#6#9'TabSheet3'#0#0#0#7
+  +'TButton'#7'Button2'#4'Left'#2'/'#6'Height'#2#25#3'Top'#2#28#5'Width'#2'K'#7
+  +'Caption'#6#7'Button2'#8'TabOrder'#2#1#0#0#6'TPanel'#6'Panel3'#4'Left'#3#173
+  +#1#6'Height'#2'2'#3'Top'#2'Y'#5'Width'#3#170#0#7'Caption'#6#6'Panel3'#8'TabO'
+  +'rder'#2#2#0#0#0#0#0#6'TPanel'#6'Panel2'#4'Left'#3#134#2#6'Height'#3#236#1#5
+  +'Width'#3#238#0#5'Align'#7#7'alRight'#12'ClientHeight'#3#236#1#11'ClientWidt'
+  +'h'#3#238#0#8'TabOrder'#2#1#0#6'TLabel'#6'Label1'#4'Left'#2#16#6'Height'#2#14
+  +#3'Top'#3#160#0#5'Width'#2'2'#7'Caption'#6#9'TabHeight'#11'ParentColor'#8#0#0
+  +#9'TComboBox'#9'ComboBox1'#4'Left'#2#16#6'Height'#2#21#3'Top'#2#16#5'Width'#2
+  +'d'#10'ItemHeight'#2#13#9'MaxLength'#2#255#8'OnChange'#7#15'ComboBox1Change'
+  +#5'Style'#7#14'csDropDownList'#8'TabOrder'#2#0#0#0#11'TRadioGroup'#11'RadioG'
+  +'roup1'#4'Left'#3#128#0#6'Height'#2'q'#3'Top'#2#16#5'Width'#2'd'#8'AutoFill'
+  +#9#7'Caption'#6#12'Tab Position'#28'ChildSizing.LeftRightSpacing'#2#6#28'Chi'
+  +'ldSizing.TopBottomSpacing'#2#6#29'ChildSizing.EnlargeHorizontal'#7#24'crsHo'
+  +'mogenousChildResize'#27'ChildSizing.EnlargeVertical'#7#24'crsHomogenousChil'
+  +'dResize'#28'ChildSizing.ShrinkHorizontal'#7#14'crsScaleChilds'#26'ChildSizi'
+  +'ng.ShrinkVertical'#7#14'crsScaleChilds'#18'ChildSizing.Layout'#7#29'cclLeft'
+  +'ToRightThenTopToBottom'#27'ChildSizing.ControlsPerLine'#2#1#12'ClientHeight'
+  +#2'_'#11'ClientWidth'#2'`'#9'ItemIndex'#2#0#13'Items.Strings'#1#6#5'tpTop'#6
+  +#8'tpBottom'#6#6'tpLeft'#6#7'tpRight'#0#7'OnClick'#7#16'RadioGroup1Click'#8
+  +'TabOrder'#2#1#0#0#9'TCheckBox'#9'CheckBox1'#4'Left'#2#16#6'Height'#2#16#3'T'
+  +'op'#2'p'#5'Width'#2'd'#8'AutoSize'#8#7'Caption'#6#9'Long Tabs'#7'OnClick'#7
+  +#14'CheckBox1Click'#8'TabOrder'#2#2#0#0#11'TGradButton'#10'NewPageBtn'#4'Lef'
+  +'t'#2#16#6'Height'#2#25#3'Top'#2'0'#5'Width'#2'd'#7'Caption'#6#8'New Page'#10
+  +'Font.Color'#7#7'clWhite'#7'OnClick'#7#15'NewPageBtnClick'#8'TabOrder'#2#3#7
+  +'TabStop'#9#11'NormalBlend'#5#0#0#0#0#0#0#0#128#254'?'#9'OverBlend'#5'5^'#186
+  +'I'#12#2'+'#167#254'?'#9'BaseColor'#7#6'clBlue'#5'Color'#7#6'clBlue'#16'Norm'
+  +'alBlendColor'#7#7'clWhite'#14'OverBlendColor'#7#8'clSilver'#15'BackgroundCo'
+  +'lor'#7#9'clBtnFace'#15'ShowFocusBorder'#9#20'GlyphBackgroundColor'#7#7'clWh'
+  +'ite'#10'ClickColor'#7#6'clBlue'#22'AutoWidthBorderSpacing'#2#15#23'AutoHeig'
+  +'htBorderSpacing'#2#15#0#0#11'TGradButton'#9'DeleteBtn'#4'Left'#2#16#6'Heigh'
+  +'t'#2#25#3'Top'#2'P'#5'Width'#2'd'#7'Caption'#6#6'Delete'#10'Font.Color'#7#7
+  +'clWhite'#7'OnClick'#7#14'DeleteBtnClick'#8'TabOrder'#2#4#7'TabStop'#9#11'No'
+  +'rmalBlend'#5#0#0#0#0#0#0#0#128#254'?'#9'OverBlend'#5'5^'#186'I'#12#2'+'#167
+  +#254'?'#9'BaseColor'#7#6'clBlue'#5'Color'#7#6'clBlue'#16'NormalBlendColor'#7
+  +#7'clWhite'#14'OverBlendColor'#7#8'clSilver'#15'BackgroundColor'#7#9'clBtnFa'
+  +'ce'#15'ShowFocusBorder'#9#20'GlyphBackgroundColor'#7#7'clWhite'#10'ClickCol'
+  +'or'#7#6'clBlue'#22'AutoWidthBorderSpacing'#2#15#23'AutoHeightBorderSpacing'
+  ,#2#15#0#0#9'TSpinEdit'#9'SpinEdit2'#4'Left'#2#16#6'Height'#2#19#3'Top'#3#176
+  +#0#5'Width'#2'd'#13'OnEditingDone'#7#20'SpinEdit2EditingDone'#8'TabOrder'#2#5
+  +#0#0#5'TEdit'#5'Edit1'#4'Left'#2#16#6'Height'#2#19#3'Top'#3#136#0#5'Width'#2
+  +'H'#8'TabOrder'#2#6#4'Text'#6#5'Edit1'#0#0#11'TGradButton'#11'GradButton1'#4
+  +'Left'#2'Z'#6'Height'#2#19#3'Top'#3#136#0#5'Width'#2#26#7'Caption'#6#3'set'
+  +#10'Font.Color'#7#7'clWhite'#7'OnClick'#7#16'GradButton1Click'#8'TabOrder'#2
+  +#7#7'TabStop'#9#11'NormalBlend'#5#0#0#0#0#0#0#0#128#254'?'#9'OverBlend'#5'5^'
+  +#186'I'#12#2'+'#167#254'?'#9'BaseColor'#7#6'clBlue'#5'Color'#7#6'clBlue'#16
+  +'NormalBlendColor'#7#7'clWhite'#14'OverBlendColor'#7#8'clSilver'#15'Backgrou'
+  +'ndColor'#7#9'clBtnFace'#15'ShowFocusBorder'#9#20'GlyphBackgroundColor'#7#7
+  +'clWhite'#10'ClickColor'#7#6'clBlue'#22'AutoWidthBorderSpacing'#2#15#23'Auto'
+  +'HeightBorderSpacing'#2#15#0#0#11'TCheckGroup'#11'CheckGroup1'#4'Left'#3#128
+  +#0#6'Height'#2'i'#3'Top'#3#143#0#5'Width'#2'd'#8'AutoFill'#9#7'Caption'#6#14
+  +'Scroll Buttons'#28'ChildSizing.LeftRightSpacing'#2#6#28'ChildSizing.TopBott'
+  +'omSpacing'#2#6#29'ChildSizing.EnlargeHorizontal'#7#24'crsHomogenousChildRes'
+  +'ize'#27'ChildSizing.EnlargeVertical'#7#24'crsHomogenousChildResize'#28'Chil'
+  +'dSizing.ShrinkHorizontal'#7#14'crsScaleChilds'#26'ChildSizing.ShrinkVertica'
+  +'l'#7#14'crsScaleChilds'#18'ChildSizing.Layout'#7#29'cclLeftToRightThenTopTo'
+  +'Bottom'#27'ChildSizing.ControlsPerLine'#2#1#13'Items.Strings'#1#6#4'Auto'#6
+  +#7'LeftTop'#6#11'RightBottom'#0#7'OnClick'#7#16'CheckGroup1Click'#11'OnItemC'
+  +'lick'#7#20'CheckGroup1ItemClick'#8'TabOrder'#2#8#4'Data'#10#7#0#0#0#3#0#0#0
+  +#3#2#2#0#0#0#10'TPopupMenu'#10'PopupMenu1'#4'left'#3#222#2#3'top'#3#141#1#0#9
+  +'TMenuItem'#9'MenuItem1'#7'Caption'#6#9'New Item1'#0#0#0#10'TImageList'#10'I'
+  +'mageList1'#8'OnChange'#13#4'left'#3#144#2#3'top'#3#141#1#6'Bitmap'#10#14#4#0
+  +#0'Li'#1#0#0#0#16#0#0#0#16#0#0#0#0#0'#'#0'{SIfg@4'#148#26#0#0#10'q'#161#162
+  +'$:'#159#189#158'1'#159#193#188'.'#159#195#211'+'#158#196#234'+'#159#195#236
+  +'-'#159#195#214'0'#159#195#191'7'#160#192#164'^'#161#173'1'#0#0'#'#0#0#0'#'#0
+  +#0#0#0#9'bB:'#188'R2('#164'z'#164#179'U7'#162#195#243#24#159#207#255#24#159
+  +#207#255#24#159#207#255#24#159#207#255#24#159#207#255#24#159#207#255#24#159
+  +#207#255#24#159#207#255'.'#159#196#247'{'#184#200'i'#0#0'#'#0#0#0#0#6'6"'#27
+  +'&M.(t}'#198#223'lk'#204#235#255'I'#175#207#255';'#166#201#255'4'#162#197#255
+  +'.'#158#195#255'-'#157#194#255'-'#156#191#255'/'#155#190#255'6'#158#192#255
+  +'P'#178#210#255'y'#204#234#130#0#0'#'#0'kRJ|pLE'#137'\9-l'#195#218'Ol'#210
+  +#245#254'_'#199#235#255'S'#187#223#255'G'#176#212#255'<'#164#200#255'0'#153
+  +#189#255'('#144#180#255')'#145#181#255'4'#156#192#255'O'#182#218#255#130#205
+  +#229'o'#0#0'#'#0'dNF'#128'hH?'#142'U5-~'#132#197#217'j['#186#217#252'Y'#190
+  +#225#255'Y'#185#219#255'P'#177#211#255'<'#164#200#255'0'#153#189#255'1'#147
+  +#181#255'9'#153#187#255'@'#164#199#255'P'#175#207#253'|'#195#215#135#0#0'#'#0
+  +#0#0'#'#0'dF='#150'G,$]{'#196#221'lj'#210#246#255'`'#189#217#255'O'#176#205
+  +#255'J'#170#200#255'L'#168#196#255'I'#164#193#255'='#154#184#255'6'#151#182
+  +#255'@'#157#187#255'N'#182#218#255'z'#204#233#130#0#0'#'#0#0#0#0#5'bD;'#177
+  +'P0('#159't'#157#168'Sl'#205#238#251'_'#199#235#255'S'#187#223#255'G'#176#212
+  +#255'<'#164#200#255'0'#153#189#255'('#144#180#255')'#144#181#255'4'#156#192
+  +#255'U'#182#216#253#130#192#205'l'#0#0'#'#0#0#0#0#4'pND'#150'lB7'#154'z'#187
+  +#206'q]'#184#210#255'P'#178#212#255'I'#179#216#255'D'#176#212#255'A'#168#205
+  +#255'9'#160#196#255'4'#157#194#255'5'#160#198#255'@'#165#198#255'O'#172#200
+  +#255'~'#202#228#134#0#0'#'#0#0#0'#'#0',#'#26#29'Q2)'#138'p'#177#198'qj'#210
+  +#246#255'`'#199#234#255'\'#183#211#255'O'#171#199#255'B'#161#192#255';'#155
+  +#185#255'9'#149#176#255'8'#146#175#255'6'#156#191#255'N'#182#218#255'{'#206
+  +#233#129#0#0'#'#0#0#0#0#4'^A7'#138'e>3w'#133#184#196'Qi'#196#229#252'`'#199
+  +#235#255'S'#187#223#255'G'#176#212#255'<'#164#200#255'0'#153#189#255'('#144
+  +#180#255')'#144#181#255'4'#156#192#255'W'#181#213#253#135#187#204'w'#0#0'#'#0
+  +#0#0#0#7'^?8m_8.it'#183#205'rh'#197#226#255'U'#176#205#255'N'#175#206#255'J'
+  +#171#205#255'C'#169#204#255'='#163#199#255'='#160#193#255'@'#161#193#255'I'
+  +#164#195#255'Q'#175#205#255'z'#204#233#130#0#0'#'#0#0#0'#'#0'iH>'#131'_90'
+  +#142#133#204#230'Zk'#210#246#255'_'#199#235#255'S'#187#223#255'G'#176#212#255
+  +'D'#164#195#255':'#154#183#255'('#144#180#255')'#144#181#255'4'#156#192#255
+  +'N'#182#218#255'}'#204#230'x'#0#0'#'#0#0#0#0#6'X>5|`:0'#181'{'#175#193'm^'
+  +#187#219#252'^'#193#227#255'Z'#187#220#255'G'#176#212#255'<'#164#200#255'0'
+  +#153#189#255'('#144#180#255'3'#149#182#255'B'#162#196#255'T'#177#209#253'~'
+  +#192#210#136#0#0'#'#0'Q<6&nKB'#142'L-&kv'#187#210'ok'#210#245#255']'#186#213
+  +#255'Q'#175#205#255'R'#172#200#255'J'#168#199#255'E'#163#195#255'F'#159#188
+  +#255'='#153#184#255'@'#158#187#255'O'#181#217#255'z'#205#235#130#0#0'#'#0'fN'
+  +'I'#130'Y=7pmB7pa'#134#150'Dp'#208#242#246'_'#199#235#255'S'#187#223#255'G'
+  ,#176#212#255'<'#164#200#255'0'#153#189#255'('#144#180#255')'#144#181#255'4'
+  +#156#192#255'U'#183#217#250#133#201#225'O'#0#0'#'#0'nUN'#141'pND'#166'h?5'
+  +#165#28#14#14#18#134#198#220'-k'#194#225#153'_'#188#221#184'U'#180#212#210'L'
+  +#169#202#232'C'#160#192#234'>'#156#188#213'B'#158#191#188'P'#168#199#159'y'
+  +#185#208';'#0#0'#'#0#0#0'#'#0#0#0#0
 ]);
diff --git a/components/gradcontrols/examples/Forms/unit1.pas b/components/gradcontrols/examples/Forms/unit1.pas
index f3c849116..13effc5a2 100644
--- a/components/gradcontrols/examples/Forms/unit1.pas
+++ b/components/gradcontrols/examples/Forms/unit1.pas
@@ -101,9 +101,9 @@ begin
   SpinEdit2.Value:=GradTabControl1.TabHeight;
 
   GradTabControl1.Images := ImageList1;
-  {GradTabControl1.Page[0].ImageIndex:=0;
+  GradTabControl1.Page[0].ImageIndex:=0;
   GradTabControl1.Page[0].TabButton.ShowGlyph:=true;
-  GradTabControl1.PagesBar.MoveToNext; }
+  //GradTabControl1.PagesBar.MoveToNext;
 
   ComboBox1.Items.Assign(GradTabControl1.Tabs);
 end;
diff --git a/components/gradcontrols/examples/gradcontroltest.lpi b/components/gradcontrols/examples/gradcontroltest.lpi
index 4d43c8980..c7ea4d68f 100644
--- a/components/gradcontrols/examples/gradcontroltest.lpi
+++ b/components/gradcontrols/examples/gradcontroltest.lpi
@@ -13,7 +13,7 @@
     <VersionInfo>
       <UseVersionInfo Value="True"/>
       <AutoIncrementBuild Value="True"/>
-      <CurrentBuildNr Value="994"/>
+      <CurrentBuildNr Value="1038"/>
       <ProjectVersion Value="0.0.0.0"/>
     </VersionInfo>
     <PublishOptions>
diff --git a/components/gradcontrols/src/ugradbtn.pas b/components/gradcontrols/src/ugradbtn.pas
index d42b0f06e..c06ad5694 100644
--- a/components/gradcontrols/src/ugradbtn.pas
+++ b/components/gradcontrols/src/ugradbtn.pas
@@ -36,7 +36,6 @@ type
       FAutoHeight: Boolean;
       FAutoHeightBorderSpacing: Integer;
        FAutoWidthBorderSpacing: Integer;
-       FOnMouseMove: TMouseMoveEvent;
        FRotateDirection : TRotateDirection;
        FTextAlignment : TTextAlignment;
        FButtonLayout: TButtonLayout;
@@ -132,7 +131,7 @@ type
        property OnMouseDown;
        property OnMouseEnter;
        property OnMouseLeave;
-       property OnMouseMove: TMouseMoveEvent read FOnMouseMove write FOnMouseMove;
+       property OnMouseMove;
        property OnMouseUp;
        property OnPaint;
        property OnResize;
@@ -176,7 +175,6 @@ type
        property OnDisabledBackgroundPaint : TGBBackgroundPaintEvent read FOnDisabledBackgroundPaint write FOnDisabledBackgroundPaint;
     end;
 
-    function Max(a,b: Integer) : Integer;
     function ColorBetween(C1, C2 : TColor; blend:Extended):TColor;
     function ColorsBetween(colors:array of TColor; blend:Extended):TColor;
     function AlignItem(ItemLength, AreaLength,Spacing: Integer; ATextAlignment: TTextAlignment):Integer;
@@ -187,15 +185,7 @@ type
 implementation
 
 uses
-    LCLProc;
-
-function Max(a,b: Integer) : Integer;
-begin
-  if a>b then
-     Result := a
-  else
-     Result := b;
-end;
+    LCLProc, math;
 
 function AlignItem(ItemLength, AreaLength,Spacing: Integer; ATextAlignment: TTextAlignment):Integer;
 begin
@@ -1118,25 +1108,15 @@ end;
 procedure TGradButton.MouseMove(Shift: TShiftState;
                  X, Y: Integer);
 begin
-    //WriteLn('MouseMove');
-    //if PtInRect(Rect(0,0,Width,Height),Point(X,Y)) then
-    begin
-      //
-
-      if ssLeft in Shift then
-         FState := bsDown
-      else
-         FState := bsHot;
+   if ssLeft in Shift then
+      FState := bsDown
+   else
+      FState := bsHot;
          
-      InvPaint(true);
+   InvPaint(true);
 
-      if Assigned(FOnMouseMove) then begin
-         //DebugLn('X=%d Y=%d',[X,Y]);
-         FOnMouseMove(Self, Shift, X,Y);
-      end;
-
-      //inherited;
-    end;
+   //inherited MouseMove calls OnMouseMove
+   inherited MouseMove(Shift, X, Y);
 end;
 
 procedure TGradButton.MouseLeave;
diff --git a/components/gradcontrols/src/ugradtabcontrol.pas b/components/gradcontrols/src/ugradtabcontrol.pas
index 8cae51685..c1e202c9a 100644
--- a/components/gradcontrols/src/ugradtabcontrol.pas
+++ b/components/gradcontrols/src/ugradtabcontrol.pas
@@ -124,7 +124,7 @@ type
        property TabPopupMenu : TPopupMenu read GetTabPopupMenu write SetTabPopupMenu;
        property Color;
        property TabColor : TColor read GetTabColor write SetTabColor;
-       property TabTextAlignment : TTextAlignment read GetTabTextAlignment write SetTabTextAlignment;
+       property TabTextAlignment : TTextAlignment read GetTabTextAlignment write SetTabTextAlignment default taCenter;
        property TabGlyph : TBitmap read GetTabGlyph write SetTabGlyph;
        property TabShowGlyph : Boolean read GetTabShowGlyph write SetTabShowGlyph;
        property TabButtonLayout : TButtonLayout read GetTabButtonLayout write SetTabButtonLayout;
@@ -172,11 +172,14 @@ type
       function IsVisible(Index: Integer) : Boolean;
       procedure ChangeLeftTop(LastTabPosition : TTabPosition);
       function GetViewedTabs : TTabs;
+      function GetViewableTabs(FromIndex : Integer) : TTabs;
+      function GetTabsOfSide(FromIndex : Integer; FromLeftSide : Boolean) : TTabs;
       procedure ScrollToTab(PIndex : Integer);
   public
       constructor Create(AOwner: TComponent; var thePageList: TListWithEvent;
        TheTabControl : TGradTabControl);
       procedure Paint; override;
+      procedure Resize; override;
       procedure MoveToNext;
       procedure MoveToPrior;
       procedure MoveTo(Num: Integer);
@@ -382,7 +385,7 @@ type
         property LongWidth: Integer read FLongWidth write SetLongWidth;
         property MoveIncrement : Integer read FMoveIncrement write FMoveIncrement;
         property OnPageChanged: TNotifyEvent read FOnPageChanged write FOnPageChanged;
-        property AutoShowScrollButtons : Boolean read FAutoShowScrollButton write SetAutoShowScrollButtons;
+        property AutoShowScrollButtons : Boolean read FAutoShowScrollButton write SetAutoShowScrollButtons default true;
         property ShowLeftTopScrollButton : Boolean read FShowLeftTopScrollButton write SetShowLeftTopScrollButton;
         property ShowRightBottomScrollButton : Boolean read FShowRightBottomScrollButton write SetShowRightBottomScrollButton;
         property Images : TImageList read FImages write SetImages;
@@ -393,11 +396,12 @@ type
   procedure Register;
   function IsAssigned(var Obj : TObject) : String;
   function BoolStr(BV : Boolean) : String;
+  function IncAr(var Ar : TTabs) : Integer;
 
 implementation
 
 uses
-    gradtabcontroleditor, ComponentEditors;
+    gradtabcontroleditor, ComponentEditors, math;
 
 const
      FPageCount : Integer = 0;
@@ -439,6 +443,12 @@ begin
    end;
 end;
 
+function IncAr(var Ar : TTabs) : Integer;
+begin
+   SetLength(Ar, Length(Ar)+1);
+   Result := Length(Ar)-1;
+end;
+
 {-------------------------------------------------------------------------------
   TGradTabPageButton Create(AOwner: TComponent
  ------------------------------------------------------------------------------}
@@ -1024,6 +1034,13 @@ begin
      inherited;
 end;
 
+procedure TGradTabPagesBar.Resize;
+begin
+  inherited Resize;
+
+  OrderButtons;
+end;
+
 procedure TGradTabPagesBar.MoveToNext;
 var
    TheTabs : TTabs;
@@ -1386,7 +1403,11 @@ begin
   }
   if not FTabControl.AutoShowScrollButtons then Exit;
 
-  if ((BarWidth < (LastLeft-FMovedTo)) OR (BarHeight < (LastTop-FMovedTo))) AND ((BarHeight<>0) AND (BarWidth<>0)) then begin
+  if ((BarWidth < (LastLeft-FMovedTo))
+  OR (BarHeight < (LastTop-FMovedTo))
+  OR (FMovedTo <> 1))
+  AND ((BarHeight<>0)
+  AND (BarWidth<>0)) then begin
      FTabControl.FLeftButton.Visible:=true;
      FTabControl.FRightButton.Visible:=true;
   end else begin
@@ -1521,9 +1542,9 @@ begin
    TheButton := TGradTabPage(FPageList.Items[Index]).TabButton;
 
    if TabPosition in [tpTop, tpBottom] then
-      Result := TheButton.Visible AND (TheButton.Left >= 0) AND (TheButton.Left <= Width)
+      Result := TheButton.Visible AND (TheButton.Left >= 0) AND (TheButton.Left+TheButton.Width <= Width+5)
    else
-      Result := TheButton.Visible AND (TheButton.Top >= 0) AND (TheButton.Left <= Height);
+      Result := TheButton.Visible AND (TheButton.Top >= 0) AND (TheButton.Top+TheButton.Height <= Height+5);
 end;
 
 procedure TGradTabPagesBar.ChangeLeftTop(LastTabPosition: TTabPosition);
@@ -1532,13 +1553,6 @@ begin
 end;
 
 function TGradTabPagesBar.GetViewedTabs: TTabs;
-
-   function IncAr(var Ar : TTabs) : Integer;
-   begin
-       SetLength(Ar, Length(Ar)+1);
-       Result := Length(Ar)-1;
-   end;
-
 var
    i,l : Integer;
 begin
@@ -1561,21 +1575,89 @@ begin
    //DebugLn('GetViewedTabs End');
 end;
 
+function TGradTabPagesBar.GetViewableTabs(FromIndex: Integer): TTabs;
+var
+   i,l, Last : Integer;
+begin
+   Last := 1;
+   for i := FromIndex to FPageList.Count-1 do
+   begin
+      with TGradTabPage(FPageList.Items[i]).TabButton do
+      begin
+        case TabPosition of
+             tpTop..tpBottom : begin
+                 if Last + Width < Self.Width then
+                 begin
+                    l := IncAr(Result);
+                    Result[l] := i;
+                    Inc(Last, Width+1);
+                 end;
+             end;
+             tpLeft..tpRight : begin
+                 if Last + Height < Self.Height then
+                 begin
+                    l := IncAr(Result);
+                    Result[l] := i;
+                    Inc(Last, Height+1);
+                 end;
+             end;
+        end;
+      end;
+   end;
+
+end;
+
+function TGradTabPagesBar.GetTabsOfSide(FromIndex: Integer; FromLeftSide: Boolean
+  ): TTabs;
+var
+   i,l,fstart,fend : Integer;
+begin
+   if FromLeftSide then begin
+       fstart := 0;
+       fend:= FromIndex-1;
+   end else begin
+       fstart:= FromIndex+1;
+       fend:= FPageList.Count-1;
+   end;
+
+   for i := fstart to fend do
+   begin
+      l := IncAr(Result);
+      Result[l] := i;
+   end;
+end;
+
 procedure TGradTabPagesBar.ScrollToTab(PIndex: Integer);
 var
-   CurTabs : TTabs;
+   CurTabs, TabsLeft, TabsRight : TTabs;
    C : Integer;
    DoNext : Boolean;
+   IsInLeft, IsInRight : Boolean;
 begin
    C := 0;
 
    if (FPageList.Count=0) OR (PIndex>=FPageList.Count) then Exit;
+   if IsVisible(PIndex) then Exit;
+   CurTabs := GetViewedTabs;
+   TabsLeft:= GetTabsOfSide(CurTabs[0],true);
+   TabsRight:= GetTabsOfSide(CurTabs[High(CurTabs)],false);
+
+   IsInLeft:= ValueInArray(PIndex,TabsLeft);
+   IsInRight:= ValueInArray(PIndex,TabsRight);
+
+   DebugLn('TabInLeft=%s TabInRight=%s',[BoolStr(IsInLeft),BoolStr(IsInRight)]);
+
+   if IsInLeft then begin
+      FShowFromButton := TabsLeft[0];
+      OrderButtons;
+      if IsVisible(PIndex) then Exit;
+   end;
 
    {$IFDEF DEBUGTAB} DebugLn('ScrollToTab=%d',[PIndex]); {$ENDIF}
    repeat
        {$IFDEF DEBUGTAB} DebugLn('Run=%d',[C]); {$ENDIF}
-       CurTabs := GetViewedTabs;
-       SetLength(CurTabs, Length(CurTabs)-2);
+       //
+       //SetLength(CurTabs, Length(CurTabs)-1);
 
        with TGradTabPage(FPageList.Items[PIndex]).TabButton do
        case FTabPosition of
@@ -1587,11 +1669,12 @@ begin
 
        Inc(C);
 
-       {$IFDEF DEBUGTAB} DebugLn('ValInAr=%s',[BoolStr(ValueInArray(PIndex,CurTabs))]); {$ENDIF}
+       //{$IFDEF DEBUGTAB} DebugLn('ValInAr=%s',[BoolStr(ValueInArray(PIndex,CurTabs))]); {$ENDIF}
+       {$IFDEF DEBUGTAB} DebugLn('IsVisible(%d)=%s',[PIndex, BoolStr(IsVisible(PIndex))]); {$ENDIF}
 
-    until(ValueInArray(PIndex,CurTabs) OR (C=10));
+    until({ValueInArray(PIndex,CurTabs)} IsVisible(PIndex) {OR (C=10)});
 
-    if DoNext then MoveToNext else MoveToPrior;
+    //if DoNext then MoveToNext else MoveToPrior;
    {$IFDEF DEBUGTAB} DebugLn('ScrollToTab End'); {$ENDIF}
 end;
 
@@ -1781,7 +1864,7 @@ var
   NewOwner: TComponent;
 begin
   {$IFDEF DEBUGTAB}
-  DebugLn(['TGradTabPages.Insert A ',FNoteBook.Name,' Index=',Index,' S="',S,'"']);
+  DebugLn(['TGradTabPages.Insert A ',FGradTabControl.Name,' Index=',Index,' S="',S,'"']);
   {$ENDIF}
   NewOwner:=FGradTabControl.Owner;
   if NewOwner=nil then
@@ -1805,13 +1888,13 @@ begin
   end;
 
   {$IFDEF DEBUGTAB}
-  DebugLn(['TGradTabPages.Insert B ',FNotebook.Name,' Index=',Index,' S="',S,'"']);
+  DebugLn(['TGradTabPages.Insert B ',FGradTabControl.Name,' Index=',Index,' S="',S,'"']);
   {$ENDIF}
   {TODO}
   FGradTabControl.InsertPage(NewPage,Index);
   //FGradTabControl.PagesBar.InsertButton(NewButton, Index);
   {$IFDEF DEBUGTAB}
-  DebugLn(['TGradTabPages.Insert END ',FNotebook.Name,' Index=',Index,' S="',S,'"']);
+  DebugLn(['TGradTabPages.Insert END ',FGradTabControl.Name,' Index=',Index,' S="',S,'"']);
   {$ENDIF}
 end;
 
@@ -1867,6 +1950,7 @@ begin
     inherited;
 
     FTabPosition:=tpTop;
+    FAutoShowScrollButton:=true;
     fCompStyle := csNoteBook;
 
     ControlStyle := [{csAcceptsControls, }csDesignInteractive];
@@ -2632,6 +2716,8 @@ begin
          DebugLn('Control Left %d Top %d Height %d Width %d',[ Left, Top, Height, Width]);
     {$ENDIF}
     
+    FPagesBar.TabPosition:=Value;
+
     case Value of
       tpTop: begin
          FBar.Height:=FTabHeight;
@@ -2712,10 +2798,8 @@ begin
       end;
     end;
 
-    if FPagesBar.TabPosition=Value then
-       FPagesBar.OrderButtons
-    else
-       FPagesBar.TabPosition:=Value;
+    if not FPagesBar.IsVisible(FPageIndex) then
+       FPagesBar.FocusButton(FPageIndex);
 
     {$IFDEF DEBUGTAB}
          DebugLn('After');
@@ -2834,13 +2918,14 @@ end;
 procedure TGradTabControl.Paint;
 var
    i,j : Integer;
+   AClientRect : TRect;
 begin
    Canvas.Brush.Color:=Color;
    Canvas.FillRect(0,0,Width,Height);
 
    Canvas.Pen.Color:=clBlack;
 
-   case FTabPosition of
+   {case FTabPosition of
       tpTop: begin
          Canvas.Line(0,FTabHeight,0,Height);
          Canvas.Line(0,FTabHeight,Width,FTabHeight);
@@ -2865,7 +2950,12 @@ begin
          Canvas.Line(Width-1,0,Width-1,Height); //Right
          Canvas.Line(GetTabBarSize(tpLeft),Height-1,Width,Height-1);//Bottom
       end;
-   end;
+   end;}
+
+   AClientRect := GetClientRect;
+
+   Canvas.Rectangle(AClientRect.Left-2, AClientRect.Top-2,
+                    AClientRect.Right+2, AClientRect.Bottom+2);
    
 end;