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

1.1       root        1: object FtpCfgDlg: TFtpCfgDlg
                      2:   Left = 466
                      3:   Top = 622
                      4:   BorderStyle = bsDialog
                      5:   Caption = 'FTP 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 MaxClientesLabel: TLabel
                     25:         Left = 9
                     26:         Top = 102
                     27:         Width = 96
                     28:         Height = 24
                     29:         AutoSize = False
                     30:         Caption = 'Max Clients'
                     31:       end
                     32:       object MaxInactivityLabel: TLabel
                     33:         Left = 9
                     34:         Top = 132
                     35:         Width = 96
                     36:         Height = 24
                     37:         AutoSize = False
                     38:         Caption = 'Max Inactivity'
                     39:       end
                     40:       object PortLabel: TLabel
                     41:         Left = 9
                     42:         Top = 68
                     43:         Width = 96
                     44:         Height = 24
                     45:         AutoSize = False
                     46:         Caption = 'Control Port'
                     47:       end
                     48:       object InterfaceLabel: TLabel
                     49:         Left = 9
                     50:         Top = 36
                     51:         Width = 96
                     52:         Height = 24
                     53:         AutoSize = False
                     54:         Caption = 'Interface (IP)'
                     55:       end
                     56:       object AutoStartCheckBox: TCheckBox
                     57:         Left = 9
                     58:         Top = 6
                     59:         Width = 144
                     60:         Height = 24
                     61:         Hint = 'Automatically start FTP server'
                     62:         Caption = 'Auto Startup'
                     63:         ParentShowHint = False
                     64:         ShowHint = True
                     65:         TabOrder = 0
                     66:       end
                     67:       object MaxClientsEdit: TEdit
                     68:         Left = 105
                     69:         Top = 100
                     70:         Width = 48
                     71:         Height = 24
                     72:         Hint = 'Maximum number of simultaneous clients (default=10)'
                     73:         ParentShowHint = False
                     74:         ShowHint = True
                     75:         TabOrder = 1
                     76:       end
                     77:       object MaxInactivityEdit: TEdit
                     78:         Left = 105
                     79:         Top = 132
                     80:         Width = 48
                     81:         Height = 24
                     82:         Hint = 
                     83:           'Maximum number of seconds of inactivity before disconnect (defau' +
                     84:           'lt=300)'
                     85:         ParentShowHint = False
                     86:         ShowHint = True
                     87:         TabOrder = 2
                     88:       end
                     89:       object PortEdit: TEdit
                     90:         Left = 105
                     91:         Top = 68
                     92:         Width = 48
                     93:         Height = 24
                     94:         Hint = 'TCP port to use for FTP control connections (default=21)'
                     95:         ParentShowHint = False
                     96:         ShowHint = True
                     97:         TabOrder = 3
                     98:       end
                     99:       object NetworkInterfaceEdit: TEdit
                    100:         Left = 105
                    101:         Top = 36
                    102:         Width = 192
                    103:         Height = 24
                    104:         Hint = 'Your network adapter'#39's static IP address or blank for <ANY>'
                    105:         ParentShowHint = False
                    106:         ShowHint = True
                    107:         TabOrder = 4
                    108:       end
                    109:       object AutoIndexCheckBox: TCheckBox
                    110:         Left = 9
                    111:         Top = 162
                    112:         Width = 96
                    113:         Height = 24
                    114:         Hint = 'Automatically generate index files for file descriptions'
                    115:         Caption = 'Auto Index'
                    116:         TabOrder = 5
                    117:         OnClick = AutoIndexCheckBoxClick
                    118:       end
                    119:       object IndexFileNameEdit: TEdit
                    120:         Left = 105
                    121:         Top = 164
                    122:         Width = 192
                    123:         Height = 24
                    124:         Hint = 'Name of auto-index file (default=00index)'
                    125:         ParentShowHint = False
                    126:         ShowHint = True
                    127:         TabOrder = 6
                    128:       end
                    129:       object AllowQWKCheckBox: TCheckBox
                    130:         Left = 182
                    131:         Top = 68
                    132:         Width = 147
                    133:         Height = 24
                    134:         Hint = 'Allow QWK packet transfers'
                    135:         Caption = 'QWK Packets'
                    136:         ParentShowHint = False
                    137:         ShowHint = True
                    138:         TabOrder = 7
                    139:       end
                    140:       object LocalFileSysCheckBox: TCheckBox
                    141:         Left = 182
                    142:         Top = 100
                    143:         Width = 147
                    144:         Height = 24
                    145:         Hint = 
                    146:           'Allow sysop access to local file system (requires sysop password' +
                    147:           ')'
                    148:         Caption = 'Local File System'
                    149:         ParentShowHint = False
                    150:         ShowHint = True
                    151:         TabOrder = 8
                    152:       end
                    153:       object HostnameCheckBox: TCheckBox
                    154:         Left = 182
                    155:         Top = 6
                    156:         Width = 147
                    157:         Height = 24
                    158:         Hint = 'Automatically lookup client'#39's hostnames via DNS'
                    159:         Caption = 'Hostname Lookup'
                    160:         ParentShowHint = False
                    161:         ShowHint = True
                    162:         TabOrder = 9
                    163:       end
                    164:       object DirFilesCheckBox: TCheckBox
                    165:         Left = 182
                    166:         Top = 129
                    167:         Width = 154
                    168:         Height = 25
                    169:         Hint = 'Allow users access to files in directory, but not in database'
                    170:         Caption = 'Directory File Access'
                    171:         ParentShowHint = False
                    172:         ShowHint = True
                    173:         TabOrder = 10
                    174:       end
                    175:     end
                    176:     object LogTabSheet: TTabSheet
                    177:       Caption = 'Log'
                    178:       ImageIndex = 1
                    179:       object DebugTxCheckBox: TCheckBox
                    180:         Left = 9
                    181:         Top = 36
                    182:         Width = 192
                    183:         Height = 24
                    184:         Hint = 'Log (debug) transmitted FTP responses'
                    185:         Caption = 'Transmitted Responses'
                    186:         ParentShowHint = False
                    187:         ShowHint = True
                    188:         TabOrder = 0
                    189:       end
                    190:       object CmdLogCheckBox: TCheckBox
                    191:         Left = 9
                    192:         Top = 6
                    193:         Width = 192
                    194:         Height = 24
                    195:         Hint = 'Log (debug) all received FTP commands'
                    196:         Caption = 'Received Commands'
                    197:         ParentShowHint = False
                    198:         ShowHint = True
                    199:         TabOrder = 1
                    200:       end
                    201:       object DebugDataCheckBox: TCheckBox
                    202:         Left = 9
                    203:         Top = 66
                    204:         Width = 192
                    205:         Height = 24
                    206:         Hint = 'Log (debug) data channel operations'
                    207:         Caption = 'Data Channel Activity'
                    208:         ParentShowHint = False
                    209:         ShowHint = True
                    210:         TabOrder = 2
                    211:       end
                    212:       object LogFileCheckBox: TCheckBox
                    213:         Left = 9
                    214:         Top = 96
                    215:         Width = 144
                    216:         Height = 25
                    217:         Hint = 'Save log entries to a file (in your DATA directory)'
                    218:         Caption = 'Log to Disk'
                    219:         ParentShowHint = False
                    220:         ShowHint = True
                    221:         TabOrder = 3
                    222:       end
                    223:     end
                    224:     object SoundTabSheet: TTabSheet
                    225:       Caption = 'Sound'
                    226:       ImageIndex = 2
                    227:       object AnswerSoundLabel: TLabel
                    228:         Left = 9
                    229:         Top = 12
                    230:         Width = 80
                    231:         Height = 25
                    232:         AutoSize = False
                    233:         Caption = 'Connect'
                    234:       end
                    235:       object HnagupSoundLabel: TLabel
                    236:         Left = 9
                    237:         Top = 44
                    238:         Width = 80
                    239:         Height = 25
                    240:         AutoSize = False
                    241:         Caption = 'Disconnect'
                    242:       end
                    243:       object AnswerSoundEdit: TEdit
                    244:         Left = 89
                    245:         Top = 12
                    246:         Width = 208
                    247:         Height = 24
                    248:         Hint = 'Sound file to play when users connect'
                    249:         ParentShowHint = False
                    250:         ShowHint = True
                    251:         TabOrder = 0
                    252:       end
                    253:       object AnswerSoundButton: TButton
                    254:         Left = 304
                    255:         Top = 12
                    256:         Width = 25
                    257:         Height = 26
                    258:         Caption = '...'
                    259:         TabOrder = 1
                    260:         OnClick = AnswerSoundButtonClick
                    261:       end
                    262:       object HangupSoundEdit: TEdit
                    263:         Left = 89
                    264:         Top = 44
                    265:         Width = 208
                    266:         Height = 24
                    267:         Hint = 'Sound file to play when users disconnect'
                    268:         ParentShowHint = False
                    269:         ShowHint = True
                    270:         TabOrder = 2
                    271:       end
                    272:       object HangupSoundButton: TButton
                    273:         Left = 304
                    274:         Top = 44
                    275:         Width = 25
                    276:         Height = 26
                    277:         Caption = '...'
                    278:         TabOrder = 3
                    279:         OnClick = HangupSoundButtonClick
                    280:       end
                    281:     end
                    282:   end
                    283:   object OKBtn: TButton
                    284:     Left = 25
                    285:     Top = 247
                    286:     Width = 93
                    287:     Height = 30
                    288:     Anchors = [akLeft, akBottom]
                    289:     Caption = 'OK'
                    290:     Default = True
                    291:     ModalResult = 1
                    292:     TabOrder = 1
                    293:     OnClick = OKBtnClick
                    294:   end
                    295:   object CancelBtn: TButton
                    296:     Left = 128
                    297:     Top = 247
                    298:     Width = 92
                    299:     Height = 30
                    300:     Anchors = [akLeft, akBottom]
                    301:     Cancel = True
                    302:     Caption = 'Cancel'
                    303:     ModalResult = 2
                    304:     TabOrder = 2
                    305:   end
                    306:   object ApplyBtn: TButton
                    307:     Left = 233
                    308:     Top = 247
                    309:     Width = 93
                    310:     Height = 30
                    311:     Anchors = [akLeft, akBottom]
                    312:     Cancel = True
                    313:     Caption = 'Apply'
                    314:     TabOrder = 3
                    315:     OnClick = OKBtnClick
                    316:   end
                    317:   object OpenDialog: TOpenDialog
                    318:     Filter = 'Wave Files|*.wav'
                    319:     Top = 240
                    320:   end
                    321: end

unix.superglobalmegacorp.com

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