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

1.1       root        1: object MailCfgDlg: TMailCfgDlg
                      2:   Left = 403
                      3:   Top = 140
                      4:   BorderStyle = bsDialog
                      5:   Caption = 'Mail Server Configuration'
                      6:   ClientHeight = 303
                      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 OKBtn: TButton
                     16:     Left = 25
                     17:     Top = 258
                     18:     Width = 92
                     19:     Height = 31
                     20:     Anchors = [akLeft, akBottom]
                     21:     Caption = 'OK'
                     22:     Default = True
                     23:     ModalResult = 1
                     24:     TabOrder = 0
                     25:     OnClick = OKBtnClick
                     26:   end
                     27:   object CancelBtn: TButton
                     28:     Left = 128
                     29:     Top = 258
                     30:     Width = 94
                     31:     Height = 31
                     32:     Anchors = [akLeft, akBottom]
                     33:     Cancel = True
                     34:     Caption = 'Cancel'
                     35:     ModalResult = 2
                     36:     TabOrder = 1
                     37:   end
                     38:   object ApplyButton: TButton
                     39:     Left = 233
                     40:     Top = 258
                     41:     Width = 92
                     42:     Height = 31
                     43:     Anchors = [akLeft, akBottom]
                     44:     Caption = 'Apply'
                     45:     TabOrder = 2
                     46:     OnClick = OKBtnClick
                     47:   end
                     48:   object PageControl: TPageControl
                     49:     Left = 4
                     50:     Top = 4
                     51:     Width = 342
                     52:     Height = 245
                     53:     ActivePage = SendMailTabSheet
                     54:     TabOrder = 3
                     55:     object GeneralTabSheet: TTabSheet
                     56:       Caption = 'General'
                     57:       object InterfaceLabel: TLabel
                     58:         Left = 9
                     59:         Top = 44
                     60:         Width = 104
                     61:         Height = 24
                     62:         AutoSize = False
                     63:         Caption = 'Interface (IP)'
                     64:         ParentShowHint = False
                     65:         ShowHint = True
                     66:       end
                     67:       object MaxClientsLabel: TLabel
                     68:         Left = 9
                     69:         Top = 76
                     70:         Width = 104
                     71:         Height = 24
                     72:         AutoSize = False
                     73:         Caption = 'Max Clients'
                     74:       end
                     75:       object MaxInactivityLabel: TLabel
                     76:         Left = 9
                     77:         Top = 108
                     78:         Width = 104
                     79:         Height = 24
                     80:         AutoSize = False
                     81:         Caption = 'Max Inactivity'
                     82:       end
                     83:       object AutoStartCheckBox: TCheckBox
                     84:         Left = 9
                     85:         Top = 12
                     86:         Width = 145
                     87:         Height = 24
                     88:         Hint = 'Automatically startup mail servers'
                     89:         Caption = 'Auto Startup'
                     90:         ParentShowHint = False
                     91:         ShowHint = True
                     92:         TabOrder = 0
                     93:       end
                     94:       object NetworkInterfaceEdit: TEdit
                     95:         Left = 113
                     96:         Top = 44
                     97:         Width = 185
                     98:         Height = 24
                     99:         Hint = 
                    100:           'Enter your Network adapter'#39's static IP address here or blank for' +
                    101:           ' <ANY>'
                    102:         ParentShowHint = False
                    103:         ShowHint = True
                    104:         TabOrder = 1
                    105:       end
                    106:       object MaxClientsEdit: TEdit
                    107:         Left = 113
                    108:         Top = 76
                    109:         Width = 48
                    110:         Height = 24
                    111:         Hint = 'Maximum number of simultaneous clients (default=10)'
                    112:         ParentShowHint = False
                    113:         ShowHint = True
                    114:         TabOrder = 2
                    115:       end
                    116:       object MaxInactivityEdit: TEdit
                    117:         Left = 113
                    118:         Top = 108
                    119:         Width = 48
                    120:         Height = 24
                    121:         Hint = 
                    122:           'Maximum number of seconds of inactivity before disconnect (defau' +
                    123:           'lt=120)'
                    124:         ParentShowHint = False
                    125:         ShowHint = True
                    126:         TabOrder = 3
                    127:       end
                    128:       object HostnameCheckBox: TCheckBox
                    129:         Left = 185
                    130:         Top = 12
                    131:         Width = 146
                    132:         Height = 24
                    133:         Hint = 'Automatically lookup client'#39's hostnames via DNS'
                    134:         Caption = 'Hostname Lookup'
                    135:         ParentShowHint = False
                    136:         ShowHint = True
                    137:         TabOrder = 4
                    138:       end
                    139:       object DebugTXCheckBox: TCheckBox
                    140:         Left = 185
                    141:         Top = 76
                    142:         Width = 146
                    143:         Height = 26
                    144:         Hint = 'Log all transmitted mail commands and responses (for debugging)'
                    145:         Caption = 'Log TX'
                    146:         ParentShowHint = False
                    147:         ShowHint = True
                    148:         TabOrder = 5
                    149:       end
                    150:       object LogFileCheckBox: TCheckBox
                    151:         Left = 185
                    152:         Top = 108
                    153:         Width = 146
                    154:         Height = 26
                    155:         Hint = 'Save log entries to a file (in your DATA directory)'
                    156:         Caption = 'Log to Disk'
                    157:         ParentShowHint = False
                    158:         ShowHint = True
                    159:         TabOrder = 6
                    160:       end
                    161:     end
                    162:     object SMTPTabSheet: TTabSheet
                    163:       Caption = 'SMTP'
                    164:       ImageIndex = 1
                    165:       object SpamFilterLabel: TLabel
                    166:         Left = 9
                    167:         Top = 44
                    168:         Width = 75
                    169:         Height = 16
                    170:         Caption = 'Spam Filters'
                    171:       end
                    172:       object TelnetPortLabel: TLabel
                    173:         Left = 9
                    174:         Top = 12
                    175:         Width = 104
                    176:         Height = 26
                    177:         AutoSize = False
                    178:         Caption = 'Listening Port'
                    179:       end
                    180:       object RBLCheckBox: TCheckBox
                    181:         Left = 113
                    182:         Top = 44
                    183:         Width = 57
                    184:         Height = 24
                    185:         Hint = 'Use Realtime Blackhole List (RBL) Spam Filter'
                    186:         Caption = 'RBL'
                    187:         ParentShowHint = False
                    188:         ShowHint = True
                    189:         TabOrder = 0
                    190:       end
                    191:       object RSSCheckBox: TCheckBox
                    192:         Left = 185
                    193:         Top = 44
                    194:         Width = 56
                    195:         Height = 24
                    196:         Hint = 'Use Relay Spam Stopper (RSS) Spam Filter'
                    197:         Caption = 'RSS'
                    198:         ParentShowHint = False
                    199:         ShowHint = True
                    200:         TabOrder = 1
                    201:       end
                    202:       object DULCheckBox: TCheckBox
                    203:         Left = 256
                    204:         Top = 44
                    205:         Width = 57
                    206:         Height = 24
                    207:         Hint = 'Use Dail-up User List (DUL) Spam Filter'
                    208:         Caption = 'DUL'
                    209:         ParentShowHint = False
                    210:         ShowHint = True
                    211:         TabOrder = 2
                    212:       end
                    213:       object SMTPPortEdit: TEdit
                    214:         Left = 113
                    215:         Top = 12
                    216:         Width = 48
                    217:         Height = 24
                    218:         Hint = 'TCP port number for incoming SMTP connections (default=25)'
                    219:         ParentShowHint = False
                    220:         ShowHint = True
                    221:         TabOrder = 3
                    222:       end
                    223:       object UserNumberCheckBox: TCheckBox
                    224:         Left = 185
                    225:         Top = 12
                    226:         Width = 147
                    227:         Height = 24
                    228:         Hint = 
                    229:           'Allow mail to be received for users by number (i.e "[email protected]' +
                    230:           'm")'
                    231:         Caption = 'RX by User Number'
                    232:         ParentShowHint = False
                    233:         ShowHint = True
                    234:         TabOrder = 4
                    235:       end
                    236:       object DebugHeadersCheckBox: TCheckBox
                    237:         Left = 185
                    238:         Top = 76
                    239:         Width = 146
                    240:         Height = 26
                    241:         Hint = 'Log all received mail headers (for debugging)'
                    242:         Caption = 'Log Headers'
                    243:         ParentShowHint = False
                    244:         ShowHint = True
                    245:         TabOrder = 5
                    246:       end
                    247:     end
                    248:     object POP3TabSheet: TTabSheet
                    249:       Caption = 'POP3'
                    250:       ImageIndex = 2
                    251:       object POP3PortLabel: TLabel
                    252:         Left = 9
                    253:         Top = 12
                    254:         Width = 102
                    255:         Height = 26
                    256:         AutoSize = False
                    257:         Caption = 'Listening Port'
                    258:       end
                    259:       object POP3PortEdit: TEdit
                    260:         Left = 113
                    261:         Top = 12
                    262:         Width = 48
                    263:         Height = 24
                    264:         Hint = 'TCP port number for incoming POP3 connections (default=110)'
                    265:         ParentShowHint = False
                    266:         ShowHint = True
                    267:         TabOrder = 0
                    268:       end
                    269:       object POP3LogCheckBox: TCheckBox
                    270:         Left = 185
                    271:         Top = 12
                    272:         Width = 70
                    273:         Height = 24
                    274:         Hint = 'Log all POP3 user activity'
                    275:         Caption = 'Log'
                    276:         ParentShowHint = False
                    277:         ShowHint = True
                    278:         TabOrder = 1
                    279:       end
                    280:       object POP3EnabledCheckBox: TCheckBox
                    281:         Left = 256
                    282:         Top = 12
                    283:         Width = 81
                    284:         Height = 24
                    285:         Hint = 'Enable the POP3 server (requires restart of mail server)'
                    286:         Caption = 'Enabled'
                    287:         ParentShowHint = False
                    288:         ShowHint = True
                    289:         TabOrder = 2
                    290:         OnClick = POP3EnabledCheckBoxClick
                    291:       end
                    292:     end
                    293:     object SendMailTabSheet: TTabSheet
                    294:       Caption = 'SendMail'
                    295:       ImageIndex = 3
                    296:       object RelayPortLabel: TLabel
                    297:         Left = 197
                    298:         Top = 172
                    299:         Width = 39
                    300:         Height = 26
                    301:         Alignment = taRightJustify
                    302:         AutoSize = False
                    303:         Caption = 'Port'
                    304:       end
                    305:       object DeliveryAttemptsLabel: TLabel
                    306:         Left = 9
                    307:         Top = 44
                    308:         Width = 104
                    309:         Height = 24
                    310:         AutoSize = False
                    311:         Caption = 'Max Attempts'
                    312:       end
                    313:       object RescanFreqLabel: TLabel
                    314:         Left = 167
                    315:         Top = 44
                    316:         Width = 71
                    317:         Height = 24
                    318:         Hint = 'Frequency (in seconds) of delivery attempts'
                    319:         Alignment = taRightJustify
                    320:         AutoSize = False
                    321:         Caption = 'Frequency'
                    322:       end
                    323:       object DNSRadioButton: TRadioButton
                    324:         Left = 9
                    325:         Top = 76
                    326:         Width = 104
                    327:         Height = 26
                    328:         Hint = 
                    329:           'Send mail directly to addressed mail server (requires DNS server' +
                    330:           ' access)'
                    331:         Caption = 'DNS Server'
                    332:         Checked = True
                    333:         ParentShowHint = False
                    334:         ShowHint = True
                    335:         TabOrder = 0
                    336:         TabStop = True
                    337:         OnClick = DNSRadioButtonClick
                    338:       end
                    339:       object DNSServerEdit: TEdit
                    340:         Left = 113
                    341:         Top = 76
                    342:         Width = 185
                    343:         Height = 24
                    344:         Hint = 'Host name or IP address of your ISP'#39's DNS server'
                    345:         ParentShowHint = False
                    346:         ShowHint = True
                    347:         TabOrder = 1
                    348:       end
                    349:       object TcpDnsCheckBox: TCheckBox
                    350:         Left = 250
                    351:         Top = 108
                    352:         Width = 65
                    353:         Height = 26
                    354:         Hint = 'Use TCP packets (instead of UDP) for DNS queries'
                    355:         Caption = 'TCP'
                    356:         ParentShowHint = False
                    357:         ShowHint = True
                    358:         TabOrder = 2
                    359:       end
                    360:       object RelayRadioButton: TRadioButton
                    361:         Left = 9
                    362:         Top = 140
                    363:         Width = 104
                    364:         Height = 26
                    365:         Hint = 'Route all mail through an SMTP relay server'
                    366:         Caption = 'Relay Server'
                    367:         ParentShowHint = False
                    368:         ShowHint = True
                    369:         TabOrder = 3
                    370:         OnClick = DNSRadioButtonClick
                    371:       end
                    372:       object RelayServerEdit: TEdit
                    373:         Left = 113
                    374:         Top = 140
                    375:         Width = 185
                    376:         Height = 24
                    377:         Hint = 
                    378:           'Host name or IP address of external SMTP server (for relaying ma' +
                    379:           'il)'
                    380:         ParentShowHint = False
                    381:         ShowHint = True
                    382:         TabOrder = 4
                    383:       end
                    384:       object RelayPortEdit: TEdit
                    385:         Left = 250
                    386:         Top = 172
                    387:         Width = 48
                    388:         Height = 24
                    389:         Hint = 'TCP port number for the SMTP relay server (default=25)'
                    390:         ParentShowHint = False
                    391:         ShowHint = True
                    392:         TabOrder = 5
                    393:       end
                    394:       object DeliveryAttemptsEdit: TEdit
                    395:         Left = 113
                    396:         Top = 44
                    397:         Width = 48
                    398:         Height = 24
                    399:         Hint = 'Maximum number of delivery attempts'
                    400:         ParentShowHint = False
                    401:         ShowHint = True
                    402:         TabOrder = 6
                    403:       end
                    404:       object RescanFreqEdit: TEdit
                    405:         Left = 250
                    406:         Top = 44
                    407:         Width = 48
                    408:         Height = 24
                    409:         Hint = 'Seconds between message base rescans'
                    410:         ParentShowHint = False
                    411:         ShowHint = True
                    412:         TabOrder = 7
                    413:       end
                    414:       object SendMailCheckBox: TCheckBox
                    415:         Left = 9
                    416:         Top = 12
                    417:         Width = 81
                    418:         Height = 24
                    419:         Hint = 'Enable the SendMail thread (requires restart of mail server)'
                    420:         Caption = 'Enabled'
                    421:         ParentShowHint = False
                    422:         ShowHint = True
                    423:         TabOrder = 8
                    424:         OnClick = SendMailCheckBoxClick
                    425:       end
                    426:     end
                    427:     object SoundTabSheet: TTabSheet
                    428:       Caption = 'Sound'
                    429:       ImageIndex = 4
                    430:       object SMTPSoundLabel: TLabel
                    431:         Left = 9
                    432:         Top = 12
                    433:         Width = 101
                    434:         Height = 24
                    435:         AutoSize = False
                    436:         Caption = 'Receive Mail'
                    437:       end
                    438:       object POP3SoundLabel: TLabel
                    439:         Left = 9
                    440:         Top = 76
                    441:         Width = 101
                    442:         Height = 26
                    443:         AutoSize = False
                    444:         Caption = 'POP3 Login'
                    445:       end
                    446:       object OutboundSoundLabel: TLabel
                    447:         Left = 9
                    448:         Top = 44
                    449:         Width = 101
                    450:         Height = 24
                    451:         AutoSize = False
                    452:         Caption = 'Sending Mail'
                    453:       end
                    454:       object InboundSoundEdit: TEdit
                    455:         Left = 113
                    456:         Top = 12
                    457:         Width = 185
                    458:         Height = 24
                    459:         Hint = 'Sound file to play when inbound SMTP connections are accepted'
                    460:         ParentShowHint = False
                    461:         ShowHint = True
                    462:         TabOrder = 0
                    463:       end
                    464:       object InboundSoundButton: TButton
                    465:         Left = 304
                    466:         Top = 12
                    467:         Width = 25
                    468:         Height = 26
                    469:         Caption = '...'
                    470:         TabOrder = 1
                    471:         OnClick = InboundSoundButtonClick
                    472:       end
                    473:       object POP3SoundEdit: TEdit
                    474:         Left = 113
                    475:         Top = 76
                    476:         Width = 185
                    477:         Height = 24
                    478:         Hint = 'Sound file to play when accepting POP3 connections'
                    479:         ParentShowHint = False
                    480:         ShowHint = True
                    481:         TabOrder = 2
                    482:       end
                    483:       object POP3SoundButton: TButton
                    484:         Left = 304
                    485:         Top = 76
                    486:         Width = 25
                    487:         Height = 26
                    488:         Caption = '...'
                    489:         TabOrder = 3
                    490:         OnClick = POP3SoundButtonClick
                    491:       end
                    492:       object OutboundSoundEdit: TEdit
                    493:         Left = 113
                    494:         Top = 44
                    495:         Width = 185
                    496:         Height = 24
                    497:         Hint = 'Sound file to play when sending mail'
                    498:         ParentShowHint = False
                    499:         ShowHint = True
                    500:         TabOrder = 4
                    501:       end
                    502:       object OutboundSoundButton: TButton
                    503:         Left = 304
                    504:         Top = 44
                    505:         Width = 25
                    506:         Height = 26
                    507:         Caption = '...'
                    508:         TabOrder = 5
                    509:         OnClick = OutboundSoundButtonClick
                    510:       end
                    511:     end
                    512:   end
                    513:   object OpenDialog: TOpenDialog
                    514:     Filter = 'Wave Files|*.wav'
                    515:     Left = 8
                    516:     Top = 480
                    517:   end
                    518: end

unix.superglobalmegacorp.com

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