From f3cef235177f28216fb71fdd907597d208d791ed Mon Sep 17 00:00:00 2001
From: rswindell <>
Date: Tue, 24 Oct 2000 22:17:30 +0000
Subject: [PATCH] Minor cosmetic changes to labels and hints.

---
 src/sbbs3/ctrl/FtpCfgDlgUnit.dfm    | 36 ++++++++++++--------
 src/sbbs3/ctrl/TelnetCfgDlgUnit.dfm | 51 ++++++++++++++---------------
 2 files changed, 46 insertions(+), 41 deletions(-)

diff --git a/src/sbbs3/ctrl/FtpCfgDlgUnit.dfm b/src/sbbs3/ctrl/FtpCfgDlgUnit.dfm
index 976ef1c6b7..6b7f518120 100644
--- a/src/sbbs3/ctrl/FtpCfgDlgUnit.dfm
+++ b/src/sbbs3/ctrl/FtpCfgDlgUnit.dfm
@@ -1,6 +1,6 @@
 object FtpCfgDlg: TFtpCfgDlg
-  Left = 812
-  Top = 620
+  Left = 466
+  Top = 622
   BorderStyle = bsDialog
   Caption = 'FTP Server Configuration'
   ClientHeight = 234
@@ -17,7 +17,7 @@ object FtpCfgDlg: TFtpCfgDlg
     Top = 3
     Width = 278
     Height = 186
-    ActivePage = GeneralTabSheet
+    ActivePage = SoundTabSheet
     TabOrder = 0
     object GeneralTabSheet: TTabSheet
       Caption = 'General'
@@ -58,7 +58,7 @@ object FtpCfgDlg: TFtpCfgDlg
         Top = 5
         Width = 117
         Height = 19
-        Hint = 'Automatically start'
+        Hint = 'Automatically start FTP server'
         Caption = 'Auto Startup'
         ParentShowHint = False
         ShowHint = True
@@ -91,7 +91,7 @@ object FtpCfgDlg: TFtpCfgDlg
         Top = 55
         Width = 39
         Height = 21
-        Hint = 'FTP control port (default=21)'
+        Hint = 'TCP port to use for FTP control connections (default=21)'
         ParentShowHint = False
         ShowHint = True
         TabOrder = 3
@@ -122,6 +122,8 @@ object FtpCfgDlg: TFtpCfgDlg
         Width = 156
         Height = 21
         Hint = 'Name of auto-index file (default=00index)'
+        ParentShowHint = False
+        ShowHint = True
         TabOrder = 6
       end
       object AllowQWKCheckBox: TCheckBox
@@ -140,7 +142,9 @@ object FtpCfgDlg: TFtpCfgDlg
         Top = 81
         Width = 119
         Height = 20
-        Hint = 'Allow sysop access to local file system'
+        Hint = 
+          'Allow sysop access to local file system (requires sysop password' +
+          ')'
         Caption = 'Local File System'
         ParentShowHint = False
         ShowHint = True
@@ -222,7 +226,7 @@ object FtpCfgDlg: TFtpCfgDlg
       ImageIndex = 2
       object AnswerSoundLabel: TLabel
         Left = 7
-        Top = 11
+        Top = 10
         Width = 65
         Height = 20
         AutoSize = False
@@ -230,7 +234,7 @@ object FtpCfgDlg: TFtpCfgDlg
       end
       object HnagupSoundLabel: TLabel
         Left = 7
-        Top = 37
+        Top = 36
         Width = 65
         Height = 20
         AutoSize = False
@@ -238,15 +242,17 @@ object FtpCfgDlg: TFtpCfgDlg
       end
       object AnswerSoundEdit: TEdit
         Left = 72
-        Top = 11
+        Top = 10
         Width = 169
         Height = 21
-        Hint = 'WAV file to play when users connect'
+        Hint = 'Sound file to play when users connect'
+        ParentShowHint = False
+        ShowHint = True
         TabOrder = 0
       end
       object AnswerSoundButton: TButton
         Left = 247
-        Top = 11
+        Top = 10
         Width = 20
         Height = 21
         Caption = '...'
@@ -255,15 +261,17 @@ object FtpCfgDlg: TFtpCfgDlg
       end
       object HangupSoundEdit: TEdit
         Left = 72
-        Top = 37
+        Top = 36
         Width = 169
         Height = 21
-        Hint = 'WAV file to play when users disconnect'
+        Hint = 'Sound file to play when users disconnect'
+        ParentShowHint = False
+        ShowHint = True
         TabOrder = 2
       end
       object HangupSoundButton: TButton
         Left = 247
-        Top = 37
+        Top = 36
         Width = 20
         Height = 21
         Caption = '...'
diff --git a/src/sbbs3/ctrl/TelnetCfgDlgUnit.dfm b/src/sbbs3/ctrl/TelnetCfgDlgUnit.dfm
index 82cbff5777..102ec7863a 100644
--- a/src/sbbs3/ctrl/TelnetCfgDlgUnit.dfm
+++ b/src/sbbs3/ctrl/TelnetCfgDlgUnit.dfm
@@ -35,7 +35,7 @@ object TelnetCfgDlg: TTelnetCfgDlg
         Width = 78
         Height = 20
         AutoSize = False
