home *** CD-ROM | disk | FTP | other *** search
- object frmSettings: TfrmSettings
- Left = 353
- Top = 251
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Spam Exterminator Settings'
- ClientHeight = 339
- ClientWidth = 399
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- PixelsPerInch = 96
- TextHeight = 13
- object Button2: TButton
- Left = 312
- Top = 312
- Width = 75
- Height = 23
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 0
- end
- object Button3: TButton
- Left = 228
- Top = 312
- Width = 75
- Height = 23
- Caption = 'OK'
- Default = True
- ModalResult = 1
- TabOrder = 1
- end
- object PageControl1: TPageControl
- Left = 11
- Top = 8
- Width = 377
- Height = 289
- ActivePage = TabSheet4
- HotTrack = True
- TabOrder = 2
- object TabSheet4: TTabSheet
- Caption = 'Scan Interval'
- object Label3: TLabel
- Left = 60
- Top = 8
- Width = 272
- Height = 39
- Caption =
- 'How often do you want Spam Exterminator to check your mailbox? ' +
- 'This setting also applies to mail notification features.'
- WordWrap = True
- end
- object lblInterval: TLabel
- Left = 153
- Top = 76
- Width = 63
- Height = 13
- Alignment = taCenter
- Caption = '10 Minutes'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object lblNextTime: TLabel
- Left = 26
- Top = 168
- Width = 317
- Height = 13
- Alignment = taCenter
- AutoSize = False
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object EPImage1: TEPImage
- Left = 12
- Top = 8
- Width = 32
- Height = 32
- ParentColor = False
- Picture.Data = {<image000.bmp>}
- Transparent = True
- end
- object Label10: TLabel
- Left = 67
- Top = 96
- Width = 235
- Height = 13
- Alignment = taCenter
- Caption = 'Use the right / left arrow keys to adjust by minutes'
- end
- object intervaltrack: TTrackBar
- Left = 12
- Top = 48
- Width = 345
- Height = 29
- Max = 1440
- Orientation = trHorizontal
- Frequency = 10
- Position = 10
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- TickMarks = tmBottomRight
- TickStyle = tsNone
- OnChange = intervaltrackChange
- end
- object edtHours: TEdit
- Left = 24
- Top = 200
- Width = 41
- Height = 21
- TabOrder = 1
- Text = '0'
- Visible = False
- end
- object edtTime: TMaskEdit
- Left = 272
- Top = 156
- Width = 73
- Height = 21
- TabOrder = 2
- Visible = False
- end
- object edtDate: TMaskEdit
- Left = 272
- Top = 180
- Width = 73
- Height = 21
- TabOrder = 3
- Visible = False
- end
- object Button1: TButton
- Left = 147
- Top = 192
- Width = 75
- Height = 23
- Caption = '&Change'
- TabOrder = 4
- OnClick = Button1Click
- end
- end
- object TabSheet2: TTabSheet
- Caption = 'Connection'
- object Label4: TLabel
- Left = 55
- Top = 8
- Width = 271
- Height = 13
- AutoSize = False
- Caption = 'What method do you use to connect to the Internet?'
- end
- object lblRasSpec: TLabel
- Left = 79
- Top = 115
- Width = 271
- Height = 13
- AutoSize = False
- Caption = 'Please &specify a default connection for use with e-mail.'
- FocusControl = RASComboBox
- end
- object EPImage5: TEPImage
- Left = 12
- Top = 8
- Width = 32
- Height = 32
- ParentColor = False
- Picture.Data = {<image001.bmp>}
- Transparent = True
- end
- object optLAN: TRadioButton
- Left = 64
- Top = 52
- Width = 161
- Height = 17
- Caption = 'I use a &LAN connection.'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = optLANClick
- end
- object optManual: TRadioButton
- Left = 64
- Top = 72
- Width = 273
- Height = 17
- Caption = '&Only check if I have already dialed into the Internet.'
- TabOrder = 1
- OnClick = optLANClick
- end
- object optDUN: TRadioButton
- Left = 64
- Top = 92
- Width = 257
- Height = 17
- Caption = 'Use a &Dial-up networking connection.'
- TabOrder = 2
- OnClick = optLANClick
- end
- object RASComboBox: TComboBox
- Left = 95
- Top = 134
- Width = 206
- Height = 21
- Style = csDropDownList
- ItemHeight = 13
- TabOrder = 3
- end
- object chkNoHangup: TCheckBox
- Left = 68
- Top = 200
- Width = 249
- Height = 13
- Caption = 'Do not hang-up the connection when done.'
- TabOrder = 4
- Visible = False
- end
- end
- object TabSheet1: TTabSheet
- Caption = 'Server'
- object Label8: TLabel
- Left = 60
- Top = 100
- Width = 99
- Height = 13
- Caption = '&POP Server to Scan:'
- FocusControl = edtPopAddress
- end
- object Label2: TLabel
- Left = 60
- Top = 144
- Width = 109
- Height = 13
- Caption = 'POP Logon &Username:'
- FocusControl = edtUserName
- end
- object Label5: TLabel
- Left = 60
- Top = 184
- Width = 71
- Height = 13
- Caption = '&Mail Password:'
- FocusControl = edtPassword
- end
- object Label6: TLabel
- Left = 56
- Top = 8
- Width = 108
- Height = 13
- Caption = '&SMTP Server Address:'
- FocusControl = edtPopAddress
- end
- object Label9: TLabel
- Left = 56
- Top = 48
- Width = 291
- Height = 13
- Caption = 'This address will be utilized for any outgoing "reply messages"'
- FocusControl = edtPopAddress
- WordWrap = True
- end
- object EPBorder1: TEPBorder
- Left = 16
- Top = 84
- Width = 337
- Height = 5
- ParentColor = False
- BorderStyle = epbsHorizLine
- end
- object EPImage2: TEPImage
- Left = 12
- Top = 8
- Width = 32
- Height = 32
- ParentColor = False
- Picture.Data = {<image002.bmp>}
- Transparent = True
- end
- object EPImage3: TEPImage
- Left = 12
- Top = 104
- Width = 32
- Height = 32
- ParentColor = False
- Picture.Data = {<image003.ico>}
- Transparent = True
- end
- object edtPopAddress: TEdit
- Left = 60
- Top = 116
- Width = 213
- Height = 21
- TabOrder = 1
- end
- object edtUserName: TEdit
- Left = 60
- Top = 160
- Width = 133
- Height = 21
- TabOrder = 2
- end
- object edtPassword: TEdit
- Left = 60
- Top = 200
- Width = 133
- Height = 21
- PasswordChar = '*'
- TabOrder = 3
- end
- object edtSMTPAddress: TEdit
- Left = 56
- Top = 24
- Width = 217
- Height = 21
- TabOrder = 0
- end
- end
- object TabSheet3: TTabSheet
- Caption = 'Misc.'
- object EPImage4: TEPImage
- Left = 12
- Top = 8
- Width = 26
- Height = 32
- ParentColor = False
- Picture.Data = {<image004.bmp>}
- Transparent = True
- end
- object Label11: TLabel
- Left = 60
- Top = 8
- Width = 297
- Height = 37
- AutoSize = False
- Caption = 'Settings that control various aspects of Spam Exterminator.'
- WordWrap = True
- end
- object chkVerbose: TCheckBox
- Left = 60
- Top = 112
- Width = 297
- Height = 17
- Caption = '&Verbose entries in logfile (for troubleshooting purposes)'
- TabOrder = 4
- end
- object chkSounds: TCheckBox
- Left = 60
- Top = 44
- Width = 213
- Height = 17
- Caption = '&Disable all sounds regardless of rules'
- TabOrder = 0
- end
- object chkBeepNotify: TCheckBox
- Left = 60
- Top = 64
- Width = 293
- Height = 17
- Caption = '&Play sound when new mail is waiting on server'
- TabOrder = 1
- OnClick = chkBeepNotifyClick
- end
- object edtWAVName: TEdit
- Left = 80
- Top = 84
- Width = 241
- Height = 21
- TabOrder = 2
- end
- object btnBrowse: TButton
- Left = 328
- Top = 85
- Width = 25
- Height = 21
- Caption = '. .'
- TabOrder = 3
- OnClick = btnBrowseClick
- end
- end
- object TabSheet5: TTabSheet
- Caption = 'Auto-Update'
- object Label1: TLabel
- Left = 64
- Top = 8
- Width = 262
- Height = 33
- AutoSize = False
- Caption =
- 'Spam Exterminator can automatically update the spam list for you' +
- ', would you like to use this feature?'
- WordWrap = True
- end
- object EPImage6: TEPImage
- Left = 12
- Top = 8
- Width = 32
- Height = 32
- ParentColor = False
- Picture.Data = {<image005.bmp>}
- Transparent = True
- end
- object Label7: TLabel
- Left = 92
- Top = 192
- Width = 164
- Height = 13
- Caption = 'You last updated your spam list on:'
- end
- object lblLastUpdate: TLabel
- Left = 96
- Top = 208
- Width = 161
- Height = 21
- Alignment = taCenter
- AutoSize = False
- Caption = 'no date available'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object optAutoUpdateOn: TRadioButton
- Left = 64
- Top = 76
- Width = 217
- Height = 17
- Caption = 'Yes, automatically update my spam list'
- TabOrder = 0
- end
- object optAutoUpdateOff: TRadioButton
- Left = 64
- Top = 100
- Width = 217
- Height = 21
- Caption = 'No, I will update it manually'
- Checked = True
- TabOrder = 1
- TabStop = True
- end
- object btnUpdateCheckNow: TButton
- Left = 100
- Top = 164
- Width = 137
- Height = 25
- Caption = 'Check for upgrade now...'
- TabOrder = 2
- OnClick = btnUpdateCheckNowClick
- end
- end
- object tbMC: TTabSheet
- Caption = 'Mail Client'
- object lblMailclientdesc: TLabel
- Left = 32
- Top = 64
- Width = 212
- Height = 13
- Caption = 'My mail client is located at the following path:'
- end
- object Image2: TImage
- Left = 12
- Top = 8
- Width = 45
- Height = 37
- Picture.Data = {<image006.bmp>}
- Transparent = True
- end
- object Label12: TLabel
- Left = 60
- Top = 12
- Width = 227
- Height = 26
- Caption =
- 'Mail client options help Spam Exterminator work with your mail c' +
- 'lient.'
- WordWrap = True
- end
- object edtMailClientPath: TEdit
- Left = 32
- Top = 80
- Width = 277
- Height = 21
- TabOrder = 0
- end
- object btnMCBrowse: TButton
- Left = 316
- Top = 81
- Width = 25
- Height = 21
- Caption = '. .'
- TabOrder = 1
- OnClick = btnMCBrowseClick
- end
- object GroupBox1: TGroupBox
- Left = 16
- Top = 132
- Width = 337
- Height = 89
- Caption = 'Launch Mail Client when I have mail'
- TabOrder = 2
- object chkLoadAfterManual: TCheckBox
- Left = 8
- Top = 24
- Width = 305
- Height = 21
- Caption = 'After performing a manual mailbox clean.'
- TabOrder = 0
- end
- object chkLoadAfterAuto: TCheckBox
- Left = 8
- Top = 44
- Width = 313
- Height = 21
- Caption = 'After performing an automatic mailbox clean.'
- TabOrder = 1
- end
- end
- end
- end
- object Themessage: TmsMessage
- ContentType = 'text/plain'
- ReturnReceipt = False
- Left = 40
- Top = 304
- end
- object openDialogWAV: TOpenDialog
- DefaultExt = 'wav'
- FileName = '*.wav'
- Filter = 'Sound Files (*.wav)|*.wav|All Files (*.*)|*.*'
- Options = [ofHideReadOnly, ofFileMustExist]
- Title = 'Select WAV File'
- Left = 99
- Top = 304
- end
- object openDialogMC: TOpenDialog
- DefaultExt = 'exe'
- FileName = '*.exe'
- Filter = 'Program Files (*.exe)|*.exe|All Files (*.*)|*.*'
- Options = [ofHideReadOnly, ofFileMustExist]
- Title = 'Select WAV File'
- Left = 135
- Top = 304
- end
- end
-