home *** CD-ROM | disk | FTP | other *** search
- object frmRuleProp: TfrmRuleProp
- Left = 377
- Top = 152
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Rule Properties'
- ClientHeight = 395
- ClientWidth = 356
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- PixelsPerInch = 96
- TextHeight = 13
- object Button1: TButton
- Left = 276
- Top = 368
- Width = 71
- Height = 23
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 1
- end
- object Button2: TButton
- Left = 196
- Top = 368
- Width = 71
- Height = 23
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 0
- end
- object PageControl1: TPageControl
- Left = 8
- Top = 8
- Width = 341
- Height = 353
- ActivePage = TabSheet1
- HotTrack = True
- TabOrder = 2
- object TabSheet1: TTabSheet
- Caption = 'Criteria'
- object Label16: TLabel
- Left = 12
- Top = 64
- Width = 144
- Height = 13
- Caption = 'Normal Spam Filtration Options'
- end
- object Label13: TLabel
- Left = 8
- Top = 152
- Width = 153
- Height = 13
- Caption = 'Special Spam Detection Options'
- end
- object Image1: TImage
- Left = 8
- Top = 8
- Width = 33
- Height = 37
- Picture.Data = {<image000.ico>}
- end
- object Label1: TLabel
- Left = 46
- Top = 12
- Width = 247
- Height = 33
- AutoSize = False
- Caption =
- 'Please specify the criteria by which this rule will be activated' +
- '.'
- WordWrap = True
- end
- object EPBorder1: TEPBorder
- Left = 12
- Top = 52
- Width = 269
- Height = 5
- ParentColor = False
- BorderStyle = epbsHorizLine
- end
- object PanelHeader: TPanel
- Left = 36
- Top = 220
- Width = 313
- Height = 57
- BevelOuter = bvNone
- TabOrder = 6
- Visible = False
- object Label11: TLabel
- Left = 9
- Top = 16
- Width = 60
- Height = 13
- Caption = '&Mail Header:'
- FocusControl = edtHeaders
- end
- object edtHeaders: TComboBox
- Left = 8
- Top = 32
- Width = 245
- Height = 21
- ItemHeight = 13
- Items.Strings = (
- 'X-Advertisement'
- 'X-Authentication-Warning'
- 'X-Distribution: Bulk'
- 'X-Distribution: Mass'
- 'X-Distribution: Moderate'
- 'X-Distribution: Bulk'
- 'X-Mailer: Extractor'
- 'X-Mailer: Floodgate'
- 'X-Mailer: Group Mail'
- 'X-Mailer: Millennium Mailer'
- 'X-Sender: News Breaker')
- TabOrder = 0
- end
- end
- object PanelValue: TPanel
- Left = 36
- Top = 228
- Width = 305
- Height = 49
- BevelOuter = bvNone
- TabOrder = 5
- Visible = False
- object lblValue: TLabel
- Left = 9
- Top = 8
- Width = 83
- Height = 13
- Caption = 'Subject Contains:'
- end
- object edtValue: TComboBox
- Left = 8
- Top = 24
- Width = 245
- Height = 21
- ItemHeight = 13
- Items.Strings = (
- '!!'
- '$$'
- '=='
- 'CHANGE YOUR LIFE'
- 'INCREDIBLE DEAL'
- 'HUGE PROFIT'
- 'MAKE MONEY'
- 'CALL 800'
- 'BULK'
- 'LOTTERY'
- 'MONEY FAST'
- 'XXX')
- TabOrder = 0
- end
- end
- object PanelFrom: TPanel
- Left = 36
- Top = 224
- Width = 313
- Height = 49
- BevelOuter = bvNone
- TabOrder = 7
- object Label12: TLabel
- Left = 9
- Top = 12
- Width = 86
- Height = 13
- Caption = 'A&ddress / domain:'
- FocusControl = edtFrom
- end
- object edtFrom: TEdit
- Left = 8
- Top = 28
- Width = 245
- Height = 21
- TabOrder = 0
- end
- end
- object optAddress: TRadioButton
- Left = 24
- Top = 80
- Width = 269
- Height = 17
- Caption = 'From a certain e-mail address or domain'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = optAddressClick
- end
- object optUserDef: TRadioButton
- Left = 24
- Top = 98
- Width = 277
- Height = 17
- Caption = 'Subject contains'
- TabOrder = 1
- OnClick = optUserDefClick
- end
- object optHeader: TRadioButton
- Left = 24
- Top = 117
- Width = 277
- Height = 17
- Caption = '&Headers contain'
- TabOrder = 2
- OnClick = optHeaderClick
- end
- object optList: TRadioButton
- Left = 24
- Top = 168
- Width = 285
- Height = 17
- Caption = 'From address matches Unisyn provided "Spammer List"'
- TabOrder = 3
- OnClick = optListClick
- end
- object optFromNum: TRadioButton
- Left = 24
- Top = 188
- Width = 285
- Height = 17
- Caption = 'From an e-mail address with numbers for username'
- TabOrder = 4
- OnClick = optFromNumClick
- end
- end
- object TabSheet2: TTabSheet
- Caption = 'Action'
- object Image2: TImage
- Left = 8
- Top = 8
- Width = 33
- Height = 37
- Picture.Data = {<image001.ico>}
- end
- object Label14: TLabel
- Left = 48
- Top = 12
- Width = 241
- Height = 33
- AutoSize = False
- Caption =
- 'Please select an action for the mail message when this condition' +
- ' is met.'
- WordWrap = True
- end
- object EPBorder2: TEPBorder
- Left = 8
- Top = 52
- Width = 321
- Height = 5
- ParentColor = False
- BorderStyle = epbsHorizLine
- end
- object EPBorder3: TEPBorder
- Left = 8
- Top = 176
- Width = 321
- Height = 5
- ParentColor = False
- BorderStyle = epbsHorizLine
- end
- object optDelete: TRadioButton
- Left = 12
- Top = 192
- Width = 241
- Height = 17
- Caption = '&Remove the message from the server'
- Checked = True
- TabOrder = 5
- TabStop = True
- OnClick = optDeleteClick
- end
- object chkSave: TRadioButton
- Left = 12
- Top = 240
- Width = 321
- Height = 17
- Caption = '&Leave the message on server'
- TabOrder = 7
- OnClick = chkSaveClick
- end
- object chkBeep: TCheckBox
- Left = 12
- Top = 148
- Width = 261
- Height = 17
- Caption = '&Notify me by beeping'
- TabOrder = 4
- end
- object chkReply: TCheckBox
- Left = 12
- Top = 64
- Width = 297
- Height = 17
- Caption = 'Repl&y with message informing that you will not tolerate this'
- TabOrder = 0
- OnClick = chkReplyClick
- end
- object chkAbuse: TCheckBox
- Left = 12
- Top = 108
- Width = 321
- Height = 17
- Caption = 'Repor&t the spammer to abuse@hisdomain.com'
- TabOrder = 2
- OnClick = chkAbuseClick
- end
- object chkConfirm: TCheckBox
- Left = 28
- Top = 212
- Width = 281
- Height = 17
- Caption = 'Confirm &before deleting'
- TabOrder = 6
- end
- object cmbReply: TComboBox
- Left = 84
- Top = 80
- Width = 205
- Height = 21
- Style = csDropDownList
- ItemHeight = 0
- TabOrder = 1
- Visible = False
- end
- object cmbReport: TComboBox
- Left = 84
- Top = 124
- Width = 205
- Height = 21
- Style = csDropDownList
- ItemHeight = 0
- TabOrder = 3
- Visible = False
- end
- object chkSaveaCopy: TCheckBox
- Left = 12
- Top = 296
- Width = 309
- Height = 17
- Caption = '&Send a copy to the Windows Recycle Bin'
- State = cbChecked
- TabOrder = 8
- end
- end
- end
- end
-