- Removed several unnecessary panels from frmMain (using Anchors instead)

2009-07-31 17:03:26 +02:00 · 2009-07-31 17:03:26 +02:00 · f3888db49c
parent dc1f425353
commit f3888db49c
4 changed files with 1086 additions and 1026 deletions
--- a/Client/Tools/UfrmFilter.lfm
+++ b/Client/Tools/UfrmFilter.lfm
@ -1,309 +1,306 @@
-object frmFilter: TfrmFilter
-  Left = 290
-  Height = 492
-  Top = 171
-  Width = 236
-  ActiveControl = rgFilterType.RadioButton0
-  BorderIcons = [biSystemMenu, biMinimize]
-  BorderStyle = bsToolWindow
-  Caption = 'Filter'
-  ClientHeight = 492
-  ClientWidth = 236
-  Font.Height = -11
-  OnCreate = FormCreate
-  OnDestroy = FormDestroy
-  OnShow = FormShow
-  LCLVersion = '0.9.25'
-  object rgFilterType: TRadioGroup
-    Left = 4
-    Height = 40
-    Top = 4
-    Width = 228
-    Align = alTop
-    AutoFill = True
-    BorderSpacing.Around = 4
-    Caption = 'Filter rule'
-    ChildSizing.LeftRightSpacing = 6
-    ChildSizing.TopBottomSpacing = 6
-    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
-    ChildSizing.EnlargeVertical = crsHomogenousChildResize
-    ChildSizing.ShrinkHorizontal = crsScaleChilds
-    ChildSizing.ShrinkVertical = crsScaleChilds
-    ChildSizing.Layout = cclLeftToRightThenTopToBottom
-    ChildSizing.ControlsPerLine = 2
-    ClientHeight = 23
-    ClientWidth = 224
-    Columns = 2
-    ItemIndex = 0
-    Items.Strings = (
-      'Exclusive'
-      'Inclusive'
-    )
-    ParentFont = True
-    TabOrder = 0
-  end
-  object GroupBox1: TGroupBox
-    Left = 4
-    Height = 259
-    Top = 48
-    Width = 228
-    Align = alClient
-    BorderSpacing.Around = 4
-    Caption = 'Tile filter'
-    ClientHeight = 242
-    ClientWidth = 224
-    ParentFont = True
-    TabOrder = 1
-    object Label1: TLabel
-      Left = 4
-      Height = 28
-      Top = 28
-      Width = 216
-      Align = alTop
-      BorderSpacing.Around = 4
-      Caption = 'Drag and Drop static tiles from the tile list on this list to add them to the filter.'
-      ParentColor = False
-      ParentFont = True
-      WordWrap = True
-    end
-    object vdtFilter: TVirtualDrawTree
-      Tag = 1
-      Cursor = 63
-      Left = 4
-      Height = 152
-      Top = 60
-      Width = 216
-      Align = alClient
-      BorderSpacing.Around = 4
-      BorderStyle = bsSingle
-      DefaultNodeHeight = 44
-      DragType = dtVCL
-      Header.Options = [hoColumnResize, hoDrag, hoVisible]
-      Header.ParentFont = True
-      Header.Style = hsFlatButtons
-      Header.Columns = <      
-        item
-          Text = 'ID'
-        end      
-        item
-          Position = 1
-          Width = 44
-          Text = 'Tile'
-        end      
-        item
-          Position = 2
-          Width = 100
-          Text = 'Name'
-        end>
-      ParentFont = True
-      TabOrder = 0
-      TreeOptions.PaintOptions = [toHideFocusRect, toShowButtons, toShowDropmark, toThemeAware, toUseBlendedImages]
-      TreeOptions.SelectionOptions = [toFullRowSelect, toMultiSelect]
-      OnDragOver = vdtFilterDragOver
-      OnDragDrop = vdtFilterDragDrop
-      OnDrawNode = vdtFilterDrawNode
-    end
-    object pnlControls: TPanel
-      Left = 4
-      Height = 22
-      Top = 216
-      Width = 216
-      Align = alBottom
-      BorderSpacing.Around = 4
-      BevelOuter = bvNone
-      ClientHeight = 22
-      ClientWidth = 216
-      ParentFont = True
-      TabOrder = 1
-      object btnDelete: TSpeedButton
-        Left = 84
-        Height = 22
-        Hint = 'Delete'
-        Width = 23
-        Color = clBtnFace
-        Glyph.Data = {
-          36040000424D3604000000000000360000002800000010000000100000000100
-          20000000000000040000640000006400000000000000000000004F91AB005588
-          9C0043718A004E6974003E4B4C00457796003E6A950037556C005C7E8800548B
-          A00031464100FFFFFF002B3238002D3B430074B9C8007FC4D5004788A7004A92
-          B500435E6F002E3040002E3538003D5E7B003853BEFF3551BDFF304BBCFF2E4E
-          B8FF303B3600FFFFFF00313637002C2D2B00588997007BC3D400365F8400396E
-          9A003B6282003A5564004255C6FF3C52CCFF757AE8FF8F92EEFF8F92EEFF7178
-          E4FF334DC1FF2B4AB7FFFFFFFF0036423900486B710061B4CE00396F9600375C
-          83004085B1004959CBFF5C65E0FFA1A6F5FF7E86EFFF5B63E9FF595DE7FF7D84
-          EEFF9EA0F4FF515DD7FF2B4AB7FFFFFFFF00354C4C004D94AF00375D7F003348
-          5C005361CFFF616BE3FFA1ACF5FF545FECFF505CEAFF4D59E9FF4E59E6FF4C56
-          E6FF5056E6FF9EA2F4FF5460D6FF2A4AB8FFFFFFFF004A90A6003B5864003D5B
-          6A004B56DBFFA2ABF6FF5664F0FF5266EEFF4D59E9FF4D59E9FF4D59E9FF4D59
-          E9FF4C58E6FF525AE6FF9FA3F5FF3450C4FF57929C00498BA40047676D005C62
-          D7FF818CEEFF7E91F7FF5D73F3FF4D59E9FF4D59E9FF4D59E9FF4D59E9FF4D59
-          E9FF4D59E9FF4F5BE9FF7B83F0FF757BE2FF2E4BBAFF54839500FFFFFF005F63
-          DAFFA1ABF7FF7086F8FF6882F6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
-          FFFFFFFFFFFF4D59E9FF5C66EAFF969CF1FF3250BCFF6FA2AF00000000006469
-          DBFFAFB9F9FF7F93FAFF7085F0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
-          FFFFFFFFFFFF4D59E9FF5E6AEEFF969DF1FF364FBEFF58B2E00000000000676A
-          DEFFA5AFF5FF9DABFAFF778CF0FF545FECFF545FECFF545FECFF545FECFF545F
-          ECFF545FECFF6377F2FF818EF4FF787FE9FF3A53C0FF000000000800000000E8
-          1D007D83EAFFCDD4FCFF8B9DFAFF7E93F7FF758AEEFF6C84F6FF6C84F6FF6C84
-          F6FF6C84F6FF6379F3FFA4AFF8FF3E4FD0FF000000000000000001000100DB12
-          C0006A69E0FFA3A7F3FFD4DBFDFF879AFAFF7F91F0FF7A8EF1FF7F94F8FF7E92
-          F9FF768CF8FFA8B6F8FF636EE3FF4557C7FF00000000000000002401AD00BA02
-          AE002301AE006A69E0FFAAADF2FFD8DCFDFFAEBAFAFF91A3FAFF8B9DFAFF9CA9
-          FBFFBAC7FCFF707BE9FF4C5BCCFFBB02F00000010000D8000000000000000000
-          000008000000010008006A6ADFFF8E93EDFFBEC3F8FFCCD3F9FFC4CBF9FFAAB4
-          F4FF6670E2FF535ED1FF5031DE005031DE002501AC00B902AD000D040400F804
-          0500F20005000A0106000C040500F8040600686ADDFF6364DCFF6164DAFF5D63
-          D9FFF2000700F804610000000000710900005031DE005031DE004034DE004034
-          DE0068B0E00068B0E0000E049300F8049500F2009500070102000F049500F804
-          0200F2000200080104000E040200F8040400F200040009010500
-        }
-        NumGlyphs = 0
-        OnClick = btnDeleteClick
-        ShowHint = True
-        ParentFont = True
-        ParentShowHint = False
-      end
-      object btnClear: TSpeedButton
-        Left = 108
-        Height = 22
-        Hint = 'Clear'
-        Width = 23
-        Color = clBtnFace
-        Glyph.Data = {
-          36040000424D3604000000000000360000002800000010000000100000000100
-          20000000000000040000640000006400000000000000000000003ADCFE004800
-          3A00FEFF4800FCFF1C00FCFF1C0080FF9C00003BD700AF9AFF00002CC600FDEB
-          9B000000000000000000000000000000000000000000000000000EECFF00B2FC
-          FF000046C00078D0FF000000F1FF0000F1FF0000F1FF0000F1FF0000EFFF0000
-          EFFF0000EDFF0000EDFFCBF3FC008905000024AEEF00E4A81C000000DB00B29E
-          FF0088000D000000F5FF1A20F5FF3C4CF9FF3A49F8FF3847F8FF3545F8FF3443
-          F7FF3242F7FF141BF1FF0000EDFFFCFF1C00FCFF1C0080FF9C0004000000FFBC
-          00000000F7FF1D23F9FF4453FAFF2429F9FF1212F7FF0F0FF6FF0C0CF5FF0909
-          F5FF161BF5FF3343F7FF141BF1FF0000EDFFE4FF5C000050FF004C0000000000
-          F9FF1F25FAFF4A58FBFF4247FBFFC9C9FDFF3B3BF9FF1313F7FF1010F6FF3333
-          F7FFC5C5FDFF3035F7FF3444F7FF141BF2FF0000EDFF000008000052FF000000
-          FBFF4F5DFDFF3237FBFFCBCBFEFFF2F2FFFFEBEBFEFF3B3BF9FF3939F8FFEAEA
-          FEFFF1F1FEFFC5C5FDFF181DF6FF3343F7FF0000EFFF0000CC0088005B000000
-          FDFF525FFDFF2828FCFF4747FCFFECECFFFFF2F2FFFFECECFFFFECECFEFFF1F1
-          FFFFEAEAFEFF3434F7FF0B0BF5FF3545F8FF0000EFFF00B8FF00E3FFA8000000
-          FDFF5562FEFF2C2CFDFF2929FCFF4848FCFFEDEDFFFFF2F2FFFFF2F2FFFFECEC
-          FEFF3A3AF9FF1212F7FF0F0FF6FF3848F8FF0000F1FF08009000FCFF72000000
-          FDFF5764FEFF3030FDFF2D2DFDFF4B4BFCFFEDEDFFFFF2F2FFFFF2F2FFFFECEC
-          FFFF3D3DF9FF1616F8FF1313F7FF3C4BF8FF0000F1FF02000000E4FF5C000000
-          FFFF5A67FEFF3333FEFF5050FDFFEDEDFFFFF3F3FFFFEDEDFFFFEDEDFFFFF2F2
-          FFFFECECFEFF3E3EFAFF1717F8FF3F4EF9FF0000F1FFFCFF1C00000000000000
-          FFFF5B68FFFF4347FEFFCFCFFFFFF3F3FFFFEDEDFFFF4C4CFCFF4A4AFCFFECEC
-          FFFFF2F2FFFFCACAFEFF2A2FFAFF4251FAFF0000F3FF00000000CCFF4C000000
-          FFFF262BFFFF5D6AFFFF585BFFFFCFCFFFFF5252FEFF2F2FFDFF2C2CFDFF4B4B
-          FCFFCCCCFEFF484CFBFF4957FBFF1D23F9FF0000F5FF00000000000000000000
-          00000000FFFF262BFFFF5D6AFFFF4347FFFF3434FEFF3232FEFF3030FDFF2D2D
-          FDFF383CFCFF4F5DFCFF1F25FAFF0000F7FF0000000000000000000000000000
-          0000000000000000FFFF262BFFFF5C69FFFF5B68FFFF5A67FEFF5865FEFF5663
-          FEFF5461FEFF2227FCFF0000FBFFFCFF1C00000000000000000008000000EFEF
-          EF00EFEFEF00EFEFEF000000FFFF0000FFFF0000FFFF0000FFFF0000FDFF0000
-          FDFF0000FDFF0000FDFF000000000000000000000000000000009034DE009034
-          DE00D86FDF00D86FDF00E0A223004AC6080000000000580000005870DF000C70
-          DF000000000000000000000000002070DF000000000000000000
-        }
-        NumGlyphs = 0
-        OnClick = btnClearClick
-        ShowHint = True
-        ParentFont = True
-        ParentShowHint = False
-      end
-    end
-    object cbTileFilter: TCheckBox
-      Left = 4
-      Height = 20
-      Top = 4
-      Width = 216
-      Align = alTop
-      BorderSpacing.Around = 4
-      Caption = 'Filter active'
-      Checked = True
-      ParentFont = True
-      State = cbChecked
-      TabOrder = 2
-    end
-  end
-  object GroupBox2: TGroupBox
-    Left = 4
-    Height = 168
-    Top = 320
-    Width = 228
-    Align = alBottom
-    BorderSpacing.Around = 4
-    Caption = 'Hue filter'
-    ClientHeight = 151
-    ClientWidth = 224
-    ParentFont = True
-    TabOrder = 2
-    object cbHueFilter: TCheckBox
-      Left = 4
-      Height = 20
-      Top = 4
-      Width = 216
-      Align = alTop
-      BorderSpacing.Around = 4
-      Caption = 'Filter active'
-      ParentFont = True
-      TabOrder = 0
-    end
-    object vdtHues: TVirtualDrawTree
-      Cursor = 63
-      Left = 4
-      Height = 119
-      Top = 28
-      Width = 216
-      Align = alClient
-      BorderSpacing.Around = 4
-      BorderStyle = bsSingle
-      Header.AutoSizeIndex = 2
-      Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoVisible]
-      Header.ParentFont = True
-      Header.Style = hsFlatButtons
-      Header.Columns = <      
-        item
-          Width = 20
-        end      
-        item
-          Position = 1
-          Width = 38
-          Text = 'Hue'
-        end      
-        item
-          Position = 2
-          Width = 158
-          Text = 'Name'
-        end>
-      ParentFont = True
-      PopupMenu = pmHues
-      TabOrder = 1
-      TreeOptions.MiscOptions = [toCheckSupport, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning]
-      TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toThemeAware, toUseBlendedImages]
-      TreeOptions.SelectionOptions = [toFullRowSelect]
-      OnChecked = vdtHuesChecked
-      OnDrawNode = vdtHuesDrawNode
-    end
-  end
-  object Splitter1: TSplitter
-    Cursor = crVSplit
-    Height = 5
-    Top = 311
-    Width = 236
-    Align = alBottom
-    ResizeAnchor = akBottom
-  end
-  object pmHues: TPopupMenu
-    left = 148
-    top = 404
-    object mnuCheckHues: TMenuItem
-      Caption = 'Check all hues'
-      OnClick = mnuCheckHuesClick
-    end
-    object mnuUncheckHues: TMenuItem
-      Caption = 'Uncheck all hues'
-      OnClick = mnuUncheckHuesClick
-    end
-  end
-end
+object frmFilter: TfrmFilter
+  Left = 290
+  Height = 492
+  Top = 171
+  Width = 236
+  ActiveControl = rgFilterType.RadioButton0
+  BorderIcons = [biSystemMenu, biMinimize]
+  BorderStyle = bsToolWindow
+  Caption = 'Filter'
+  ClientHeight = 492
+  ClientWidth = 236
+  Font.Height = -11
+  OnCreate = FormCreate
+  OnDestroy = FormDestroy
+  OnShow = FormShow
+  LCLVersion = '0.9.27'
+  object rgFilterType: TRadioGroup
+    Left = 4
+    Height = 40
+    Top = 4
+    Width = 228
+    Align = alTop
+    AutoFill = True
+    BorderSpacing.Around = 4
+    Caption = 'Filter rule'
+    ChildSizing.LeftRightSpacing = 6
+    ChildSizing.TopBottomSpacing = 6
+    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
+    ChildSizing.EnlargeVertical = crsHomogenousChildResize
+    ChildSizing.ShrinkHorizontal = crsScaleChilds
+    ChildSizing.ShrinkVertical = crsScaleChilds
+    ChildSizing.Layout = cclLeftToRightThenTopToBottom
+    ChildSizing.ControlsPerLine = 2
+    ClientHeight = 26
+    ClientWidth = 226
+    Columns = 2
+    ItemIndex = 0
+    Items.Strings = (
+      'Exclusive'
+      'Inclusive'
+    )
+    TabOrder = 0
+  end
+  object GroupBox1: TGroupBox
+    Left = 4
+    Height = 259
+    Top = 48
+    Width = 228
+    Align = alClient
+    BorderSpacing.Around = 4
+    Caption = 'Tile filter'
+    ClientHeight = 245
+    ClientWidth = 226
+    TabOrder = 1
+    object Label1: TLabel
+      Left = 4
+      Height = 30
+      Top = 30
+      Width = 218
+      Align = alTop
+      BorderSpacing.Around = 4
+      Caption = 'Drag and Drop static tiles from the tile list on this list to add them to the filter.'
+      ParentColor = False
+      WordWrap = True
+    end
+    object vdtFilter: TVirtualDrawTree
+      Tag = 1
+      Cursor = 63
+      Left = 4
+      Height = 151
+      Top = 64
+      Width = 218
+      Align = alClient
+      BorderSpacing.Around = 4
+      BorderStyle = bsSingle
+      DefaultNodeHeight = 44
+      DragType = dtVCL
+      Header.AutoSizeIndex = 0
+      Header.Columns = <      
+        item
+          Position = 0
+          Text = 'ID'
+        end      
+        item
+          Position = 1
+          Text = 'Tile'
+          Width = 44
+        end      
+        item
+          Position = 2
+          Text = 'Name'
+          Width = 100
+        end>
+      Header.DefaultHeight = 17
+      Header.Options = [hoColumnResize, hoDrag, hoVisible]
+      Header.ParentFont = True
+      Header.Style = hsFlatButtons
+      TabOrder = 0
+      TreeOptions.PaintOptions = [toHideFocusRect, toShowButtons, toShowDropmark, toThemeAware, toUseBlendedImages]
+      TreeOptions.SelectionOptions = [toFullRowSelect, toMultiSelect]
+      OnDragOver = vdtFilterDragOver
+      OnDragDrop = vdtFilterDragDrop
+      OnDrawNode = vdtFilterDrawNode
+    end
+    object pnlControls: TPanel
+      Left = 4
+      Height = 22
+      Top = 219
+      Width = 218
+      Align = alBottom
+      BorderSpacing.Around = 4
+      BevelOuter = bvNone
+      ClientHeight = 22
+      ClientWidth = 218
+      TabOrder = 1
+      object btnDelete: TSpeedButton
+        Left = 84
+        Height = 22
+        Hint = 'Delete'
+        Top = 0
+        Width = 23
+        Color = clBtnFace
+        Glyph.Data = {
+          36040000424D3604000000000000360000002800000010000000100000000100
+          20000000000000040000640000006400000000000000000000004F91AB005588
+          9C0043718A004E6974003E4B4C00457796003E6A950037556C005C7E8800548B
+          A00031464100FFFFFF002B3238002D3B430074B9C8007FC4D5004788A7004A92
+          B500435E6F002E3040002E3538003D5E7B003853BEFF3551BDFF304BBCFF2E4E
+          B8FF303B3600FFFFFF00313637002C2D2B00588997007BC3D400365F8400396E
+          9A003B6282003A5564004255C6FF3C52CCFF757AE8FF8F92EEFF8F92EEFF7178
+          E4FF334DC1FF2B4AB7FFFFFFFF0036423900486B710061B4CE00396F9600375C
+          83004085B1004959CBFF5C65E0FFA1A6F5FF7E86EFFF5B63E9FF595DE7FF7D84
+          EEFF9EA0F4FF515DD7FF2B4AB7FFFFFFFF00354C4C004D94AF00375D7F003348
+          5C005361CFFF616BE3FFA1ACF5FF545FECFF505CEAFF4D59E9FF4E59E6FF4C56
+          E6FF5056E6FF9EA2F4FF5460D6FF2A4AB8FFFFFFFF004A90A6003B5864003D5B
+          6A004B56DBFFA2ABF6FF5664F0FF5266EEFF4D59E9FF4D59E9FF4D59E9FF4D59
+          E9FF4C58E6FF525AE6FF9FA3F5FF3450C4FF57929C00498BA40047676D005C62
+          D7FF818CEEFF7E91F7FF5D73F3FF4D59E9FF4D59E9FF4D59E9FF4D59E9FF4D59
+          E9FF4D59E9FF4F5BE9FF7B83F0FF757BE2FF2E4BBAFF54839500FFFFFF005F63
+          DAFFA1ABF7FF7086F8FF6882F6FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+          FFFFFFFFFFFF4D59E9FF5C66EAFF969CF1FF3250BCFF6FA2AF00000000006469
+          DBFFAFB9F9FF7F93FAFF7085F0FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
+          FFFFFFFFFFFF4D59E9FF5E6AEEFF969DF1FF364FBEFF58B2E00000000000676A
+          DEFFA5AFF5FF9DABFAFF778CF0FF545FECFF545FECFF545FECFF545FECFF545F
+          ECFF545FECFF6377F2FF818EF4FF787FE9FF3A53C0FF000000000800000000E8
+          1D007D83EAFFCDD4FCFF8B9DFAFF7E93F7FF758AEEFF6C84F6FF6C84F6FF6C84
+          F6FF6C84F6FF6379F3FFA4AFF8FF3E4FD0FF000000000000000001000100DB12
+          C0006A69E0FFA3A7F3FFD4DBFDFF879AFAFF7F91F0FF7A8EF1FF7F94F8FF7E92
+          F9FF768CF8FFA8B6F8FF636EE3FF4557C7FF00000000000000002401AD00BA02
+          AE002301AE006A69E0FFAAADF2FFD8DCFDFFAEBAFAFF91A3FAFF8B9DFAFF9CA9
+          FBFFBAC7FCFF707BE9FF4C5BCCFFBB02F00000010000D8000000000000000000
+          000008000000010008006A6ADFFF8E93EDFFBEC3F8FFCCD3F9FFC4CBF9FFAAB4
+          F4FF6670E2FF535ED1FF5031DE005031DE002501AC00B902AD000D040400F804
+          0500F20005000A0106000C040500F8040600686ADDFF6364DCFF6164DAFF5D63
+          D9FFF2000700F804610000000000710900005031DE005031DE004034DE004034
+          DE0068B0E00068B0E0000E049300F8049500F2009500070102000F049500F804
+          0200F2000200080104000E040200F8040400F200040009010500
+        }
+        NumGlyphs = 0
+        OnClick = btnDeleteClick
+        ShowHint = True
+        ParentShowHint = False
+      end
+      object btnClear: TSpeedButton
+        Left = 108
+        Height = 22
+        Hint = 'Clear'
+        Top = 0
+        Width = 23
+        Color = clBtnFace
+        Glyph.Data = {
+          36040000424D3604000000000000360000002800000010000000100000000100
+          20000000000000040000640000006400000000000000000000003ADCFE004800
+          3A00FEFF4800FCFF1C00FCFF1C0080FF9C00003BD700AF9AFF00002CC600FDEB
+          9B000000000000000000000000000000000000000000000000000EECFF00B2FC
+          FF000046C00078D0FF000000F1FF0000F1FF0000F1FF0000F1FF0000EFFF0000
+          EFFF0000EDFF0000EDFFCBF3FC008905000024AEEF00E4A81C000000DB00B29E
+          FF0088000D000000F5FF1A20F5FF3C4CF9FF3A49F8FF3847F8FF3545F8FF3443
+          F7FF3242F7FF141BF1FF0000EDFFFCFF1C00FCFF1C0080FF9C0004000000FFBC
+          00000000F7FF1D23F9FF4453FAFF2429F9FF1212F7FF0F0FF6FF0C0CF5FF0909
+          F5FF161BF5FF3343F7FF141BF1FF0000EDFFE4FF5C000050FF004C0000000000
+          F9FF1F25FAFF4A58FBFF4247FBFFC9C9FDFF3B3BF9FF1313F7FF1010F6FF3333
+          F7FFC5C5FDFF3035F7FF3444F7FF141BF2FF0000EDFF000008000052FF000000
+          FBFF4F5DFDFF3237FBFFCBCBFEFFF2F2FFFFEBEBFEFF3B3BF9FF3939F8FFEAEA
+          FEFFF1F1FEFFC5C5FDFF181DF6FF3343F7FF0000EFFF0000CC0088005B000000
+          FDFF525FFDFF2828FCFF4747FCFFECECFFFFF2F2FFFFECECFFFFECECFEFFF1F1
+          FFFFEAEAFEFF3434F7FF0B0BF5FF3545F8FF0000EFFF00B8FF00E3FFA8000000
+          FDFF5562FEFF2C2CFDFF2929FCFF4848FCFFEDEDFFFFF2F2FFFFF2F2FFFFECEC
+          FEFF3A3AF9FF1212F7FF0F0FF6FF3848F8FF0000F1FF08009000FCFF72000000
+          FDFF5764FEFF3030FDFF2D2DFDFF4B4BFCFFEDEDFFFFF2F2FFFFF2F2FFFFECEC
+          FFFF3D3DF9FF1616F8FF1313F7FF3C4BF8FF0000F1FF02000000E4FF5C000000
+          FFFF5A67FEFF3333FEFF5050FDFFEDEDFFFFF3F3FFFFEDEDFFFFEDEDFFFFF2F2
+          FFFFECECFEFF3E3EFAFF1717F8FF3F4EF9FF0000F1FFFCFF1C00000000000000
+          FFFF5B68FFFF4347FEFFCFCFFFFFF3F3FFFFEDEDFFFF4C4CFCFF4A4AFCFFECEC
+          FFFFF2F2FFFFCACAFEFF2A2FFAFF4251FAFF0000F3FF00000000CCFF4C000000
+          FFFF262BFFFF5D6AFFFF585BFFFFCFCFFFFF5252FEFF2F2FFDFF2C2CFDFF4B4B
+          FCFFCCCCFEFF484CFBFF4957FBFF1D23F9FF0000F5FF00000000000000000000
+          00000000FFFF262BFFFF5D6AFFFF4347FFFF3434FEFF3232FEFF3030FDFF2D2D
+          FDFF383CFCFF4F5DFCFF1F25FAFF0000F7FF0000000000000000000000000000
+          0000000000000000FFFF262BFFFF5C69FFFF5B68FFFF5A67FEFF5865FEFF5663
+          FEFF5461FEFF2227FCFF0000FBFFFCFF1C00000000000000000008000000EFEF
+          EF00EFEFEF00EFEFEF000000FFFF0000FFFF0000FFFF0000FFFF0000FDFF0000
+          FDFF0000FDFF0000FDFF000000000000000000000000000000009034DE009034
+          DE00D86FDF00D86FDF00E0A223004AC6080000000000580000005870DF000C70
+          DF000000000000000000000000002070DF000000000000000000
+        }
+        NumGlyphs = 0
+        OnClick = btnClearClick
+        ShowHint = True
+        ParentShowHint = False
+      end
+    end
+    object cbTileFilter: TCheckBox
+      Left = 4
+      Height = 22
+      Top = 4
+      Width = 218
+      Align = alTop
+      BorderSpacing.Around = 4
+      Caption = 'Filter active'
+      Checked = True
+      State = cbChecked
+      TabOrder = 2
+    end
+  end
+  object GroupBox2: TGroupBox
+    Left = 4
+    Height = 168
+    Top = 320
+    Width = 228
+    Align = alBottom
+    BorderSpacing.Around = 4
+    Caption = 'Hue filter'
+    ClientHeight = 154
+    ClientWidth = 226
+    TabOrder = 2
+    object cbHueFilter: TCheckBox
+      Left = 4
+      Height = 22
+      Top = 4
+      Width = 218
+      Align = alTop
+      BorderSpacing.Around = 4
+      Caption = 'Filter active'
+      TabOrder = 0
+    end
+    object vdtHues: TVirtualDrawTree
+      Cursor = 63
+      Left = 4
+      Height = 120
+      Top = 30
+      Width = 218
+      Align = alClient
+      BorderSpacing.Around = 4
+      BorderStyle = bsSingle
+      Header.AutoSizeIndex = 2
+      Header.Columns = <      
+        item
+          Position = 0
+          Width = 20
+        end      
+        item
+          Position = 1
+          Text = 'Hue'
+          Width = 38
+        end      
+        item
+          Position = 2
+          Text = 'Name'
+          Width = 158
+        end>
+      Header.DefaultHeight = 17
+      Header.Options = [hoAutoResize, hoColumnResize, hoDrag, hoVisible]
+      Header.ParentFont = True
+      Header.Style = hsFlatButtons
+      PopupMenu = pmHues
+      TabOrder = 1
+      TreeOptions.MiscOptions = [toCheckSupport, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning]
+      TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toThemeAware, toUseBlendedImages]
+      TreeOptions.SelectionOptions = [toFullRowSelect]
+      OnChecked = vdtHuesChecked
+      OnDrawNode = vdtHuesDrawNode
+    end
+  end
+  object Splitter1: TSplitter
+    Cursor = crVSplit
+    Left = 0
+    Height = 5
+    Top = 311
+    Width = 236
+    Align = alBottom
+    ResizeAnchor = akBottom
+  end
+  object pmHues: TPopupMenu
+    left = 148
+    top = 404
+    object mnuCheckHues: TMenuItem
+      Caption = 'Check all hues'
+      OnClick = mnuCheckHuesClick
+    end
+    object mnuUncheckHues: TMenuItem
+      Caption = 'Uncheck all hues'
+      OnClick = mnuUncheckHuesClick
+    end
+  end
+end
--- a/Client/Tools/UfrmFilter.pas
+++ b/Client/Tools/UfrmFilter.pas
@ -111,8 +111,9 @@ procedure TfrmFilter.FormShow(Sender: TObject);
 var
  upperLeft, lowerLeft: TPoint;
 begin
