--- sbbs/sbbs3/ctrl/clientformunit.dfm	2018/04/24 16:39:34	1.1.1.1
+++ sbbs/sbbs3/ctrl/clientformunit.dfm	2018/04/24 16:40:55	1.1.1.2
@@ -1,6 +1,6 @@
 object ClientForm: TClientForm
-  Left = 510
-  Top = 451
+  Left = 476
+  Top = 436
   Width = 631
   Height = 345
   Caption = 'Clients'
@@ -14,14 +14,13 @@ object ClientForm: TClientForm
   Font.Style = []
   OldCreateOrder = False
   OnHide = FormHide
-  OnShow = FormShow
   PixelsPerInch = 120
   TextHeight = 16
   object ListView: TListView
     Left = 0
     Top = 0
     Width = 623
-    Height = 313
+    Height = 312
     Align = alClient
     Columns = <
       item
@@ -49,11 +48,13 @@ object ClientForm: TClientForm
         Width = 55
       end
       item
+        AutoSize = True
         Caption = 'Time'
-        Width = 55
       end>
+    ColumnClick = False
     MultiSelect = True
     ReadOnly = True
+    RowSelect = True
     PopupMenu = PopupMenu
     TabOrder = 0
     ViewStyle = vsReport
@@ -68,8 +69,12 @@ object ClientForm: TClientForm
     Left = 344
     Top = 200
     object CloseSocketMenuItem: TMenuItem
-      Caption = '&Close'
+      Caption = '&Close Socket'
       OnClick = CloseSocketMenuItemClick
     end
+    object FilterIpMenuItem: TMenuItem
+      Caption = '&Filter IP Address'
+      OnClick = FilterIpMenuItemClick
+    end
   end
 end