Chip: Shareware for Win 95/Chip-Shareware-Win95.bin/ostatni/clipma/cm32.exe/CLIPMT42.EXE/0/RCDATA/TFRMSETTINGS/TFRMSETTINGS.txt

Text File | 1997-02-01 | 21.5 KB | 811 lines

object frmSettings: TfrmSettings
  Left = 522
  Top = 67
  HelpContext = 107
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'ClipMate User Preferences'
  ClientHeight = 413
  ClientWidth = 439
  Font.Color = clWindowText
  Font.Height = -13
  Font.Name = 'System'
  Font.Style = []
  Position = poScreenCenter
  OnClose = FormClose
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 16
  object TabbedNotebook1: TTabbedNotebook
    Left = 0
    Top = 0
    Width = 439
    Height = 372
    Align = alClient
    TabsPerRow = 4
    TabFont.Color = clBtnText
    TabFont.Height = -12
    TabFont.Name = 'MS Sans Serif'
    TabFont.Style = []
    TabOrder = 1
    OnChange = TabbedNotebook1Change
    object TTabPage
      Left = 4
      Top = 27
      Caption = 'Preferences'
      object GroupBox2: TGroupBox
        Left = 0
        Top = 188
        Width = 425
        Height = 70
        Caption = 'Save Data Options'
        TabOrder = 1
        object Label6: TLabel
          Left = 207
          Top = 37
          Width = 56
          Height = 16
          Caption = 'Minutes'
        end
        object chkAutoSave: TCheckBox
          Left = 28
          Top = 33
          Width = 129
          Height = 25
          Hint =
            'Unsaved data is automatically saved to disk at periodic interval' +
            's.  '
          HelpContext = 53
          Caption = 'Auto-Save Every '
          PopupMenu = PopupMenuWhatsThis
          TabOrder = 1
        end
        object txtAutoSaveInterval: TEdit
          Left = 161
          Top = 37
          Width = 43
          Height = 24
          Hint = 'Autosave Inteval - enter a value from 1 to 3600 minutes.'
          HelpContext = 53
          PopupMenu = PopupMenuWhatsThis
          TabOrder = 2
          Text = '3600'
          OnChange = txtAutoSaveIntervalChange
        end
        object ChkSaveShutdown: TCheckBox
          Left = 12
          Top = 19
          Width = 305
          Height = 17
          Hint = 'Auto-Save on Exit.  Otherwise you'#39'll be prompted to save.'
          HelpContext = 52
          Caption = 'Automatically Save When Shutting Down?'
          PopupMenu = PopupMenuWhatsThis
          TabOrder = 0
          OnClick = SaveAutoSync
        end
      end
      object GroupBox1: TGroupBox
        Left = 0
        Top = -1
        Width = 425
        Height = 178
        Caption = 'Behavior'
        TabOrder = 0
        object chkBeepWhenUpdated: TCheckBox
          Left = 12
          Top = 16
          Width = 341
          Height = 25
          Hint =
            'Beep for every update - otherwise ClipMate only beeps on warning' +
            's and errors.'
          HelpContext = 157
          Caption = 'Beep When New Data Received From Clipboard?'
          PopupMenu = PopupMenuWhatsThis
          TabOrder = 0
          OnClick = chkBeepWhenUpdatedClick
        end
        object chkShowItemTypeIcon: TCheckBox
          Left = 12
          Top = 60
          Width = 193
          Height = 25
          Hint =
            'Sets the Icons displayed in the Clip Item Selection drop-down on' +
            ' the main toolbar.'
          HelpContext = 256
          Caption = 'Show Item Type Icon?'
          PopupMenu = PopupMenuWhatsThis
          TabOrder = 1
        end
        object chkStayOnTop: TCheckBox
          Left = 12
          Top = 80
          Width = 297
          Height = 25
          Hint = 'ClipMate can "float" on top.'
          HelpContext = 257
          Caption = 'Always On Top?'
          PopupMenu = PopupMenuWhatsThis
          TabOrder = 2
        end
        object chkShowHint: TCheckBox
          Left = 12
          Top = 100
          Width = 229
          Height = 25
          Hint = 'Show/Hide these handy little help windows.'
          HelpContext = 258
          Caption = 'Show Hints (Tooltips)?'
          PopupMenu = PopupMenuWhatsThis
          TabOrder = 3
        end
        object chkShowMenu: TCheckBox
          Left = 12
          Top = 224
          Width = 185
          Height = 13
          Caption = 'Show Main Menu'
          TabOrder = 4
          Visible = False
        end
        object chkConfirmDeleteSafe: TCheckBox
          Left = 12
          Top = 148
          Width = 393
          Height = 17
          HelpContext = 295
          Caption = 'Confirm When Deleting Items From "Safe" Collections?'
          PopupMenu = PopupMenuWhatsThis
          TabOrder = 5
        end
        object chkUseItemTitleForIcon: TCheckBox
          Left = 12
          Top = 124
          Width = 269
          Height = 22
          Hint = 'Disabled In This Release - Will Be Fixed Soon.'
          HelpContext = 294
          Caption = 'Use ItemTitle For Minimized Icon?'
          PopupMenu = PopupMenuWhatsThis
          TabOrder = 6
        end
        object chkUseSounds: TCheckBox
          Left = 32
          Top = 41
          Width = 281
          Height = 17
          Hint =
            'If installed, ClipMate can use custom sounds to signal events li' +
            'ke "New Data Received".'
          HelpContext = 321
          Caption = 'Use Sound Events (32-bit Only)'
          Enabled = False
          PopupMenu = PopupMenuWhatsThis
          TabOrder = 7
        end
      end
      object gbOverrideDataDir: TGroupBox
        Left = 0
        Top = 262
        Width = 425
        Height = 76
        Caption = 'Data Directory'
        TabOrder = 2
        object lblOverrideWarning: TLabel
          Left = 196
          Top = 12
          Width = 221
          Height = 33
          Caption = 'This can'#39't be changed right now because there is unsaved data.'
          Font.Color = clBlue
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsItalic]
          ParentFont = False
          Visible = False
          WordWrap = True
        end
        object txtDataDir: TEdit
          Left = 12
          Top = 44
          Width = 329
          Height = 24
          Hint = 'The directory where ClipMate stores its data.'
          HelpContext = 57
          Enabled = False
          PopupMenu = PopupMenuWhatsThis
          TabOrder = 0
          Text = 'txtDataDir'
          OnClick = RestartNeeded
        end
        object cmdBrowseData: TButton
          Left = 348
          Top = 44
          Width = 73
          Height = 25
          HelpContext = 57
          Caption = 'Browse...'
          PopupMenu = PopupMenuWhatsThis
          TabOrder = 1
          OnClick = cmdBrowseDataClick
        end
        object rbDataDirDefault: TRadioButton
          Left = 12
          Top = 22
          Width = 77
          Height = 17
          Hint = 'Sets data directory to setup defaults'
          HelpContext = 57
          Caption = 'Default'
          Checked = True
          PopupMenu = PopupMenuWhatsThis
          TabOrder = 2
          TabStop = True
          OnClick = rbDataDirDefaultClick
        end
        object rbDataDirOverride: TRadioButton
          Left = 92
          Top = 22
          Width = 89
          Height = 17
          Hint = 'Overrides data directory location'
          HelpContext = 57
          Caption = 'Override'
          PopupMenu = PopupMenuWhatsThis
          TabOrder = 3
          OnClick = rbDataDirDefaultClick
        end
      end
    end
    object TTabPage
      Left = 4
      Top = 27
      Caption = 'Windows95 / NT'
      object grpWin95: TGroupBox
        Left = 8
        Top = 15
        Width = 417
        Height = 73
        Caption = 'Windows95 System Tray'
        Enabled = False
        TabOrder = 0
        object chkUseSysTray: TCheckBox
          Left = 12
          Top = 20
          Width = 225
          Height = 21
          Hint =
            'ClipMate can place its icon in the System Tray, INSTEAD of the r' +
            'egular taskbar.'
          HelpContext = 110
          Caption = 'Use System Tray Icon'
          Enabled = False
          PopupMenu = PopupMenuWhatsThis
          TabOrder = 0
          OnClick = AutoHideSync
        end
        object chkAutoHide: TCheckBox
          Left = 28
          Top = 44
          Width = 369
          Height = 21
          Hint =
            'Hide all ClipMate windows when you switch to another application' +
            '.'
          HelpContext = 55
          Caption = 'Auto-Hide ClipMate When Switching Away?'
          Enabled = False
          PopupMenu = PopupMenuWhatsThis
          TabOrder = 1
        end
      end
      object grpHotKeys: TGroupBox
        Left = 8
        Top = 96
        Width = 417
        Height = 145
        Caption = 'System-Wide HotKeys'
        Enabled = False
        TabOrder = 1
        object Label3: TLabel
          Left = 204
          Top = 20
          Width = 97
          Height = 16
          Alignment = taRightJustify
          Caption = 'Ctrl + Alt + '
        end
        object Label7: TLabel
          Left = 204
          Top = 44
          Width = 97
          Height = 16
          Alignment = taRightJustify
          Caption = 'Ctrl + Alt + '
        end
        object Label8: TLabel
          Left = 204
          Top = 68
          Width = 97
          Height = 16
          Alignment = taRightJustify
          Caption = 'Ctrl + Alt + '
        end
        object Label10: TLabel
          Left = 332
          Top = 17
          Width = 81
          Height = 96
          Caption = 'These Are Not Currently Changeable In This Release'
          Font.Color = clNavy
          Font.Height = -13
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsItalic]
          ParentFont = False
          WordWrap = True
        end
        object chkHKActivate: TCheckBox
          Left = 12
          Top = 20
          Width = 141
          Height = 17
          Hint = 'Pops ClipMate To The Foreground'
          Caption = 'Activate ClipMate'
          TabOrder = 0
          OnClick = HKClick
        end
        object chkHKSelectNext: TCheckBox
          Left = 12
          Top = 44
          Width = 181
          Height = 17
          Hint = 'Scroll To Next Clip Item'
          Caption = 'Next Item In Collection'
          TabOrder = 1
          OnClick = HKClick
        end
        object chkHKSelectPrev: TCheckBox
          Left = 12
          Top = 68
          Width = 201
          Height = 17
          Hint = 'Scroll To Previous Clip Item'
          Caption = 'Previous Item In Colletion'
          TabOrder = 2
          OnClick = HKClick
        end
        object txtHKHKActivateKey: TEdit
          Left = 300
          Top = 16
          Width = 25
          Height = 24
          Hint = 'Not Currently Configurable'
          Enabled = False
          MaxLength = 1
          ReadOnly = True
          TabOrder = 3
          OnClick = HKClick
        end
        object txtHKSelectNextKey: TEdit
          Left = 300
          Top = 40
          Width = 25
          Height = 24
          Hint = 'Not Currently Configurable'
          Enabled = False
          MaxLength = 1
          ReadOnly = True
          TabOrder = 4
          OnClick = HKClick
        end
        object txtHKSelectPrevKey: TEdit
          Left = 300
          Top = 64
          Width = 25
          Height = 24
          Hint = 'Not Currently Configurable'
          Enabled = False
          MaxLength = 1
          ReadOnly = True
          TabOrder = 5
          OnClick = HKClick
        end
        object chkHKSelectItem: TCheckBox
          Left = 12
          Top = 92
          Width = 273
          Height = 17
          Hint = 'Select item (n) within current collection.'
          Caption = 'Select Clip Item   Ctrl + F1 .. F12'
          TabOrder = 6
          OnClick = HKClick
        end
        object chkHKSelectCollection: TCheckBox
          Left = 12
          Top = 116
          Width = 301
          Height = 17
          Hint = 'Select collection (n)'
          Caption = 'Select Collection   Shift + Ctrl + F1 .. F12'
          TabOrder = 7
          OnClick = HKClick
        end
      end
    end
    object TTabPage
      Left = 4
      Top = 27
      Caption = 'Advanced'
      object lblFixFont: TLabel
        Left = 233
        Top = 225
        Width = 180
        Height = 16
      end
      object Label13: TLabel
        Left = 4
        Top = 158
        Width = 123
        Height = 16
        Caption = 'PowerPaste Delay:'
      end
      object Label12: TLabel
        Left = 195
        Top = 158
        Width = 195
        Height = 16
        Caption = 'MiliSeconds (1/1000 seconds)'
      end
      object Label15: TLabel
        Left = 4
        Top = 86
        Width = 92
        Height = 16
        Caption = 'Startup Delay:'
      end
      object Label16: TLabel
        Left = 135
        Top = 86
        Width = 56
        Height = 16
        Caption = 'Seconds'
      end
      object Label9: TLabel
        Left = 4
        Top = 112
        Width = 343
        Height = 32
        Caption =
          'If you have "double icons" at startup, try increasing this to 4 ' +
          'or 5 seconds.'
        Font.Color = clNavy
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsItalic]
        ParentFont = False
        WordWrap = True
      end
      object Label11: TLabel
        Left = 8
        Top = 176
        Width = 373
        Height = 32
        Caption =
          'Only use this to slow down PowerPaste, when it appears to be inc' +
          'ompatible with certain applications.  (Default 100ms)'
        Font.Color = clNavy
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsItalic]
        ParentFont = False
        WordWrap = True
      end
      object Label14: TLabel
        Left = 4
        Top = 248
        Width = 373
        Height = 48
        Caption =
          'If all of the fonts, in all of the dialog boxes look like WingDi' +
          'ngs, then this will allow you to override it.  Please contact Te' +
          'ch Support if you think you need this.  '
        Font.Color = clNavy
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsItalic]
        ParentFont = False
        WordWrap = True
      end
      object chkWideToolbar: TCheckBox
        Left = 4
        Top = 4
        Width = 405
        Height = 21
        Hint =
          'Stretches toolbar to include extra button, also helpful if menu ' +
          'won'#39't fit.'
        HelpContext = 262
        Caption = 'Wide Toolbar, Showing "Remove Line-Breaks" Button?'
        PopupMenu = PopupMenuWhatsThis
        TabOrder = 0
      end
      object chkExtraWideToolbar: TCheckBox
        Left = 24
        Top = 27
        Width = 357
        Height = 17
        Hint =
          'Sometimes necessary with Win3.1x systems, with LARGE font displa' +
          'y driver.'
        HelpContext = 323
        Caption = 'Extra-Wide, To Accomodate HUGE Display Fonts?'
        PopupMenu = PopupMenuWhatsThis
        TabOrder = 1
      end
      object chkUseSysFont: TCheckBox
        Left = 4
        Top = 222
        Width = 189
        Height = 22
        Hint =
          'Some Dialogs Use ARIAL Font, Which On Some Systems, Doesn'#39't Disp' +
          'lay Correctly.  (You Should Not Normally Need This)'
        HelpContext = 266
        Caption = 'Override Dialog Box Font:'
        PopupMenu = PopupMenuWhatsThis
        TabOrder = 2
        OnClick = chkUseSysFontClick
      end
      object cmdFont: TBitBtn
        Left = 196
        Top = 217
        Width = 29
        Height = 29
        Hint = 'Change Font Of Display (Does NOT Affect Data)'
        HelpContext = 266
        Enabled = False
        TabOrder = 3
        OnClick = cmdFontClick
        Glyph.Data = {
          B0010000424DB001000000000000760000002800000018000000180000000100
          0400000000002001000000000000000000000000000000000000000000000000
          BF0000BF000000BFBF00BF000000BF00BF00BFBF0000C0C0C000808080000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
          3333333333333333333333333333380088333333333333333338007700833333
          3333333333307700770333000333300003307033003333090833309903077033
          3333330990000999030770333333333099999990330770833033333090000903
          3330708807033330990309033330770077033333090090333333007707033333
          099090333333330030333333309990338000033333333333309903300CCCC003
          3333333333090330CC00CCC03333333333090330C0330CC03333333333303330
          CC000CC03333333333333330CCCCCCC03333333333333330C0330C0333333333
          33333300C000CC0333333333333330CCCCCCCC03333333333333300000000033
          3333333333333333333333333333333333333333333333333333000000000000
          0000000000000000000000000000000000000000}
        Layout = blGlyphTop
      end
      object txtPowerPasteDelay: TEdit
        Left = 139
        Top = 153
        Width = 46
        Height = 24
        HelpContext = 265
        MaxLength = 4
        PopupMenu = PopupMenuWhatsThis
        TabOrder = 4
        Text = '0'
        OnChange = txtPowerPasteDelayChange
      end
      object txtPhantomDelay: TEdit
        Left = 107
        Top = 81
        Width = 22
        Height = 24
        HelpContext = 263
        MaxLength = 1
        PopupMenu = PopupMenuWhatsThis
        TabOrder = 5
        Text = '0'
        OnChange = txtPhantomDelayChange
      end
      object chkPersistentClipboardWatching: TCheckBox
        Left = 4
        Top = 48
        Width = 409
        Height = 17
        Hint =
          'ClipMate can agressively monitor the clipboard chain, and make s' +
          'ure that it is always at the "head" of the chain.  On by default' +
          '.'
        HelpContext = 264
        Caption = 'Persistent Clipboard Chain Watching? (Default is YES)'
        PopupMenu = PopupMenuWhatsThis
        TabOrder = 6
      end
    end
    object TTabPage
      Left = 4
      Top = 27
      Caption = 'Application Profile'
      object pnlParentOfFilter: TPanel
        Left = 5
        Top = 24
        Width = 420
        Height = 313
        BevelOuter = bvNone
        Caption = 'pnlParentOfFilter'
        TabOrder = 0
      end
    end
    object TTabPage
      Left = 4
      Top = 27
      Caption = 'Logging'
      object Label4: TLabel
        Left = 4
        Top = 216
        Width = 401
        Height = 32
        Caption =
          'Note:  Logging is used for troubleshooting and debugging purpose' +
          's.'
        Font.Color = clNavy
        Font.Height = -13
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsItalic]
        ParentFont = False
        WordWrap = True
      end
      object Label5: TLabel
        Left = 8
        Top = 16
        Width = 121
        Height = 16
        Caption = 'Log These Events:'
      end
      object chkErrors: TCheckBox
        Left = 24
        Top = 36
        Width = 221
        Height = 29
        Caption = 'Errors'
        TabOrder = 0
        OnClick = chkErrorsClick
      end
      object chkUpDown: TCheckBox
        Left = 24
        Top = 66
        Width = 185
        Height = 21
        Caption = 'Startup / Shutdown'
        TabOrder = 1
        OnClick = chkErrorsClick
      end
      object chkForm: TCheckBox
        Left = 24
        Top = 89
        Width = 305
        Height = 29
        Caption = 'Form (screen) Open and Close'
        TabOrder = 2
        OnClick = chkErrorsClick
      end
      object chkDelete: TCheckBox
        Left = 24
        Top = 119
        Width = 217
        Height = 33
        Caption = 'Data Deletion'
        TabOrder = 3
        OnClick = chkErrorsClick
      end
      object chkData: TCheckBox
        Left = 24
        Top = 154
        Width = 225
        Height = 33
        Caption = 'Other Data Events'
        TabOrder = 4
        OnClick = chkErrorsClick
      end
      object chkDetail: TCheckBox
        Left = 24
        Top = 188
        Width = 297
        Height = 25
        Caption = 'Detail Logging (may impact performance)'
        TabOrder = 5
        OnClick = chkErrorsClick
      end
      object BitBtn1: TBitBtn
        Left = 354
        Top = 6
        Width = 75
        Height = 25
        HelpContext = 113
        TabOrder = 6
        Kind = bkHelp
      end
    end
  end
  object Panel1: TPanel
    Left = 0
    Top = 372
    Width = 439
    Height = 41
    Align = alBottom
    TabOrder = 0
    object OKBtn: TBitBtn
      Left = 4
      Top = 6
      Width = 77
      Height = 27
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 0
      OnClick = OKBtnClick
      Kind = bkOK
      Margin = 2
      Spacing = -1
    end
    object CancelBtn: TBitBtn
      Left = 88
      Top = 6
      Width = 77
      Height = 27
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      OnClick = CancelBtnClick
      Kind = bkCancel
      Margin = 2
      Spacing = -1
    end
    object HelpBtn: TBitBtn
      Left = 172
      Top = 6
      Width = 77
      Height = 27
      HelpContext = 107
      Caption = 'Help'
      Font.Color = clBlack
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 2
      Kind = bkHelp
      Margin = 2
      Spacing = -1
    end
  end
  object PopupMenuWhatsThis: TPopupMenu
    Left = 308
    Top = 375
    object mnuWhatsThis: TMenuItem
      Caption = 'What'#39's This?'
      ShortCut = 0
      OnClick = mnuWhatsThisClick
    end
  end
  object FontDialog1: TFontDialog
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MinFontSize = 0
    MaxFontSize = 0
    Options = []
    Left = 393
    Top = 384
  end
end