-  upperLeft := frmMain.pnlMain.ClientToScreen(Point(0, 0));
-  lowerLeft := frmMain.pnlMain.ClientToScreen(Point(0, frmMain.pnlMain.Height));
+  upperLeft := frmMain.pcLeft.ClientToScreen(Point(frmMain.pcLeft.Width, 0));
+  lowerLeft := frmMain.pcLeft.ClientToScreen(Point(frmMain.pcLeft.Width,
+    frmMain.pcLeft.Height));
  Left := upperLeft.x;
  Top := upperLeft.y;
  Height := lowerLeft.y - upperLeft.y;
--- a/Client/UfrmMain.lfm
+++ b/Client/UfrmMain.lfm
--- a/Client/UfrmMain.pas
+++ b/Client/UfrmMain.pas
@ -60,30 +60,35 @@ type
    ActionList1: TActionList;
    ApplicationProperties1: TApplicationProperties;
    btnAddLocation: TSpeedButton;
+    btnAddRandom: TSpeedButton;
    btnClearLocations: TSpeedButton;
+    btnClearRandom: TSpeedButton;
    btnDeleteLocation: TSpeedButton;
+    btnDeleteRandom: TSpeedButton;
    btnGoTo: TButton;
+    btnRandomPresetDelete: TSpeedButton;
+    btnRandomPresetSave: TSpeedButton;
    cbRandomPreset: TComboBox;
