home *** CD-ROM | disk | FTP | other *** search
Text File | 2000-07-27 | 35.0 KB | 1,316 lines |
- object frmPrefs: TfrmPrefs
- Left = 379
- Top = 175
- HelpContext = 191
- BorderIcons = [biSystemMenu]
- BorderStyle = bsSingle
- Caption = 'Preferences'
- ClientHeight = 345
- ClientWidth = 519
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- OldCreateOrder = True
- Position = poScreenCenter
- OnCreate = FormCreate
- OnDestroy = FormDestroy
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object comCancel: TButton
- Left = 438
- Top = 317
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Cancel'
- TabOrder = 1
- OnClick = comCancelClick
- end
- object comOK: TButton
- Left = 357
- Top = 317
- Width = 75
- Height = 25
- Caption = 'OK'
- Default = True
- TabOrder = 0
- OnClick = comOKClick
- end
- object pgcPreferences: TPageControl
- Left = 7
- Top = 8
- Width = 506
- Height = 305
- ActivePage = tbsTolerances
- MultiLine = True
- TabOrder = 2
- object tbsTolerances: TTabSheet
- Caption = 'Tolerances'
- object Label1: TLabel
- Left = 8
- Top = 72
- Width = 69
- Height = 13
- Caption = '&Task Speed'
- FocusControl = tbrTaskSpeed
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object lblTaskSpeed: TLabel
- Left = 128
- Top = 72
- Width = 105
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = '100ms Delay'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 8
- Top = 112
- Width = 213
- Height = 33
- AutoSize = False
- Caption = 'Increases or decreases the delay between steps in a task.'
- WordWrap = True
- end
- object Label3: TLabel
- Left = 8
- Top = 164
- Width = 96
- Height = 13
- Caption = '&Sendkeys Speed'
- FocusControl = tbrSendkeysSpeed
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label4: TLabel
- Left = 8
- Top = 204
- Width = 229
- Height = 37
- AutoSize = False
- Caption =
- 'Increases or decreases the delay between keys sent in a sendkeys' +
- ' step'
- WordWrap = True
- end
- object lblSendKeysSpeed: TLabel
- Left = 128
- Top = 164
- Width = 105
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = '100ms Delay'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object lblTask2: TLabel
- Left = 256
- Top = 72
- Width = 93
- Height = 13
- Caption = 'Task Scan &Rate'
- FocusControl = tbrScanTime
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label6: TLabel
- Left = 256
- Top = 112
- Width = 121
- Height = 21
- AutoSize = False
- Caption = '<--------more precise '
- end
- object lblScanRate: TLabel
- Left = 392
- Top = 72
- Width = 89
- Height = 13
- Alignment = taRightJustify
- Caption = 'Every 1 second'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label8: TLabel
- Left = 260
- Top = 164
- Width = 81
- Height = 13
- Caption = '&Logging Level'
- FocusControl = tbrLoggingLevel
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label9: TLabel
- Left = 260
- Top = 204
- Width = 225
- Height = 37
- AutoSize = False
- Caption =
- 'Increases or decreases the amount of information recorded to the' +
- ' log file.'
- WordWrap = True
- end
- object lblLoggingLevel: TLabel
- Left = 380
- Top = 164
- Width = 105
- Height = 13
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'High'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label11: TLabel
- Left = 400
- Top = 112
- Width = 84
- Height = 17
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'less CPU -------> '
- end
- object imgTolerances: TImage
- Left = 9
- Top = 2
- Width = 52
- Height = 52
- AutoSize = True
- Picture.Data = {<image001.bmp>}
- Transparent = True
- end
- object lblTolerances: TLabel
- Left = 76
- Top = 4
- Width = 409
- Height = 41
- AutoSize = False
- Caption =
- 'These options control the tolerance levels for speed and logging' +
- ' during task execution. They can help in troubleshooting task p' +
- 'roblems on slower machines.'
- WordWrap = True
- end
- object tbrTaskSpeed: TTrackBar
- Left = 4
- Top = 88
- Width = 236
- Height = 21
- LineSize = 100
- Max = 2000
- Orientation = trHorizontal
- PageSize = 100
- Frequency = 100
- Position = 5
- SelEnd = 0
- SelStart = 0
- TabOrder = 0
- ThumbLength = 20
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- OnChange = tbrTaskSpeedChange
- end
- object tbrSendkeysSpeed: TTrackBar
- Left = 4
- Top = 180
- Width = 236
- Height = 21
- LineSize = 100
- Max = 3000
- Orientation = trHorizontal
- PageSize = 100
- Frequency = 100
- Position = 5
- SelEnd = 0
- SelStart = 0
- TabOrder = 2
- ThumbLength = 20
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- OnChange = tbrSendkeysSpeedChange
- end
- object tbrScanTime: TTrackBar
- Left = 252
- Top = 88
- Width = 236
- Height = 21
- LineSize = 2
- Max = 120
- Min = 1
- Orientation = trHorizontal
- PageSize = 1
- Frequency = 10
- Position = 1
- SelEnd = 0
- SelStart = 0
- TabOrder = 1
- ThumbLength = 20
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- OnChange = tbrScanTimeChange
- end
- object tbrLoggingLevel: TTrackBar
- Left = 256
- Top = 180
- Width = 236
- Height = 21
- Max = 5
- Orientation = trHorizontal
- PageSize = 1
- Frequency = 1
- Position = 3
- SelEnd = 0
- SelStart = 0
- TabOrder = 3
- ThumbLength = 20
- TickMarks = tmBottomRight
- TickStyle = tsAuto
- OnChange = tbrLoggingLevelChange
- end
- end
- object tbsOptions: TTabSheet
- Caption = 'Options'
- object imgOptions: TImage
- Left = 9
- Top = 2
- Width = 52
- Height = 52
- AutoSize = True
- Picture.Data = {<image002.bmp>}
- Transparent = True
- end
- object lblOptions: TLabel
- Left = 76
- Top = 4
- Width = 353
- Height = 29
- AutoSize = False
- Caption = 'These options enable or disable various features in AutoMate'
- WordWrap = True
- end
- object chkWarnNoAutomate: TCheckBox
- Left = 8
- Top = 64
- Width = 414
- Height = 17
- Caption = '&Prompt to run Task Service on Configuration Manager startup'
- Checked = True
- State = cbChecked
- TabOrder = 0
- end
- object chkWarnOnShutdown: TCheckBox
- Left = 8
- Top = 86
- Width = 298
- Height = 17
- Caption = 'Display confirmation on &Task Service shut down'
- Checked = True
- State = cbChecked
- TabOrder = 1
- end
- object chkWarnOnDelete: TCheckBox
- Left = 8
- Top = 106
- Width = 254
- Height = 17
- Caption = '&Display confirmation on delete task'
- TabOrder = 2
- end
- object chkEnableDragAndDrop: TCheckBox
- Left = 8
- Top = 127
- Width = 261
- Height = 17
- Caption = '&Enable "drag and drop" operations in Step Builder'
- Checked = True
- State = cbChecked
- TabOrder = 3
- end
- object chkShowTaskWindow: TCheckBox
- Left = 8
- Top = 148
- Width = 277
- Height = 17
- Caption = 'Display indicator &window when task is running'
- TabOrder = 4
- end
- object chkTrayIcon: TCheckBox
- Left = 8
- Top = 169
- Width = 261
- Height = 17
- Caption = 'Display AutoMate tray &icon'
- TabOrder = 5
- end
- object chkUseWizard: TCheckBox
- Left = 8
- Top = 189
- Width = 261
- Height = 17
- Caption = 'Enable wizard when creating &new tasks'
- Checked = True
- State = cbChecked
- TabOrder = 6
- end
- object chkShowErrorsDialog: TCheckBox
- Left = 8
- Top = 209
- Width = 353
- Height = 17
- Caption =
- 'Display e&rrors from running tasks when Configuration Manager is' +
- ' open'
- Checked = True
- State = cbChecked
- TabOrder = 7
- end
- object chkWindowTimeout: TCheckBox
- Left = 8
- Top = 232
- Width = 349
- Height = 17
- Caption = 'Disable Windows "&Foreground Window Timeout" feature'
- Enabled = False
- TabOrder = 8
- OnClick = chkWindowTimeoutClick
- end
- end
- object tbsFilepaths: TTabSheet
- Caption = 'Folder / File Locations'
- object lblGeneral1: TLabel
- Left = 8
- Top = 72
- Width = 46
- Height = 13
- Caption = '&Task File:'
- FocusControl = edtTaskfile
- end
- object imgLocations: TImage
- Left = 9
- Top = 2
- Width = 52
- Height = 52
- AutoSize = True
- Picture.Data = {<image003.bmp>}
- Transparent = True
- end
- object lblFilepaths: TLabel
- Left = 76
- Top = 4
- Width = 353
- Height = 17
- AutoSize = False
- Caption = 'These options specify file and folder location defaults.'
- WordWrap = True
- end
- object Label15: TLabel
- Left = 8
- Top = 119
- Width = 40
- Height = 13
- Caption = '&Log File:'
- FocusControl = edtTaskfile
- end
- object Label5: TLabel
- Left = 8
- Top = 170
- Width = 99
- Height = 13
- Caption = 'Default &Script Folder:'
- FocusControl = edtTaskfile
- end
- object lblScriptPath: TLabel
- Left = 8
- Top = 188
- Width = 277
- Height = 25
- AutoSize = False
- Caption = 'lblScriptPath'
- end
- object lblCantModify: TLabel
- Left = 76
- Top = 24
- Width = 381
- Height = 25
- AutoSize = False
- Caption =
- 'The task file and log file locations cannot be modified in AutoM' +
- 'ate NT Service Edition.'
- WordWrap = True
- end
- object lblTaskFile: TLabel
- Left = 8
- Top = 92
- Width = 274
- Height = 25
- AutoSize = False
- Caption = 'lblTaskFile'
- Visible = False
- end
- object lblLogfile: TLabel
- Left = 8
- Top = 140
- Width = 273
- Height = 25
- AutoSize = False
- Caption = 'lblLogfile'
- Visible = False
- end
- object edtTaskfile: TEdit
- Left = 8
- Top = 88
- Width = 277
- Height = 21
- TabOrder = 0
- end
- object edtLogFilename: TEdit
- Left = 8
- Top = 136
- Width = 277
- Height = 21
- TabOrder = 2
- end
- object edtDefaultScriptPath: TEdit
- Left = 8
- Top = 187
- Width = 277
- Height = 21
- TabOrder = 4
- end
- object comBrowse: TBitBtn
- Left = 292
- Top = 88
- Width = 37
- Height = 21
- TabOrder = 1
- OnClick = comBrowseClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 5555555555555555555555555555555555555555555555555555555555555555
- 555555555555555555555555555555555555555FFFFFFFFFF555550000000000
- 55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
- B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
- 000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
- 555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
- 55555575FFF75555555555700007555555555557777555555555555555555555
- 5555555555555555555555555555555555555555555555555555}
- NumGlyphs = 2
- end
- object comLEBrowse: TBitBtn
- Left = 292
- Top = 136
- Width = 37
- Height = 21
- TabOrder = 3
- OnClick = comLEBrowseClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 5555555555555555555555555555555555555555555555555555555555555555
- 555555555555555555555555555555555555555FFFFFFFFFF555550000000000
- 55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
- B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
- 000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
- 555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
- 55555575FFF75555555555700007555555555557777555555555555555555555
- 5555555555555555555555555555555555555555555555555555}
- NumGlyphs = 2
- end
- object comSPBrowse: TBitBtn
- Left = 292
- Top = 187
- Width = 37
- Height = 21
- TabOrder = 5
- OnClick = comSPBrowseClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 5555555555555555555555555555555555555555555555555555555555555555
- 555555555555555555555555555555555555555FFFFFFFFFF555550000000000
- 55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
- B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
- 000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
- 555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
- 55555575FFF75555555555700007555555555557777555555555555555555555
- 5555555555555555555555555555555555555555555555555555}
- NumGlyphs = 2
- end
- end
- object tbsService: TTabSheet
- Caption = 'Services'
- TabVisible = False
- OnShow = tbsServiceShow
- object imgServices: TImage
- Left = 9
- Top = 2
- Width = 52
- Height = 52
- AutoSize = True
- Picture.Data = {<image004.bmp>}
- Transparent = True
- end
- object Label13: TLabel
- Left = 76
- Top = 4
- Width = 413
- Height = 49
- AutoSize = False
- Caption =
- 'Each task must run in the context of a user in order to establis' +
- 'h its available access privileges. Use the following settings t' +
- 'o configure AutoMate to impersonate a particular default when a ' +
- 'LOGIN step is not used in a task.'
- WordWrap = True
- end
- object cboPrinters: TComboBox
- Left = 16
- Top = 228
- Width = 253
- Height = 21
- Style = csDropDownList
- ItemHeight = 0
- TabOrder = 0
- Visible = False
- end
- object GroupBox2: TGroupBox
- Left = 8
- Top = 72
- Width = 481
- Height = 141
- Caption = 'By default, when running a task logon as...'
- TabOrder = 1
- object Label7: TLabel
- Left = 28
- Top = 32
- Width = 51
- Height = 13
- Caption = '&Username:'
- FocusControl = edtDefaultUsername
- end
- object Label10: TLabel
- Left = 28
- Top = 56
- Width = 49
- Height = 13
- Caption = '&Password:'
- FocusControl = edtDefaultPassword
- end
- object Label12: TLabel
- Left = 28
- Top = 84
- Width = 116
- Height = 13
- Caption = '&Domain/Machine Name:'
- FocusControl = edtDefaultDomain
- end
- object edtDefaultUsername: TEdit
- Left = 84
- Top = 26
- Width = 141
- Height = 21
- TabOrder = 0
- end
- object edtDefaultPassword: TEdit
- Left = 84
- Top = 52
- Width = 141
- Height = 21
- PasswordChar = '*'
- TabOrder = 1
- end
- object edtDefaultDomain: TEdit
- Left = 28
- Top = 100
- Width = 197
- Height = 21
- TabOrder = 2
- end
- end
- end
- object tbsConstants: TTabSheet
- Caption = 'Constants'
- OnEnter = tbsConstantsEnter
- object imgConstants: TImage
- Left = 9
- Top = 2
- Width = 52
- Height = 52
- AutoSize = True
- Picture.Data = {<image005.bmp>}
- Transparent = True
- end
- object Label17: TLabel
- Left = 76
- Top = 4
- Width = 417
- Height = 29
- AutoSize = False
- Caption =
- 'AutoMate constants allow configuration of system wide static val' +
- 'ues such as USERNAME or DOCUMENTDIR that may be used anywhere in' +
- ' a task.'
- WordWrap = True
- end
- object Label18: TLabel
- Left = 76
- Top = 36
- Width = 393
- Height = 39
- Caption =
- 'They are particularly useful when receiving tasks deployed thoug' +
- 'h an AutoMate Enterprise Server so that values specific to this ' +
- 'machine may be automatically used where appropriate.'
- WordWrap = True
- end
- object Label19: TLabel
- Left = 8
- Top = 215
- Width = 379
- Height = 39
- Caption =
- 'TIP: To use constants in a task, simply specify %CONSTANTNAME% a' +
- 'nywhere in the properties of an action and the value will automa' +
- 'tically be used at runtime depending on which machine the task i' +
- 's running on.'
- WordWrap = True
- end
- object comAddConstant: TButton
- Left = 401
- Top = 85
- Width = 75
- Height = 25
- Caption = '&Add'
- TabOrder = 1
- OnClick = comAddConstantClick
- end
- object comModifyConstant: TButton
- Left = 401
- Top = 113
- Width = 75
- Height = 25
- Caption = '&Modify'
- Enabled = False
- TabOrder = 2
- OnClick = comModifyConstantClick
- end
- object comDeleteConstant: TButton
- Left = 401
- Top = 141
- Width = 75
- Height = 25
- Caption = '&Delete'
- Enabled = False
- TabOrder = 3
- OnClick = comDeleteConstantClick
- end
- object lsvConstants: TListView
- Left = 8
- Top = 84
- Width = 385
- Height = 121
- Columns = <
- item
- Caption = 'Name'
- Width = 130
- end
- item
- Caption = 'Value'
- Width = 120
- end
- item
- Caption = 'Comment'
- Width = 400
- end
- item
- Caption = 'SystemDefined'
- Width = 0
- end>
- ColumnClick = False
- HideSelection = False
- HotTrackStyles = []
- ReadOnly = True
- RowSelect = True
- TabOrder = 0
- ViewStyle = vsReport
- OnClick = lsvConstantsClick
- OnDblClick = lsvConstantsDblClick
- end
- end
- object tbsEnterprise: TTabSheet
- Caption = 'AutoMate Enterprise'
- TabVisible = False
- OnShow = tbsEnterpriseShow
- object Label14: TLabel
- Left = 76
- Top = 4
- Width = 413
- Height = 41
- AutoSize = False
- Caption =
- 'AutoMate Enterprise Server allows network administrators to cent' +
- 'rally deploy tasks and control security settings for AutoMate in' +
- 'stallations on their LAN or across the Internet.'
- WordWrap = True
- end
- object imgEnterprise: TImage
- Left = 9
- Top = 2
- Width = 52
- Height = 52
- AutoSize = True
- Picture.Data = {<image006.bmp>}
- Transparent = True
- end
- object grpConnect: TGroupBox
- Left = 8
- Top = 88
- Width = 481
- Height = 165
- TabOrder = 0
- object lblServer: TLabel
- Left = 30
- Top = 20
- Width = 85
- Height = 17
- AutoSize = False
- Caption = '&Server Address:'
- FocusControl = edtServer
- end
- object lblDisplayName: TLabel
- Left = 308
- Top = 20
- Width = 141
- Height = 17
- AutoSize = False
- Caption = 'Display Name:'
- FocusControl = edtClientName
- end
- object lblUsername: TLabel
- Left = 308
- Top = 60
- Width = 57
- Height = 17
- AutoSize = False
- Caption = '&Username:'
- FocusControl = edtUsername
- end
- object lblPassword: TLabel
- Left = 308
- Top = 100
- Width = 57
- Height = 17
- AutoSize = False
- Caption = '&Password:'
- FocusControl = edtPassword
- end
- object lblDisplayNameText: TLabel
- Left = 308
- Top = 40
- Width = 157
- Height = 13
- AutoSize = False
- Caption = 'N/A'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object edtServer: TEdit
- Left = 30
- Top = 36
- Width = 157
- Height = 21
- TabOrder = 0
- end
- object edtClientName: TEdit
- Left = 308
- Top = 36
- Width = 157
- Height = 21
- Enabled = False
- TabOrder = 1
- Visible = False
- end
- object edtUsername: TEdit
- Left = 308
- Top = 76
- Width = 157
- Height = 21
- TabOrder = 2
- end
- object edtPassword: TEdit
- Left = 308
- Top = 116
- Width = 157
- Height = 21
- PasswordChar = '*'
- TabOrder = 3
- end
- object chkRemember: TCheckBox
- Left = 308
- Top = 144
- Width = 133
- Height = 13
- Caption = '&Remember password'
- TabOrder = 4
- end
- object chkOnlyIfConnection: TCheckBox
- Left = 14
- Top = 100
- Width = 229
- Height = 17
- Caption = 'Logon only when this connection is active'
- TabOrder = 5
- OnClick = chkOnlyIfConnectionClick
- end
- object cboDialUps: TComboBox
- Left = 30
- Top = 116
- Width = 157
- Height = 21
- Style = csDropDownList
- Enabled = False
- ItemHeight = 13
- Items.Strings = (
- '( Select Dial-Up Name Here )')
- TabOrder = 6
- end
- end
- object rdoStandalone: TRadioButton
- Left = 20
- Top = 68
- Width = 413
- Height = 17
- Caption = 'This is a standalone machine'
- Checked = True
- TabOrder = 1
- TabStop = True
- OnClick = rdoStandaloneClick
- end
- object rdoConnect: TRadioButton
- Left = 20
- Top = 86
- Width = 277
- Height = 17
- Caption = '&Connect to the following AutoMate Enterprise Server'
- TabOrder = 2
- OnClick = rdoConnectClick
- end
- end
- object tbsSecurity: TTabSheet
- Caption = 'Security'
- object imgSecurity: TImage
- Left = 9
- Top = 2
- Width = 52
- Height = 52
- AutoSize = True
- Picture.Data = {<image007.bmp>}
- Transparent = True
- end
- object Label16: TLabel
- Left = 76
- Top = 4
- Width = 409
- Height = 41
- AutoSize = False
- Caption =
- 'These options are used to provide security to your AutoMate Conf' +
- 'iguration Manager.'
- WordWrap = True
- end
- object grpPassword: TGroupBox
- Left = 8
- Top = 64
- Width = 329
- Height = 133
- Caption = '&Task List Protection: '
- TabOrder = 0
- object lblTaskListPassword: TLabel
- Left = 26
- Top = 72
- Width = 49
- Height = 13
- Caption = '&Password:'
- FocusControl = edtPassword
- end
- object lblConfirmPassword: TLabel
- Left = 26
- Top = 100
- Width = 38
- Height = 13
- Caption = '&Confirm:'
- FocusControl = edtConfirmPassword
- end
- object rdoNoPassword: TRadioButton
- Left = 8
- Top = 20
- Width = 265
- Height = 17
- Caption = 'Do not password protect the task list'
- Checked = True
- TabOrder = 0
- TabStop = True
- OnClick = rdoNoPasswordClick
- end
- object rdoPassword: TRadioButton
- Left = 8
- Top = 44
- Width = 265
- Height = 17
- Caption = 'Password protect the task list:'
- TabOrder = 1
- OnClick = rdoPasswordClick
- end
- object edtTaskListPassword: TEdit
- Left = 82
- Top = 68
- Width = 141
- Height = 21
- Enabled = False
- PasswordChar = '*'
- TabOrder = 2
- end
- object edtConfirmPassword: TEdit
- Left = 82
- Top = 96
- Width = 141
- Height = 21
- Enabled = False
- PasswordChar = '*'
- TabOrder = 3
- end
- end
- end
- object tbsAdvancedLog: TTabSheet
- Caption = 'Event Logging'
- ImageIndex = 7
- OnShow = tbsAdvancedLogShow
- object lblViewerToUser: TLabel
- Left = 16
- Top = 176
- Width = 178
- Height = 13
- Caption = 'Use this text editor to &view the log file:'
- FocusControl = edtLogFileViewer
- end
- object lblEventLoggingDesc: TLabel
- Left = 76
- Top = 4
- Width = 409
- Height = 41
- AutoSize = False
- Caption =
- 'These options provide greater control and flexibility over the e' +
- 'rror messages and the amount of logging that AutoMate does. The' +
- ' default log file viewer can also be changed from here.'
- WordWrap = True
- end
- object imgEventLogging: TImage
- Left = 9
- Top = 2
- Width = 52
- Height = 52
- AutoSize = True
- Picture.Data = {<image008.bmp>}
- Transparent = True
- end
- object lblStoppedLogging: TLabel
- Left = 12
- Top = 220
- Width = 457
- Height = 37
- AutoSize = False
- Caption =
- 'AutoMate has stopped logging because the log file has exceeded y' +
- 'our specified length. To resume logging, uncheck "Stop logging ' +
- 'if log file size is exceeded", or erase your log file.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- Visible = False
- WordWrap = True
- end
- object edtLogFileViewer: TEdit
- Left = 16
- Top = 192
- Width = 285
- Height = 21
- TabOrder = 2
- end
- object grpLimitLogFile: TGroupBox
- Left = 8
- Top = 72
- Width = 293
- Height = 101
- TabOrder = 1
- object lblKB: TLabel
- Left = 184
- Top = 20
- Width = 13
- Height = 13
- Caption = 'Kb'
- end
- object lblSizeCaption: TLabel
- Left = 16
- Top = 20
- Width = 124
- Height = 13
- Caption = 'Log file should not &exceed'
- end
- object lblIfExceeded: TLabel
- Left = 16
- Top = 40
- Width = 140
- Height = 13
- Caption = 'If logfile size limit is exceeded:'
- end
- object lblPercentage: TLabel
- Left = 96
- Top = 80
- Width = 184
- Height = 13
- Caption = '% from the log file and continue logging'
- end
- object edtLogFileMaxSize: TEdit
- Left = 144
- Top = 16
- Width = 37
- Height = 21
- TabOrder = 0
- OnKeyPress = edtLogFileMaxSizeKeyPress
- end
- object rdoStopLogging: TRadioButton
- Left = 20
- Top = 57
- Width = 113
- Height = 17
- Caption = 'Stop logging'
- Checked = True
- TabOrder = 2
- TabStop = True
- OnClick = rdoStopLoggingClick
- end
- object rdoTrimLog: TRadioButton
- Left = 20
- Top = 78
- Width = 45
- Height = 17
- Caption = 'Trim'
- TabOrder = 3
- OnClick = rdoTrimLogClick
- end
- object edtPercentage: TEdit
- Left = 64
- Top = 76
- Width = 29
- Height = 21
- TabOrder = 4
- OnKeyPress = edtPercentageKeyPress
- end
- object comClearLog: TButton
- Left = 208
- Top = 15
- Width = 75
- Height = 25
- Caption = '&Clear Log'
- TabOrder = 1
- OnClick = comClearLogClick
- end
- end
- object chkLimitFilesize: TCheckBox
- Left = 16
- Top = 68
- Width = 97
- Height = 17
- Caption = '&Limit logfile size'
- TabOrder = 0
- OnClick = chkLimitFilesizeClick
- end
- object comViewerBrowse: TBitBtn
- Left = 304
- Top = 192
- Width = 37
- Height = 21
- TabOrder = 3
- OnClick = comViewerBrowseClick
- Glyph.Data = {
- 76010000424D7601000000000000760000002800000020000000100000000100
- 0400000000000001000000000000000000001000000010000000000000000000
- 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
- FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
- 5555555555555555555555555555555555555555555555555555555555555555
- 555555555555555555555555555555555555555FFFFFFFFFF555550000000000
- 55555577777777775F55500B8B8B8B8B05555775F555555575F550F0B8B8B8B8
- B05557F75F555555575F50BF0B8B8B8B8B0557F575FFFFFFFF7F50FBF0000000
- 000557F557777777777550BFBFBFBFB0555557F555555557F55550FBFBFBFBF0
- 555557F555555FF7555550BFBFBF00055555575F555577755555550BFBF05555
- 55555575FFF75555555555700007555555555557777555555555555555555555
- 5555555555555555555555555555555555555555555555555555}
- NumGlyphs = 2
- end
- end
- object tbsFailureNotify: TTabSheet
- Caption = 'Failure Notification'
- ImageIndex = 8
- object Label20: TLabel
- Left = 76
- Top = 4
- Width = 409
- Height = 41
- AutoSize = False
- Caption =
- 'These options allow you to set whether or not AutoMate should se' +
- 'nd an email message to a set of recipients if a task fails, and ' +
- 'how detailed a sent message should be.'
- WordWrap = True
- end
- object imgFailure: TImage
- Left = 9
- Top = 2
- Width = 52
- Height = 52
- AutoSize = True
- Picture.Data = {<image009.bmp>}
- Transparent = True
- end
- object gpbNotifyFail: TGroupBox
- Left = 8
- Top = 72
- Width = 485
- Height = 173
- TabOrder = 1
- object lblEmailTo: TLabel
- Left = 16
- Top = 20
- Width = 233
- Height = 13
- Caption = '&To (one or more recipients, seperated by comma):'
- FocusControl = edtEmailTo
- end
- object lblEmailServer: TLabel
- Left = 16
- Top = 64
- Width = 137
- Height = 13
- Caption = '&Server (SMTP server to use):'
- FocusControl = edtEmailServer
- end
- object lblFrom: TLabel
- Left = 244
- Top = 64
- Width = 188
- Height = 13
- Caption = '&From: (placed in the email'#39's "From" line):'
- FocusControl = edtFrom
- end
- object edtEmailTo: TEdit
- Left = 16
- Top = 36
- Width = 461
- Height = 21
- TabOrder = 0
- end
- object edtEmailServer: TEdit
- Left = 16
- Top = 80
- Width = 217
- Height = 21
- TabOrder = 1
- end
- object rdoEmailType: TRadioGroup
- Left = 16
- Top = 108
- Width = 457
- Height = 57
- Caption = 'Message &Length: '
- ItemIndex = 0
- Items.Strings = (
- 'Detailed (contains extended information about the error)'
- 'Brief (better suited for pagers and cell phones)')
- TabOrder = 2
- end
- object edtFrom: TEdit
- Left = 244
- Top = 80
- Width = 233
- Height = 21
- TabOrder = 3
- end
- end
- object chkFailNotify: TCheckBox
- Left = 16
- Top = 69
- Width = 145
- Height = 17
- Caption = 'Send &email on task failure'
- TabOrder = 0
- OnClick = chkFailNotifyClick
- end
- end
- end
- object odlBrowse: TOpenDialog
- Filter = 'WAV Files (*.wav)|*.wav|All Files (*.*)|*.*'
- Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
- Left = 8
- Top = 316
- end
- end
-