|
|
1.1 root 1: object MailCfgDlg: TMailCfgDlg 1.1.1.2 ! root 2: Left = 501 ! 3: Top = 339 1.1 root 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 1.1.1.2 ! root 13: DesignSize = ( ! 14: 352 ! 15: 303) 1.1 root 16: PixelsPerInch = 120 17: TextHeight = 16 18: object OKBtn: TButton 19: Left = 25 20: Top = 258 21: Width = 92 22: Height = 31 23: Anchors = [akLeft, akBottom] 24: Caption = 'OK' 25: Default = True 26: ModalResult = 1 27: TabOrder = 0 28: OnClick = OKBtnClick 29: end 30: object CancelBtn: TButton 31: Left = 128 32: Top = 258 33: Width = 94 34: Height = 31 35: Anchors = [akLeft, akBottom] 36: Cancel = True 37: Caption = 'Cancel' 38: ModalResult = 2 39: TabOrder = 1 40: end 41: object ApplyButton: TButton 42: Left = 233 43: Top = 258 44: Width = 92 45: Height = 31 46: Anchors = [akLeft, akBottom] 47: Caption = 'Apply' 48: TabOrder = 2 49: OnClick = OKBtnClick 50: end 51: object PageControl: TPageControl 52: Left = 4 53: Top = 4 54: Width = 342 55: Height = 245 1.1.1.2 ! root 56: ActivePage = RelayTabSheet ! 57: TabIndex = 4 1.1 root 58: TabOrder = 3 59: object GeneralTabSheet: TTabSheet 60: Caption = 'General' 61: object InterfaceLabel: TLabel 62: Left = 9 63: Top = 44 64: Width = 104 65: Height = 24 66: AutoSize = False 67: Caption = 'Interface (IP)' 68: ParentShowHint = False 69: ShowHint = True 70: end 71: object MaxClientsLabel: TLabel 72: Left = 9 73: Top = 76 74: Width = 104 75: Height = 24 76: AutoSize = False 77: Caption = 'Max Clients' 78: end 79: object MaxInactivityLabel: TLabel 80: Left = 9 81: Top = 108 82: Width = 104 83: Height = 24 84: AutoSize = False 85: Caption = 'Max Inactivity' 86: end 1.1.1.2 ! root 87: object LinesPerYieldLabel: TLabel ! 88: Left = 9 ! 89: Top = 140 ! 90: Width = 104 ! 91: Height = 24 ! 92: AutoSize = False ! 93: Caption = 'Lines Per Yield' ! 94: end 1.1 root 95: object AutoStartCheckBox: TCheckBox 96: Left = 9 97: Top = 12 98: Width = 145 99: Height = 24 100: Hint = 'Automatically startup mail servers' 101: Caption = 'Auto Startup' 102: ParentShowHint = False 103: ShowHint = True 104: TabOrder = 0 105: end 106: object NetworkInterfaceEdit: TEdit 107: Left = 113 108: Top = 44 109: Width = 185 110: Height = 24 111: Hint = 112: 'Enter your Network adapter'#39's static IP address here or blank for' + 113: ' <ANY>' 114: ParentShowHint = False 115: ShowHint = True 1.1.1.2 ! root 116: TabOrder = 2 1.1 root 117: end 118: object MaxClientsEdit: TEdit 119: Left = 113 120: Top = 76 121: Width = 48 122: Height = 24 123: Hint = 'Maximum number of simultaneous clients (default=10)' 124: ParentShowHint = False 125: ShowHint = True 1.1.1.2 ! root 126: TabOrder = 3 1.1 root 127: end 128: object MaxInactivityEdit: TEdit 129: Left = 113 130: Top = 108 131: Width = 48 132: Height = 24 133: Hint = 134: 'Maximum number of seconds of inactivity before disconnect (defau' + 135: 'lt=120)' 136: ParentShowHint = False 137: ShowHint = True 1.1.1.2 ! root 138: TabOrder = 4 1.1 root 139: end 140: object HostnameCheckBox: TCheckBox 141: Left = 185 142: Top = 12 143: Width = 146 144: Height = 24 145: Hint = 'Automatically lookup client'#39's hostnames via DNS' 146: Caption = 'Hostname Lookup' 147: ParentShowHint = False 148: ShowHint = True 1.1.1.2 ! root 149: TabOrder = 1 1.1 root 150: end 151: object DebugTXCheckBox: TCheckBox 152: Left = 185 153: Top = 76 154: Width = 146 1.1.1.2 ! root 155: Height = 24 1.1 root 156: Hint = 'Log all transmitted mail commands and responses (for debugging)' 1.1.1.2 ! root 157: Caption = 'Log Transmissions' 1.1 root 158: ParentShowHint = False 159: ShowHint = True 1.1.1.2 ! root 160: TabOrder = 6 1.1 root 161: end 162: object LogFileCheckBox: TCheckBox 163: Left = 185 1.1.1.2 ! root 164: Top = 140 1.1 root 165: Width = 146 1.1.1.2 ! root 166: Height = 24 1.1 root 167: Hint = 'Save log entries to a file (in your DATA directory)' 168: Caption = 'Log to Disk' 169: ParentShowHint = False 170: ShowHint = True 1.1.1.2 ! root 171: TabOrder = 7 ! 172: end ! 173: object LinesPerYieldEdit: TEdit ! 174: Left = 113 ! 175: Top = 140 ! 176: Width = 48 ! 177: Height = 24 ! 178: Hint = ! 179: 'Number of lines of message text sent/received between time-slice' + ! 180: ' yields' ! 181: ParentShowHint = False ! 182: ShowHint = True ! 183: TabOrder = 5 ! 184: end ! 185: object DebugRXCheckBox: TCheckBox ! 186: Left = 185 ! 187: Top = 108 ! 188: Width = 146 ! 189: Height = 24 ! 190: Hint = 'Log all transmitted mail commands and responses (for debugging)' ! 191: Caption = 'Log Responses' ! 192: ParentShowHint = False ! 193: ShowHint = True ! 194: TabOrder = 8 1.1 root 195: end 196: end 197: object SMTPTabSheet: TTabSheet 198: Caption = 'SMTP' 199: ImageIndex = 1 200: object TelnetPortLabel: TLabel 201: Left = 9 202: Top = 12 203: Width = 104 1.1.1.2 ! root 204: Height = 24 1.1 root 205: AutoSize = False 206: Caption = 'Listening Port' 207: end 1.1.1.2 ! root 208: object DefaultUserLabel: TLabel ! 209: Left = 9 ! 210: Top = 108 ! 211: Width = 104 ! 212: Height = 24 ! 213: AutoSize = False ! 214: Caption = 'Default User' ! 215: end ! 216: object MaxRecipientsLabel: TLabel ! 217: Left = 9 1.1 root 218: Top = 44 1.1.1.2 ! root 219: Width = 104 1.1 root 220: Height = 24 1.1.1.2 ! root 221: AutoSize = False ! 222: Caption = 'Max Recipients' ! 223: end ! 224: object MaxMsgSizeLabel: TLabel ! 225: Left = 9 ! 226: Top = 76 ! 227: Width = 104 ! 228: Height = 24 ! 229: AutoSize = False ! 230: Caption = 'Max Msg Size' ! 231: end ! 232: object SMTPPortEdit: TEdit ! 233: Left = 113 ! 234: Top = 12 ! 235: Width = 48 ! 236: Height = 24 ! 237: Hint = 'TCP port number for incoming SMTP connections (default=25)' 1.1 root 238: ParentShowHint = False 239: ShowHint = True 240: TabOrder = 0 241: end 1.1.1.2 ! root 242: object DebugHeadersCheckBox: TCheckBox 1.1 root 243: Left = 185 1.1.1.2 ! root 244: Top = 12 ! 245: Width = 146 1.1 root 246: Height = 24 1.1.1.2 ! root 247: Hint = 'Log all received mail headers (for debugging)' ! 248: Caption = 'Log Headers' 1.1 root 249: ParentShowHint = False 250: ShowHint = True 251: TabOrder = 1 252: end 1.1.1.2 ! root 253: object DefaultUserEdit: TEdit ! 254: Left = 113 ! 255: Top = 108 ! 256: Width = 185 1.1 root 257: Height = 24 1.1.1.2 ! root 258: Hint = ! 259: 'Mail for unknown users will go into this user'#39's mailbox (e.g. "s' + ! 260: 'ysop")' 1.1 root 261: ParentShowHint = False 262: ShowHint = True 1.1.1.2 ! root 263: TabOrder = 3 1.1 root 264: end 1.1.1.2 ! root 265: object AllowRelayCheckBox: TCheckBox ! 266: Left = 9 ! 267: Top = 143 ! 268: Width = 288 ! 269: Height = 23 ! 270: Hint = 'Allow authenticated users to relay mail through this server' ! 271: Caption = 'Allow Authenticated Users to Relay Mail' ! 272: ParentShowHint = False ! 273: ShowHint = True ! 274: TabOrder = 4 ! 275: OnClick = AllowRelayCheckBoxClick ! 276: end ! 277: object MaxRecipientsEdit: TEdit 1.1 root 278: Left = 113 1.1.1.2 ! root 279: Top = 44 1.1 root 280: Width = 48 281: Height = 24 1.1.1.2 ! root 282: Hint = 'Maximum number of recipients for a single message' 1.1 root 283: ParentShowHint = False 284: ShowHint = True 1.1.1.2 ! root 285: TabOrder = 2 1.1 root 286: end 1.1.1.2 ! root 287: object MaxMsgSizeEdit: TEdit ! 288: Left = 113 ! 289: Top = 76 ! 290: Width = 80 1.1 root 291: Height = 24 1.1.1.2 ! root 292: Hint = 'Maximum received message size (in bytes)' ! 293: ParentShowHint = False ! 294: ShowHint = True ! 295: TabOrder = 5 ! 296: end ! 297: object AuthViaIpCheckBox: TCheckBox ! 298: Left = 9 ! 299: Top = 175 ! 300: Width = 288 ! 301: Height = 23 1.1 root 302: Hint = 1.1.1.2 ! root 303: 'Allow SMTP authentication via other protocols (e.g. POP3, Telnet' + ! 304: ', etc) for relay' ! 305: Caption = 'Allow Authentication via POP3, Telnet, etc.' 1.1 root 306: ParentShowHint = False 307: ShowHint = True 1.1.1.2 ! root 308: TabOrder = 6 1.1 root 309: end 1.1.1.2 ! root 310: object NotifyCheckBox: TCheckBox 1.1 root 311: Left = 185 1.1.1.2 ! root 312: Top = 44 1.1 root 313: Width = 146 1.1.1.2 ! root 314: Height = 24 ! 315: Hint = 'Notify local mail recipients of received e-mails' ! 316: Caption = 'Notify Recipients' 1.1 root 317: ParentShowHint = False 318: ShowHint = True 1.1.1.2 ! root 319: TabOrder = 7 1.1 root 320: end 321: end 322: object POP3TabSheet: TTabSheet 323: Caption = 'POP3' 324: ImageIndex = 2 325: object POP3PortLabel: TLabel 326: Left = 9 327: Top = 12 328: Width = 102 1.1.1.2 ! root 329: Height = 24 1.1 root 330: AutoSize = False 331: Caption = 'Listening Port' 332: end 333: object POP3PortEdit: TEdit 334: Left = 113 335: Top = 12 336: Width = 48 337: Height = 24 338: Hint = 'TCP port number for incoming POP3 connections (default=110)' 339: ParentShowHint = False 340: ShowHint = True 341: TabOrder = 0 342: end 343: object POP3LogCheckBox: TCheckBox 344: Left = 185 345: Top = 12 346: Width = 70 347: Height = 24 348: Hint = 'Log all POP3 user activity' 349: Caption = 'Log' 350: ParentShowHint = False 351: ShowHint = True 352: TabOrder = 1 353: end 354: object POP3EnabledCheckBox: TCheckBox 355: Left = 256 356: Top = 12 357: Width = 81 358: Height = 24 359: Hint = 'Enable the POP3 server (requires restart of mail server)' 360: Caption = 'Enabled' 361: ParentShowHint = False 362: ShowHint = True 363: TabOrder = 2 364: OnClick = POP3EnabledCheckBoxClick 365: end 366: end 367: object SendMailTabSheet: TTabSheet 368: Caption = 'SendMail' 369: ImageIndex = 3 370: object DeliveryAttemptsLabel: TLabel 371: Left = 9 372: Top = 44 373: Width = 104 374: Height = 24 375: AutoSize = False 376: Caption = 'Max Attempts' 377: end 378: object RescanFreqLabel: TLabel 379: Left = 167 380: Top = 44 381: Width = 71 382: Height = 24 383: Hint = 'Frequency (in seconds) of delivery attempts' 384: Alignment = taRightJustify 385: AutoSize = False 386: Caption = 'Frequency' 387: end 1.1.1.2 ! root 388: object DNSServerLabel: TLabel ! 389: Left = 9 ! 390: Top = 152 ! 391: Width = 72 ! 392: Height = 16 ! 393: Caption = 'DNS Server' ! 394: end 1.1 root 395: object DNSRadioButton: TRadioButton 396: Left = 9 1.1.1.2 ! root 397: Top = 116 ! 398: Width = 184 1.1 root 399: Height = 26 400: Hint = 401: 'Send mail directly to addressed mail server (requires DNS server' + 402: ' access)' 1.1.1.2 ! root 403: Caption = 'Direct Mail Delivery' 1.1 root 404: Checked = True 405: ParentShowHint = False 406: ShowHint = True 1.1.1.2 ! root 407: TabOrder = 3 1.1 root 408: TabStop = True 409: OnClick = DNSRadioButtonClick 410: end 411: object DNSServerEdit: TEdit 412: Left = 113 1.1.1.2 ! root 413: Top = 148 1.1 root 414: Width = 185 415: Height = 24 416: Hint = 'Host name or IP address of your ISP'#39's DNS server' 417: ParentShowHint = False 418: ShowHint = True 1.1.1.2 ! root 419: TabOrder = 4 1.1 root 420: end 421: object TcpDnsCheckBox: TCheckBox 422: Left = 250 1.1.1.2 ! root 423: Top = 180 1.1 root 424: Width = 65 1.1.1.2 ! root 425: Height = 24 1.1 root 426: Hint = 'Use TCP packets (instead of UDP) for DNS queries' 427: Caption = 'TCP' 428: ParentShowHint = False 429: ShowHint = True 1.1.1.2 ! root 430: TabOrder = 5 1.1 root 431: end 432: object RelayRadioButton: TRadioButton 433: Left = 9 1.1.1.2 ! root 434: Top = 84 ! 435: Width = 192 1.1 root 436: Height = 26 437: Hint = 'Route all mail through an SMTP relay server' 1.1.1.2 ! root 438: Caption = 'Use Relay Server' 1.1 root 439: ParentShowHint = False 440: ShowHint = True 1.1.1.2 ! root 441: TabOrder = 6 1.1 root 442: OnClick = DNSRadioButtonClick 443: end 444: object DeliveryAttemptsEdit: TEdit 445: Left = 113 446: Top = 44 447: Width = 48 448: Height = 24 449: Hint = 'Maximum number of delivery attempts' 450: ParentShowHint = False 451: ShowHint = True 1.1.1.2 ! root 452: TabOrder = 1 1.1 root 453: end 454: object RescanFreqEdit: TEdit 455: Left = 250 456: Top = 44 457: Width = 48 458: Height = 24 459: Hint = 'Seconds between message base rescans' 460: ParentShowHint = False 461: ShowHint = True 1.1.1.2 ! root 462: TabOrder = 2 1.1 root 463: end 464: object SendMailCheckBox: TCheckBox 465: Left = 9 466: Top = 12 467: Width = 81 468: Height = 24 469: Hint = 'Enable the SendMail thread (requires restart of mail server)' 470: Caption = 'Enabled' 471: ParentShowHint = False 472: ShowHint = True 1.1.1.2 ! root 473: TabOrder = 0 1.1 root 474: OnClick = SendMailCheckBoxClick 475: end 476: end 1.1.1.2 ! root 477: object RelayTabSheet: TTabSheet ! 478: Caption = 'Relay' ! 479: ImageIndex = 6 ! 480: object RelayPortLabel: TLabel ! 481: Left = 240 ! 482: Top = 12 ! 483: Width = 33 ! 484: Height = 26 ! 485: Alignment = taRightJustify ! 486: AutoSize = False ! 487: Caption = 'Port' ! 488: end ! 489: object RelayServerLabel: TLabel ! 490: Left = 9 ! 491: Top = 12 ! 492: Width = 40 ! 493: Height = 16 ! 494: Caption = 'Server' ! 495: end ! 496: object RelayServerEdit: TEdit ! 497: Left = 65 ! 498: Top = 12 ! 499: Width = 168 ! 500: Height = 24 ! 501: Hint = ! 502: 'Host name or IP address of external SMTP server (for relaying ma' + ! 503: 'il)' ! 504: ParentShowHint = False ! 505: ShowHint = True ! 506: TabOrder = 0 ! 507: end ! 508: object RelayPortEdit: TEdit ! 509: Left = 282 ! 510: Top = 12 ! 511: Width = 39 ! 512: Height = 24 ! 513: Hint = 'TCP port number for the SMTP relay server (default=25)' ! 514: ParentShowHint = False ! 515: ShowHint = True ! 516: TabOrder = 1 ! 517: end ! 518: object RelayAuthGroupBox: TGroupBox ! 519: Left = 9 ! 520: Top = 41 ! 521: Width = 320 ! 522: Height = 160 ! 523: Caption = 'Authentication:' ! 524: TabOrder = 2 ! 525: object RelayAuthNameLabel: TLabel ! 526: Left = 16 ! 527: Top = 92 ! 528: Width = 80 ! 529: Height = 26 ! 530: AutoSize = False ! 531: Caption = 'Name' ! 532: end ! 533: object RelayAuthPassLabel: TLabel ! 534: Left = 16 ! 535: Top = 121 ! 536: Width = 80 ! 537: Height = 25 ! 538: AutoSize = False ! 539: Caption = 'Password' ! 540: end ! 541: object RelayAuthNoneRadioButton: TRadioButton ! 542: Left = 16 ! 543: Top = 28 ! 544: Width = 113 ! 545: Height = 24 ! 546: Caption = 'None' ! 547: Checked = True ! 548: TabOrder = 0 ! 549: TabStop = True ! 550: OnClick = RelayAuthRadioButtonClick ! 551: end ! 552: object RelayAuthPlainRadioButton: TRadioButton ! 553: Left = 169 ! 554: Top = 28 ! 555: Width = 113 ! 556: Height = 24 ! 557: Caption = 'Plain' ! 558: TabOrder = 1 ! 559: OnClick = RelayAuthRadioButtonClick ! 560: end ! 561: object RelayAuthLoginRadioButton: TRadioButton ! 562: Left = 169 ! 563: Top = 57 ! 564: Width = 113 ! 565: Height = 24 ! 566: Caption = 'Login' ! 567: TabOrder = 2 ! 568: OnClick = RelayAuthRadioButtonClick ! 569: end ! 570: object RelayAuthCramMD5RadioButton: TRadioButton ! 571: Left = 16 ! 572: Top = 57 ! 573: Width = 113 ! 574: Height = 24 ! 575: Caption = 'CRAM-MD5' ! 576: TabOrder = 3 ! 577: OnClick = RelayAuthRadioButtonClick ! 578: end ! 579: object RelayAuthNameEdit: TEdit ! 580: Left = 105 ! 581: Top = 92 ! 582: Width = 185 ! 583: Height = 24 ! 584: Hint = 'User name to authenticate as' ! 585: ParentShowHint = False ! 586: ShowHint = True ! 587: TabOrder = 4 ! 588: end ! 589: object RelayAuthPassEdit: TEdit ! 590: Left = 105 ! 591: Top = 121 ! 592: Width = 185 ! 593: Height = 24 ! 594: Hint = 'Password for authentication' ! 595: ParentShowHint = False ! 596: PasswordChar = '*' ! 597: ShowHint = True ! 598: TabOrder = 5 ! 599: end ! 600: end ! 601: end 1.1 root 602: object SoundTabSheet: TTabSheet 603: Caption = 'Sound' 604: ImageIndex = 4 605: object SMTPSoundLabel: TLabel 606: Left = 9 607: Top = 12 608: Width = 101 609: Height = 24 610: AutoSize = False 611: Caption = 'Receive Mail' 612: end 613: object POP3SoundLabel: TLabel 614: Left = 9 615: Top = 76 616: Width = 101 617: Height = 26 618: AutoSize = False 619: Caption = 'POP3 Login' 620: end 621: object OutboundSoundLabel: TLabel 622: Left = 9 623: Top = 44 624: Width = 101 625: Height = 24 626: AutoSize = False 627: Caption = 'Sending Mail' 628: end 629: object InboundSoundEdit: TEdit 630: Left = 113 631: Top = 12 632: Width = 185 633: Height = 24 634: Hint = 'Sound file to play when inbound SMTP connections are accepted' 635: ParentShowHint = False 636: ShowHint = True 637: TabOrder = 0 638: end 639: object InboundSoundButton: TButton 640: Left = 304 641: Top = 12 642: Width = 25 643: Height = 26 644: Caption = '...' 645: TabOrder = 1 646: OnClick = InboundSoundButtonClick 647: end 648: object POP3SoundEdit: TEdit 649: Left = 113 650: Top = 76 651: Width = 185 652: Height = 24 653: Hint = 'Sound file to play when accepting POP3 connections' 654: ParentShowHint = False 655: ShowHint = True 1.1.1.2 ! root 656: TabOrder = 4 1.1 root 657: end 658: object POP3SoundButton: TButton 659: Left = 304 660: Top = 76 661: Width = 25 662: Height = 26 663: Caption = '...' 1.1.1.2 ! root 664: TabOrder = 5 1.1 root 665: OnClick = POP3SoundButtonClick 666: end 667: object OutboundSoundEdit: TEdit 668: Left = 113 669: Top = 44 670: Width = 185 671: Height = 24 672: Hint = 'Sound file to play when sending mail' 673: ParentShowHint = False 674: ShowHint = True 1.1.1.2 ! root 675: TabOrder = 2 1.1 root 676: end 677: object OutboundSoundButton: TButton 678: Left = 304 679: Top = 44 680: Width = 25 681: Height = 26 682: Caption = '...' 1.1.1.2 ! root 683: TabOrder = 3 1.1 root 684: OnClick = OutboundSoundButtonClick 685: end 686: end 1.1.1.2 ! root 687: object DNSBLTabSheet: TTabSheet ! 688: Caption = 'DNSBL' ! 689: ImageIndex = 5 ! 690: ParentShowHint = False ! 691: ShowHint = True ! 692: object Label1: TLabel ! 693: Left = 128 ! 694: Top = 105 ! 695: Width = 41 ! 696: Height = 16 ! 697: Caption = 'Label1' ! 698: end ! 699: object DNSBLServersButton: TButton ! 700: Left = 9 ! 701: Top = 9 ! 702: Width = 112 ! 703: Height = 25 ! 704: Hint = 'DNS-based Blacklists' ! 705: Caption = 'Blacklists' ! 706: TabOrder = 0 ! 707: OnClick = DNSBLServersButtonClick ! 708: end ! 709: object DNSBLGroupBox: TGroupBox ! 710: Left = 9 ! 711: Top = 41 ! 712: Width = 320 ! 713: Height = 160 ! 714: Caption = 'Mail from Blacklisted Servers:' ! 715: ParentShowHint = False ! 716: ShowHint = True ! 717: TabOrder = 1 ! 718: object BLSubjectLabel: TLabel ! 719: Left = 16 ! 720: Top = 92 ! 721: Width = 80 ! 722: Height = 26 ! 723: AutoSize = False ! 724: Caption = 'Subject' ! 725: end ! 726: object BLHeaderLabel: TLabel ! 727: Left = 16 ! 728: Top = 121 ! 729: Width = 80 ! 730: Height = 25 ! 731: AutoSize = False ! 732: Caption = 'Header' ! 733: end ! 734: object BLRefuseRadioButton: TRadioButton ! 735: Left = 16 ! 736: Top = 28 ! 737: Width = 153 ! 738: Height = 24 ! 739: Hint = 'Refuse mail session with blacklisted servers' ! 740: Caption = 'Refuse Session' ! 741: ParentShowHint = False ! 742: ShowHint = True ! 743: TabOrder = 0 ! 744: OnClick = DNSBLRadioButtonClick ! 745: end ! 746: object BLIgnoreRadioButton: TRadioButton ! 747: Left = 16 ! 748: Top = 57 ! 749: Width = 161 ! 750: Height = 24 ! 751: Hint = 'Pretend to receive blacklisted mail' ! 752: Caption = 'Silently Ignore' ! 753: ParentShowHint = False ! 754: ShowHint = True ! 755: TabOrder = 2 ! 756: OnClick = DNSBLRadioButtonClick ! 757: end ! 758: object BLBadUserRadioButton: TRadioButton ! 759: Left = 169 ! 760: Top = 28 ! 761: Width = 128 ! 762: Height = 24 ! 763: Hint = 'Refuse mail address from blacklisted servers' ! 764: Caption = 'Refuse Mail' ! 765: TabOrder = 1 ! 766: OnClick = DNSBLRadioButtonClick ! 767: end ! 768: object BLTagRadioButton: TRadioButton ! 769: Left = 169 ! 770: Top = 57 ! 771: Width = 96 ! 772: Height = 24 ! 773: Hint = 'Tag blacklisted mail with header and/or subject' ! 774: Caption = 'Tag with:' ! 775: ParentShowHint = False ! 776: ShowHint = True ! 777: TabOrder = 3 ! 778: OnClick = DNSBLRadioButtonClick ! 779: end ! 780: object BLSubjectEdit: TEdit ! 781: Left = 105 ! 782: Top = 92 ! 783: Width = 185 ! 784: Height = 24 ! 785: Hint = 'Flag to add to subject of DNS-blacklisted mail' ! 786: ParentShowHint = False ! 787: ShowHint = True ! 788: TabOrder = 4 ! 789: end ! 790: object BLHeaderEdit: TEdit ! 791: Left = 105 ! 792: Top = 121 ! 793: Width = 185 ! 794: Height = 24 ! 795: Hint = 'Flag to add to subject of DNS-blacklisted mail' ! 796: ParentShowHint = False ! 797: ShowHint = True ! 798: TabOrder = 5 ! 799: end ! 800: end ! 801: object DNSBLExemptionsButton: TButton ! 802: Left = 128 ! 803: Top = 9 ! 804: Width = 113 ! 805: Height = 25 ! 806: Hint = 'Blacklist Exempted IP addresses' ! 807: Caption = 'Exempt IPs' ! 808: TabOrder = 2 ! 809: OnClick = DNSBLExemptionsButtonClick ! 810: end ! 811: object BLDebugCheckBox: TCheckBox ! 812: Left = 256 ! 813: Top = 9 ! 814: Width = 73 ! 815: Height = 25 ! 816: Hint = 'Enable debug logging of DNSBL lookups' ! 817: Caption = 'Debug' ! 818: TabOrder = 3 ! 819: end ! 820: end 1.1 root 821: end 822: object OpenDialog: TOpenDialog 823: Filter = 'Wave Files|*.wav' 824: Left = 8 825: Top = 480 826: end 827: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.