-    cbTerrain: TCheckBox;
    cbStatics: TCheckBox;
-    edFilter: TEdit;
+    cbTerrain: TCheckBox;
    edChat: TEdit;
+    edFilter: TEdit;
    edSearchID: TEdit;
    gbRandom: TGroupBox;
    ImageList1: TImageList;
    lblChatHeaderCaption: TLabel;
+    lblFilter: TLabel;
    lblTipC: TLabel;
    lblTip: TLabel;
    lblTileInfo: TLabel;
-    lblFilter: TLabel;
    lblX: TLabel;
    lblY: TLabel;
    lbClients: TListBox;
    MainMenu1: TMainMenu;
+    mnuGrabHue: TMenuItem;
+    mnuGrabTileID: TMenuItem;
    mnuRegionControl: TMenuItem;
    mnuVirtualLayer: TMenuItem;
-    mnuGrabTileID: TMenuItem;
-    mnuGrabHue: TMenuItem;
    mnuLargeScaleCommands: TMenuItem;
    mnuSetHue: TMenuItem;
    mnuGoToClient: TMenuItem;
@ -107,27 +112,17 @@ type
    mnuDisconnect: TMenuItem;
    mnuCentrED: TMenuItem;
    oglGameWindow: TOpenGLControl;
-    pnlRandomPreset: TPanel;
-    pnlLocationControls: TPanel;
-    pnlChat: TPanel;
-    pnlChatHeader: TPanel;
-    pnlMain: TPanel;
-    pnlRandomControl: TPanel;
-    pnlTileListSettings: TPanel;
    pcLeft: TPageControl;
