--- sbbs/sbbs3/ctrl/mailformunit.dfm	2018/04/24 16:39:34	1.1
+++ sbbs/sbbs3/ctrl/mailformunit.dfm	2018/04/24 16:40:58	1.1.1.2
@@ -10,15 +10,14 @@ object MailForm: TMailForm
   DragMode = dmAutomatic
   Font.Charset = DEFAULT_CHARSET
   Font.Color = clWindowText
-  Font.Height = -11
+  Font.Height = -14
   Font.Name = 'MS Sans Serif'
   Font.Style = []
   OldCreateOrder = False
   Position = poDefault
   OnHide = FormHide
-  OnShow = FormShow
-  PixelsPerInch = 96
-  TextHeight = 13
+  PixelsPerInch = 120
+  TextHeight = 16
   object ToolBar: TToolBar
     Left = 0
     Top = 0
@@ -45,21 +44,26 @@ object MailForm: TMailForm
       ParentShowHint = False
       ShowHint = True
     end
-    object ToolButton4: TToolButton
+    object RecycleButton: TToolButton
       Left = 46
       Top = 0
+      Action = MainForm.MailRecycle
+    end
+    object ToolButton4: TToolButton
+      Left = 69
+      Top = 0
       Width = 8
       Caption = 'ToolButton4'
       ImageIndex = 3
       Style = tbsSeparator
     end
     object ConfigureButton: TToolButton
-      Left = 54
+      Left = 77
       Top = 0
       Action = MainForm.MailConfigure
     end
     object ToolButton6: TToolButton
-      Left = 77
+      Left = 100
       Top = 0
       Width = 8
       Caption = 'ToolButton6'
@@ -67,18 +71,18 @@ object MailForm: TMailForm
       Style = tbsSeparator
     end
     object Status: TStaticText
-      Left = 85
+      Left = 108
       Top = 0
       Width = 150
       Height = 22
       Hint = 'Mail Server Status'
       AutoSize = False
       BorderStyle = sbsSunken
-      Caption = 'Status'
+      Caption = 'Down'
       TabOrder = 0
     end
     object ToolButton1: TToolButton
-      Left = 235
+      Left = 258
       Top = 0
       Width = 8
       Caption = 'ToolButton1'
@@ -86,7 +90,7 @@ object MailForm: TMailForm
       Style = tbsSeparator
     end
     object ProgressBar: TProgressBar
-      Left = 243
+      Left = 266
       Top = 0
       Width = 75
       Height = 22
@@ -102,7 +106,7 @@ object MailForm: TMailForm
     Left = 0
     Top = 25
     Width = 342
-    Height = 98
+    Height = 92
     Align = alClient
     ReadOnly = True
     ScrollBars = ssBoth