-        Caption = 'Port'
+        Caption = 'Listening Port'
       end
       object FirstNodeLabel: TLabel
         Left = 7
@@ -58,9 +58,7 @@ object TelnetCfgDlg: TTelnetCfgDlg
         Top = 5
         Width = 117
         Height = 19
-        Hint = 
-          'Check this box if you want the Telnet server to automatically st' +
-          'art'
+        Hint = 'Automatically start Telnet server'
         Caption = 'Auto Startup'
         ParentShowHint = False
         ShowHint = True
@@ -83,6 +81,7 @@ object TelnetCfgDlg: TTelnetCfgDlg
         Top = 55
         Width = 39
         Height = 21
+        Hint = 'TCP port for incoming connections (default=23)'
         ParentShowHint = False
         ShowHint = True
         TabOrder = 2
@@ -92,10 +91,8 @@ object TelnetCfgDlg: TTelnetCfgDlg
         Top = 55
         Width = 117
         Height = 20
-        Hint = 
-          'Check this box if you want to configure WinSock to keep your dia' +
-          'l-up connection active'
-        Caption = 'Send Keep Alives'
+        Hint = 'Instruct WinSock to keep your dial-up connection active'
+        Caption = 'Send Keep-Alives'
         ParentShowHint = False
         ShowHint = True
         TabOrder = 3
@@ -105,6 +102,7 @@ object TelnetCfgDlg: TTelnetCfgDlg
         Top = 81
         Width = 39
         Height = 21
+        Hint = 'First node number available for Telnet logins'
         ParentShowHint = False
         ShowHint = True
         TabOrder = 4
@@ -114,10 +112,8 @@ object TelnetCfgDlg: TTelnetCfgDlg
         Top = 80
         Width = 117
         Height = 20
-        Hint = 
-          'Check this box if you want external programs to run in a minimiz' +
-          'ed window'
-        Caption = 'Minimize externals'
+        Hint = 'External programs run in a minimized window'
+        Caption = 'Minimize Externals'
         ParentShowHint = False
         ShowHint = True
         TabOrder = 5
@@ -127,6 +123,7 @@ object TelnetCfgDlg: TTelnetCfgDlg
         Top = 107
         Width = 39
         Height = 21
+        Hint = 'Last node number available for Telnet logins'
         ParentShowHint = False
         ShowHint = True
         TabOrder = 6
@@ -136,9 +133,7 @@ object TelnetCfgDlg: TTelnetCfgDlg
         Top = 106
         Width = 117
         Height = 19
-        Hint = 
-          'Check this box if you want your V exempt users to be able to aut' +
-          'o-logon based on their IP address'
+        Hint = 'Allow V-exempt users to auto-logon based on their IP address'
         Caption = 'AutoLogon via IP'
         ParentShowHint = False
         ShowHint = True
@@ -149,9 +144,7 @@ object TelnetCfgDlg: TTelnetCfgDlg
         Top = 5
         Width = 117
         Height = 19
-        Hint = 
-          'Check this box if you want to automatically lookup client'#39's host' +
-          'names via DNS'
+        Hint = 'Automatically lookup client'#39's hostnames via DNS'
         Caption = 'Hostname Lookup'
         ParentShowHint = False
         ShowHint = True
@@ -166,9 +159,7 @@ object TelnetCfgDlg: TTelnetCfgDlg
         Top = 5
         Width = 169
         Height = 19
-        Hint = 
-          'Check this box if you want to log (debug) all received Telnet co' +
-          'mmands'
+        Hint = 'Log (debug) all received Telnet commands'
         Caption = 'Received Commands'
         ParentShowHint = False
         ShowHint = True
@@ -180,7 +171,7 @@ object TelnetCfgDlg: TTelnetCfgDlg
       ImageIndex = 2
       object AnswerSoundLabel: TLabel
         Left = 7
-        Top = 11
+        Top = 10
         Width = 52
         Height = 20
         AutoSize = False
@@ -188,7 +179,7 @@ object TelnetCfgDlg: TTelnetCfgDlg
       end
       object HnagupSoundLabel: TLabel
         Left = 7
-        Top = 37
+        Top = 36
         Width = 52
         Height = 20
         AutoSize = False
@@ -196,14 +187,17 @@ object TelnetCfgDlg: TTelnetCfgDlg
       end
       object AnswerSoundEdit: TEdit
         Left = 72
-        Top = 11
+        Top = 10
         Width = 169
         Height = 21
+        Hint = 'Sound file to play when accepting an incoming connection'
+        ParentShowHint = False
+        ShowHint = True
         TabOrder = 0
       end
       object AnswerSoundButton: TButton
         Left = 247
-        Top = 11
+        Top = 10
         Width = 20
         Height = 21
         Caption = '...'
@@ -212,14 +206,17 @@ object TelnetCfgDlg: TTelnetCfgDlg
       end
       object HangupSoundEdit: TEdit
         Left = 72
-        Top = 37
+        Top = 36
         Width = 169
         Height = 21
+        Hint = 'Sound file to play when disconnecting'
+        ParentShowHint = False
+        ShowHint = True
         TabOrder = 2
       end
       object HangupSoundButton: TButton
         Left = 247
-        Top = 37
+        Top = 36
         Width = 20
         Height = 21
         Caption = '...'
-- 
GitLab