+    pmGrabTileInfo: TPopupMenu;
    pnlBottom: TPanel;
    edX: TSpinEdit;
    edY: TSpinEdit;
    pmTileList: TPopupMenu;
-    btnAddRandom: TSpeedButton;
-    btnDeleteRandom: TSpeedButton;
-    btnClearRandom: TSpeedButton;
    pmTools: TPopupMenu;
    pmClients: TPopupMenu;
-    pmGrabTileInfo: TPopupMenu;
+    pnlChat: TPanel;
+    pnlChatHeader: TPanel;
    spChat: TSplitter;
-    btnRandomPresetSave: TSpeedButton;
-    btnRandomPresetDelete: TSpeedButton;
    spTileList: TSplitter;
    tbFilter: TToolButton;
    tbFlat: TToolButton;
@ -157,8 +152,8 @@ type
    tsTiles: TTabSheet;
    vdtTiles: TVirtualDrawTree;
    vdtRandom: TVirtualDrawTree;
-    vstLocations: TVirtualStringTree;
    vstChat: TVirtualStringTree;
+    vstLocations: TVirtualStringTree;
    procedure acBoundariesExecute(Sender: TObject);
    procedure acDeleteExecute(Sender: TObject);
    procedure acDrawExecute(Sender: TObject);
@ -739,6 +734,7 @@ begin
  Randomize;
  
  vstChat.NodeDataSize := SizeOf(TChatInfo);
