Annotation of sbbs/sbbs3/ctrl/telnetcfgdlgunit.dfm, revision 1.1.1.1

1.1       root        1: object TelnetCfgDlg: TTelnetCfgDlg
                      2:   Left = 699
                      3:   Top = 411
                      4:   BorderStyle = bsDialog
                      5:   Caption = 'Telnet Server Configuration'
                      6:   ClientHeight = 288
                      7:   ClientWidth = 352
                      8:   Color = clBtnFace
                      9:   ParentFont = True
                     10:   OldCreateOrder = True
                     11:   Position = poScreenCenter
                     12:   OnShow = FormShow
                     13:   PixelsPerInch = 120
                     14:   TextHeight = 16
                     15:   object PageControl: TPageControl
                     16:     Left = 4
                     17:     Top = 4
                     18:     Width = 342
                     19:     Height = 229
                     20:     ActivePage = GeneralTabSheet
                     21:     TabOrder = 0
                     22:     object GeneralTabSheet: TTabSheet
                     23:       Caption = 'General'
                     24:       object FirstNodeLabel: TLabel
                     25:         Left = 9
                     26:         Top = 12
                     27:         Width = 96
                     28:         Height = 25
                     29:         AutoSize = False
                     30:         Caption = 'First Node'
                     31:       end
                     32:       object LastNodeLabel: TLabel
                     33:         Left = 9
                     34:         Top = 44
                     35:         Width = 91
                     36:         Height = 25
                     37:         AutoSize = False
                     38:         Caption = 'Last Node'
                     39:       end
                     40:       object AutoStartCheckBox: TCheckBox
                     41:         Left = 182
                     42:         Top = 12
                     43:         Width = 144
                     44:         Height = 24
                     45:         Hint = 'Automatically start Telnet server'
                     46:         Caption = 'Auto Startup'
                     47:         ParentShowHint = False
                     48:         ShowHint = True
                     49:         TabOrder = 0
                     50:       end
                     51:       object FirstNodeEdit: TEdit
                     52:         Left = 105
                     53:         Top = 12
                     54:         Width = 48
                     55:         Height = 24
                     56:         Hint = 'First node number available for Telnet logins'
                     57:         ParentShowHint = False
                     58:         ShowHint = True
                     59:         TabOrder = 1
                     60:       end
                     61:       object XtrnMinCheckBox: TCheckBox
                     62:         Left = 182
                     63:         Top = 76
                     64:         Width = 144
                     65:         Height = 25
                     66:         Hint = 'External programs run in a minimized window'
                     67:         Caption = 'Minimize Externals'
                     68:         ParentShowHint = False
                     69:         ShowHint = True
                     70:         TabOrder = 2
                     71:       end
                     72:       object LastNodeEdit: TEdit
                     73:         Left = 105
                     74:         Top = 44
                     75:         Width = 48
                     76:         Height = 24
                     77:         Hint = 'Last node number available for Telnet logins'
                     78:         ParentShowHint = False
                     79:         ShowHint = True
                     80:         TabOrder = 3
                     81:       end
                     82:       object HostnameCheckBox: TCheckBox
                     83:         Left = 182
                     84:         Top = 44
                     85:         Width = 144
                     86:         Height = 24
                     87:         Hint = 'Automatically lookup client'#39's hostnames via DNS'
                     88:         Caption = 'Hostname Lookup'
                     89:         ParentShowHint = False
                     90:         ShowHint = True
                     91:         TabOrder = 4
                     92:       end
                     93:     end
                     94:     object TelnetTabSheet: TTabSheet
                     95:       Caption = 'Telnet'
                     96:       ImageIndex = 1
                     97:       object InterfaceLabel: TLabel
                     98:         Left = 9
                     99:         Top = 44
                    100:         Width = 96
                    101:         Height = 26
                    102:         AutoSize = False
                    103:         Caption = 'Interface (IP)'
                    104:       end
                    105:       object TelnetPortLabel: TLabel
                    106:         Left = 9
                    107:         Top = 12
                    108:         Width = 96
                    109:         Height = 26
                    110:         AutoSize = False
                    111:         Caption = 'Listening Port'
                    112:       end
                    113:       object CmdLogCheckBox: TCheckBox
                    114:         Left = 9
                    115:         Top = 108
                    116:         Width = 208
                    117:         Height = 26
                    118:         Hint = 'Log (debug) all received Telnet commands'
                    119:         Caption = 'Log Received Commands'
                    120:         ParentShowHint = False
                    121:         ShowHint = True
                    122:         TabOrder = 0
                    123:       end
                    124:       object TelnetInterfaceEdit: TEdit
                    125:         Left = 105
                    126:         Top = 44
                    127:         Width = 192
                    128:         Height = 24
                    129:         Hint = 
                    130:           'Enter your Network adapter'#39's static IP address here or blank for' +
                    131:           ' <ANY>'
                    132:         ParentShowHint = False
                    133:         ShowHint = True
                    134:         TabOrder = 1
                    135:       end
                    136:       object TelnetPortEdit: TEdit
                    137:         Left = 105
                    138:         Top = 12
                    139:         Width = 48
                    140:         Height = 24
                    141:         Hint = 'TCP port for incoming connections (default=23)'
                    142:         ParentShowHint = False
                    143:         ShowHint = True
                    144:         TabOrder = 2
                    145:       end
                    146:       object KeepAliveCheckBox: TCheckBox
                    147:         Left = 9
                    148:         Top = 76
                    149:         Width = 144
                    150:         Height = 26
                    151:         Hint = 'Instruct WinSock to keep your dial-up connection active'
                    152:         Caption = 'Send Keep-Alives'
                    153:         ParentShowHint = False
                    154:         ShowHint = True
                    155:         TabOrder = 3
                    156:       end
                    157:       object AutoLogonCheckBox: TCheckBox
                    158:         Left = 9
                    159:         Top = 140
                    160:         Width = 144
                    161:         Height = 24
                    162:         Hint = 'Allow V-exempt users to auto-logon based on their IP address'
                    163:         Caption = 'AutoLogon via IP'
                    164:         ParentShowHint = False
                    165:         ShowHint = True
                    166:         TabOrder = 4
                    167:       end
                    168:     end
                    169:     object RLoginTabSheet: TTabSheet
                    170:       Caption = 'RLogin'
                    171:       ImageIndex = 3
                    172:       object Label1: TLabel
                    173:         Left = 9
                    174:         Top = 12
                    175:         Width = 96
                    176:         Height = 26
                    177:         AutoSize = False
                    178:         Caption = 'Listening Port'
                    179:       end
                    180:       object Label2: TLabel
                    181:         Left = 9
                    182:         Top = 44
                    183:         Width = 96
                    184:         Height = 26
                    185:         AutoSize = False
                    186:         Caption = 'Interface (IP)'
                    187:       end
                    188:       object RLoginPortEdit: TEdit
                    189:         Left = 105
                    190:         Top = 12
                    191:         Width = 48
                    192:         Height = 24
                    193:         Hint = 'TCP port for incoming connections (default=513)'
                    194:         ParentShowHint = False
                    195:         ShowHint = True
                    196:         TabOrder = 0
                    197:       end
                    198:       object RLoginInterfaceEdit: TEdit
                    199:         Left = 105
                    200:         Top = 44
                    201:         Width = 192
                    202:         Height = 24
                    203:         Hint = 
                    204:           'Enter your Network adapter'#39's static IP address here or blank for' +
                    205:           ' <ANY>'
                    206:         ParentShowHint = False
                    207:         ShowHint = True
                    208:         TabOrder = 1
                    209:       end
                    210:       object RLoginEnabledCheckBox: TCheckBox
                    211:         Left = 226
                    212:         Top = 12
                    213:         Width = 90
                    214:         Height = 21
                    215:         Hint = 'Enable the RLogin port'
                    216:         Caption = 'Enabled'
                    217:         ParentShowHint = False
                    218:         ShowHint = True
                    219:         TabOrder = 2
                    220:         OnClick = RLoginEnabledCheckBoxClick
                    221:       end
                    222:       object RLoginIPallowButton: TButton
                    223:         Left = 194
                    224:         Top = 76
                    225:         Width = 103
                    226:         Height = 26
                    227:         Hint = 'IP addresses of trusted hosts to allow RLogins from'
                    228:         Caption = 'Allowed IPs'
                    229:         ParentShowHint = False
                    230:         ShowHint = True
                    231:         TabOrder = 3
                    232:         OnClick = RLoginIPallowButtonClick
                    233:       end
                    234:       object RLogin2ndNameCheckBox: TCheckBox
                    235:         Left = 9
                    236:         Top = 76
                    237:         Width = 169
                    238:         Height = 26
                    239:         Hint = 'Use 2nd RLogin account name for the BBS user name'
                    240:         Caption = 'Use 2nd Login Name'
                    241:         ParentShowHint = False
                    242:         ShowHint = True
                    243:         TabOrder = 4
                    244:       end
                    245:     end
                    246:     object SoundTabSheet: TTabSheet
                    247:       Caption = 'Sound'
                    248:       ImageIndex = 2
                    249:       object AnswerSoundLabel: TLabel
                    250:         Left = 9
                    251:         Top = 12
                    252:         Width = 64
                    253:         Height = 25
                    254:         AutoSize = False
                    255:         Caption = 'Answer'
                    256:       end
                    257:       object HnagupSoundLabel: TLabel
                    258:         Left = 9
                    259:         Top = 44
                    260:         Width = 64
                    261:         Height = 25
                    262:         AutoSize = False
                    263:         Caption = 'Hangup'
                    264:       end
                    265:       object AnswerSoundEdit: TEdit
                    266:         Left = 89
                    267:         Top = 12
                    268:         Width = 208
                    269:         Height = 24
                    270:         Hint = 'Sound file to play when accepting an incoming connection'
                    271:         ParentShowHint = False
                    272:         ShowHint = True
                    273:         TabOrder = 0
                    274:       end
                    275:       object AnswerSoundButton: TButton
                    276:         Left = 304
                    277:         Top = 12
                    278:         Width = 25
                    279:         Height = 26
                    280:         Caption = '...'
                    281:         TabOrder = 1
                    282:         OnClick = AnswerSoundButtonClick
                    283:       end
                    284:       object HangupSoundEdit: TEdit
                    285:         Left = 89
                    286:         Top = 44
                    287:         Width = 208
                    288:         Height = 24
                    289:         Hint = 'Sound file to play when disconnecting'
                    290:         ParentShowHint = False
                    291:         ShowHint = True
                    292:         TabOrder = 2
                    293:       end
                    294:       object HangupSoundButton: TButton
                    295:         Left = 304
                    296:         Top = 44
                    297:         Width = 25
                    298:         Height = 26
                    299:         Caption = '...'
                    300:         TabOrder = 3
                    301:         OnClick = HangupSoundButtonClick
                    302:       end
                    303:     end
                    304:   end
                    305:   object OKBtn: TButton
                    306:     Left = 25
                    307:     Top = 247
                    308:     Width = 93
                    309:     Height = 31
                    310:     Caption = 'OK'
                    311:     Default = True
                    312:     ModalResult = 1
                    313:     TabOrder = 1
                    314:     OnClick = OKBtnClick
                    315:   end
                    316:   object CancelBtn: TButton
                    317:     Left = 128
                    318:     Top = 247
                    319:     Width = 92
                    320:     Height = 31
                    321:     Cancel = True
                    322:     Caption = 'Cancel'
                    323:     ModalResult = 2
                    324:     TabOrder = 2
                    325:   end
                    326:   object ApplyBtn: TButton
                    327:     Left = 233
                    328:     Top = 247
                    329:     Width = 93
                    330:     Height = 31
                    331:     Cancel = True
                    332:     Caption = 'Apply'
                    333:     TabOrder = 3
                    334:     OnClick = OKBtnClick
                    335:   end
                    336:   object OpenDialog: TOpenDialog
                    337:     Filter = 'Wave Files|*.wav'
                    338:     Top = 248
                    339:   end
                    340: end

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.