+  pnlChatHeader.AnchorSide[akBottom].Control := pnlBottom;
  
  FLocationsFile := IncludeTrailingPathDelimiter(ExtractFilePath(
                    Application.ExeName)) + 'Locations.dat';
@ -1113,12 +1109,13 @@ begin
  begin
    pnlChat.Visible := False;
    spChat.Visible := False;
+    pnlChatHeader.AnchorSide[akBottom].Control := pnlBottom;
  end else
  begin
    spChat.Visible := True;
    pnlChat.Visible := True;
-    spChat.Top := pnlChatHeader.Top + pnlChatHeader.Height;
-    pnlChat.Top := spChat.Top + spChat.Height;
+    spChat.Top := pnlChat.Top - spChat.Height;
+    pnlChatHeader.AnchorSide[akBottom].Control := spChat;
    
    lblChatHeaderCaption.Font.Bold := False;
    lblChatHeaderCaption.Font.Italic := False;
@ -1368,8 +1365,6 @@ procedure TfrmMain.vdtTilesKeyPress(Sender: TObject; var Key: char);
 begin
  if Key in ['$', '0'..'9'] then
  begin
-    edSearchID.Top := vdtTiles.Top + vdtTiles.Height - edSearchID.Height - 4;
-    edSearchID.Left := vdtTiles.Left + vdtTiles.Width - edSearchID.Width - 4;
    edSearchID.Text := Key;
    edSearchID.Visible := True;
    edSearchID.SetFocus;