PC World 1999 February/PCWorld_1999-02_cd.bin/temacd/HotKeys/hkEdit.dfm/hkEdit.txt

Text File | 1998-11-03 | 18KB | 640 lines

object frmHotkeyEdit: TfrmHotkeyEdit
  Left = 200
  Top = 87
  Width = 564
  Height = 435
  BorderIcons = [biSystemMenu, biMaximize]
  Caption = 'Hotkey Editor'
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Icon.Data = {<image000.ico>}
  KeyPreview = True
  Position = poScreenCenter
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnKeyDown = FormKeyDown
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object pnlHotkeys: TPanel
    Left = 0
    Top = 0
    Width = 556
    Height = 209
    Align = alClient
    BevelOuter = bvNone
    BorderWidth = 4
    TabOrder = 0
    object lvHotkeys: TListView
      Left = 4
      Top = 4
      Width = 548
      Height = 201
      Align = alClient
      ColumnClick = False
      OnClick = lvHotkeysClick
      Columns = <
        item
          Caption = 'Description'
          Width = 138
        end
        item
          Caption = 'ID'
          Width = 45
        end
        item
          Caption = 'Action'
          Width = 95
        end
        item
          Caption = 'Data'
          Width = 130
        end
        item
          Caption = 'Hotkey'
          Width = 75
        end
        item
          Caption = 'Active'
          Width = 45
        end>
      ReadOnly = True
      HideSelection = False
      RowSelect = True
      OnChange = lvHotkeysChange
      SortType = stText
      TabOrder = 0
      ViewStyle = vsReport
    end
  end
  object pnlControls: TPanel
    Left = 0
    Top = 209
    Width = 556
    Height = 199
    Align = alBottom
    BevelOuter = bvNone
    TabOrder = 1
    object pnlEdit: TPanel
      Left = 0
      Top = 0
      Width = 473
      Height = 199
      Align = alClient
      BevelOuter = bvNone
      BorderWidth = 4
      TabOrder = 0
      object grpHotkey: TGroupBox
        Left = 4
        Top = 4
        Width = 465
        Height = 160
        Align = alClient
        Caption = 'Edit hotkey'
        TabOrder = 0
        object lblDescription: TLabel
          Left = 12
          Top = 20
          Width = 56
          Height = 13
          Caption = 'De&scription:'
          FocusControl = edtDescription
        end
        object lblCommandLine: TLabel
          Left = 12
          Top = 92
          Width = 66
          Height = 13
          Caption = 'Co&mmandline:'
        end
        object lblHotkey: TLabel
          Left = 12
          Top = 116
          Width = 37
          Height = 13
          Caption = '&Hotkey:'
          FocusControl = chkCtrl
        end
        object lblAction: TLabel
          Left = 12
          Top = 68
          Width = 33
          Height = 13
          Caption = 'Ac&tion:'
          FocusControl = cboActions
        end
        object lblID: TLabel
          Left = 12
          Top = 44
          Width = 14
          Height = 13
          Caption = '&ID:'
          FocusControl = edtID
        end
        object lblShow: TLabel
          Left = 380
          Top = 92
          Width = 30
          Height = 13
          Caption = '&Show:'
          FocusControl = cboShow
        end
        object edtKeysToSend: TEdit
          Left = 84
          Top = 88
          Width = 293
          Height = 21
          TabOrder = 4
          OnChange = edtKeysToSendChange
        end
        object edtCommandLine: TBrowseEdit
          Left = 84
          Top = 88
          Width = 293
          Height = 21
          Dialog = opdOpenFile
          TabOrder = 3
          OnButtonClick = edtCommandLineButtonClick
          OnChange = edtCommandLineChange
          OnExit = edtCommandLineExit
        end
        object cboParams: TComboBox
          Left = 84
          Top = 88
          Width = 293
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          TabOrder = 5
          OnClick = cboParamsClick
        end
        object edtDescription: TEdit
          Left = 84
          Top = 16
          Width = 293
          Height = 21
          TabOrder = 0
          OnChange = edtDescriptionChange
          OnExit = edtDescriptionExit
        end
        object chkCtrl: TCheckBox
          Left = 84
          Top = 114
          Width = 41
          Height = 17
          Caption = 'Ctrl'
          TabOrder = 8
          OnClick = chkCtrlClick
        end
        object chkAlt: TCheckBox
          Left = 132
          Top = 114
          Width = 41
          Height = 17
          Caption = 'Alt'
          TabOrder = 9
          OnClick = chkCtrlClick
        end
        object chkShift: TCheckBox
          Left = 176
          Top = 114
          Width = 41
          Height = 17
          Caption = 'Shift'
          TabOrder = 10
          OnClick = chkCtrlClick
        end
        object chkWin: TCheckBox
          Left = 228
          Top = 114
          Width = 41
          Height = 17
          Caption = 'Win'
          TabOrder = 11
          OnClick = chkCtrlClick
        end
        object cboHotkey: TComboBox
          Left = 276
          Top = 112
          Width = 101
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          Items.Strings = (
            'Backspace'
            'Tab'
            'Return'
            'Pause'
            'Capslock'
            'Escape'
            'Space'
            'PgUp'
            'PgDn'
            'Home'
            'End'
            'Left Arrow'
            'Up Arrow'
            'Right Arrow'
            'Down Arrow'
            'PrintScreen'
            'Insert'
            'Delete'
            '0'
            '1'
            '2'
            '3'
            '4'
            '5'
            '6'
            '7'
            '8'
            '9'
            'A'
            'B'
            'C'
            'D'
            'E'
            'F'
            'G'
            'H'
            'I'
            'J'
            'K'
            'L'
            'M'
            'N'
            'O'
            'P'
            'Q'
            'R'
            'S'
            'T'
            'U'
            'V'
            'W'
            'X'
            'Y'
            'Z'
            'Num 0'
            'Num 1'
            'Num 2'
            'Num 3'
            'Num 4'
            'Num 5'
            'Num 6'
            'Num 7'
            'Num 8'
            'Num 9'
            'Num *'
            'Num +'
            'Num -'
            'Num .'
            'Num /'
            'F1'
            'F2'
            'F3'
            'F4'
            'F5'
            'F6'
            'F7'
            'F8'
            'F9'
            'F10'
            'F11'
            'F12'
            'F13'
            'F14'
            'F15'
            'F16'
            'F17'
            'F18'
            'F19'
            'F20'
            'F21'
            'F22'
            'F23'
            'F24'
            'Numlock'
            'Scrolllock'
            'Application')
          TabOrder = 12
          OnClick = chkCtrlClick
        end
        object chkActive: TCheckBox
          Left = 12
          Top = 138
          Width = 97
          Height = 17
          Caption = 'H&otkey is active'
          TabOrder = 13
          OnClick = chkActiveClick
        end
        object cboActions: TComboBox
          Left = 84
          Top = 64
          Width = 293
          Height = 21
          Style = csDropDownList
          DropDownCount = 11
          ItemHeight = 13
          TabOrder = 2
          OnClick = cboActionsClick
        end
        object edtID: TEdit
          Left = 84
          Top = 40
          Width = 37
          Height = 21
          MaxLength = 4
          TabOrder = 1
          OnChange = edtIDChange
          OnExit = edtIDExit
        end
        object cboShow: TComboBox
          Left = 372
          Top = 88
          Width = 85
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          Items.Strings = (
            'Normal'
            'Maximized'
            'Minimized')
          TabOrder = 7
          OnClick = cboShowClick
        end
        object cboClipboard: TComboBox
          Left = 84
          Top = 88
          Width = 293
          Height = 21
          Style = csDropDownList
          ItemHeight = 13
          TabOrder = 6
          OnClick = cboClipboardClick
        end
      end
      object pnlOptions: TPanel
        Left = 4
        Top = 164
        Width = 465
        Height = 31
        Align = alBottom
        BevelOuter = bvNone
        TabOrder = 1
        object lblClipboards: TLabel
          Left = 276
          Top = 8
          Width = 134
          Height = 17
          AutoSize = False
          Caption = 'Number of virtual &clipboards:'
          FocusControl = edtClipboards
          Layout = tlCenter
        end
        object chkShowIcon: TCheckBox
          Left = 0
          Top = 8
          Width = 237
          Height = 17
          Caption = 'Show Hotkeys icon on &Windows taskbar'
          TabOrder = 0
          OnClick = chkShowIconClick
        end
        object edtClipboards: TEdit
          Left = 416
          Top = 6
          Width = 33
          Height = 21
          TabOrder = 1
          Text = '1'
          OnChange = edtClipboardsChange
          OnExit = edtClipboardsExit
        end
        object udClipboards: TUpDown
          Left = 449
          Top = 6
          Width = 12
          Height = 21
          Associate = edtClipboards
          Min = 1
          Position = 1
          TabOrder = 2
          Wrap = False
        end
      end
    end
    object pnlButtons: TPanel
      Left = 473
      Top = 0
      Width = 83
      Height = 199
      Align = alRight
      BevelOuter = bvNone
      BorderWidth = 4
      ParentColor = True
      TabOrder = 1
      object imgIcon: TImage
        Left = 4
        Top = 72
        Width = 16
        Height = 16
        AutoSize = True
        Picture.Data = {<image001.bmp>}
        Visible = False
      end
      object btnNew: TButton
        Left = 4
        Top = 8
        Width = 75
        Height = 25
        Caption = '&New'
        TabOrder = 0
        OnClick = btnNewClick
      end
      object btnDelete: TButton
        Left = 4
        Top = 37
        Width = 75
        Height = 25
        Caption = '&Delete'
        TabOrder = 1
        OnClick = btnDeleteClick
      end
      object btnApply: TButton
        Left = 4
        Top = 141
        Width = 75
        Height = 25
        Caption = '&Apply'
        Enabled = False
        TabOrder = 2
        OnClick = btnApplyClick
      end
      object btnClose: TButton
        Left = 4
        Top = 170
        Width = 75
        Height = 25
        Caption = '&Close'
        TabOrder = 3
        OnClick = btnCloseClick
      end
    end
  end
  object SysHotkeys: TSysHotKey
    Active = True
    OnHotKey = SysHotkeysHotKey
    Left = 10
    Top = 24
  end
  object ppmTrayMenu: TPopupMenu
    Left = 40
    Top = 24
    object mnuHelp: TMenuItem
      Caption = 'Hotkeys &Help'
      OnClick = mnuHelpClick
    end
    object mnuAbout: TMenuItem
      Caption = '&About...'
      OnClick = mnuAboutClick
    end
    object mnuSeparator0: TMenuItem
      Caption = '-'
    end
    object mnuEditHotkeys: TMenuItem
      Caption = '&Edit hotkeys...'
      Default = True
      OnClick = mnuEditHotkeysClick
    end
    object mnuListHotkeys: TMenuItem
      Caption = '&View hotkey list...'
      OnClick = mnuListHotkeysClick
    end
    object mnuSeparator1: TMenuItem
      Caption = '-'
    end
    object mnuHotkeys: TMenuItem
      Caption = 'Hot&keys'
    end
    object mnuSeparator2: TMenuItem
      Caption = '-'
    end
    object mnuExit: TMenuItem
      Caption = 'E&xit'
      OnClick = mnuExitClick
    end
  end
  object atiHotkeys: TAnimatedTrayIcon
    Icon.Data = {<image002.ico>}
    Animation.Author = 'Arjen Broeze'
    Animation.Title = 'Key being pressed'
    Animation.Icons = {
      110000004B6579206265696E6720707265737365640C00000041726A656E2042
      726F657A650008000000050000003E0100000000010001001010040000000000
      2801000016000000280000001000000020000000010004000000000080000000
      0000000000000000000000000000000000000000000080000080000000808000
      800000008000800080800000C0C0C000808080000000FF0000FF000000FFFF00
      FF000000FF00FF00FFFF0000FFFFFF0000000000000000000000000000000000
      00000007F800000000000777F888000000077777F888880007777777F8888880
      87777777F888888087777777F8888880087777FF7FF888800877FF77707FF880
      008F777007707FF8008F77077007778000088777077788000000088777880000
      00000008880000000000000000000000FFFF0000FE3F0000F80F0000E0030000
      800000000000000000000000000000008000000080000000C0000000C0010000
      E0030000F80F0000FE3F0000FFFF0000050000003E0100000000010001001010
      0400000000002801000016000000280000001000000020000000010004000000
      0000800000000000000000000000000000000000000000000000000080000080
      000000808000800000008000800080800000C0C0C000808080000000FF0000FF
      000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000000000000000000000
      000000000000000000088800000000000887F888000000088777F88888000887
      7777F888888087777777F8888880087777FF7FF888800877FF77707FF880008F
      777007707FF8008F770770077780000887770777880000000887778800000000
      00088800000000000000000000000000000000000000FFFF0000FE3F0000F80F
      0000E00300008000000000000000000000008000000080000000C0000000C001
      0000E0030000F80F0000FE3F0000FFFF0000FFFF0000050000003E0100000000
      0100010010100400000000002801000016000000280000001000000020000000
      0100040000000000800000000000000000000000000000000000000000000000
      000080000080000000808000800000008000800080800000C0C0C00080808000
      0000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0000000000
      000000000000000000000000000000088800000000000887F888000000088777
      F888880008877777F8888880087777FF7FF888800877FF77707FF880008F7770
      07707FF8008F7707700777800008877707778800000008877788000000000008
      88000000000000000000000000000000000000000000000000000000FFFF0000
      FE3F0000F80F0000E003000080000000000000008000000080000000C0000000
      C0010000E0030000F80F0000FE3F0000FFFF0000FFFF0000FFFF000005000000
      3E01000000000100010010100400000000002801000016000000280000001000
      0000200000000100040000000000800000000000000000000000000000000000
      000000000000000080000080000000808000800000008000800080800000C0C0
      C000808080000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFF
      FF0000000000000000000000000000000000000000088800000000000887F888
      000000088777F8888800088777FF7FF888800877FF77707FF880008F77700770
      7FF8008F77077007778000088777077788000000088777880000000000088800
      0000000000000000000000000000000000000000000000000000000000000000
      0000FFFF0000FE3F0000F80F0000E0030000800000000000000080000000C000
      0000C0010000E0030000F80F0000FE3F0000FFFF0000FFFF0000FFFF0000FFFF
      0000050000003E01000000000100010010100400000000002801000016000000
      2800000010000000200000000100040000000000800000000000000000000000
      0000000000000000000000000000800000800000008080008000000080008000
      80800000C0C0C000808080000000FF0000FF000000FFFF00FF000000FF00FF00
      FFFF0000FFFFFF00000000000000000000000000000000000000000888000000
      00000887F8880000000887FF7FF888000887FF77707FF880008F777007707FF8
      008F770770077780000887770777880000000887778800000000000888000000
      0000000000000000000000000000000000000000000000000000000000000000
      0000000000000000FFFF0000FE3F0000F80F0000E00300008000000000000000
      C0000000C0010000E0030000F80F0000FE3F0000FFFF0000FFFF0000FFFF0000
      FFFF0000FFFF0000050000003E01000000000100010010100400000000002801
      0000160000002800000010000000200000000100040000000000800000000000
      0000000000000000000000000000000000000000800000800000008080008000
      00008000800080800000C0C0C000808080000000FF0000FF000000FFFF00FF00
      0000FF00FF00FFFF0000FFFFFF00000000000000000000000000000000000000
      00088800000000000887F888000000088777F8888800088777FF7FF888800877
      FF77707FF880008F777007707FF8008F77077007778000088777077788000000
      0887778800000000000888000000000000000000000000000000000000000000
      0000000000000000000000000000FFFF0000FE3F0000F80F0000E00300008000
      00000000000080000000C0000000C0010000E0030000F80F0000FE3F0000FFFF
      0000FFFF0000FFFF0000FFFF0000050000003E01000000000100010010100400
      0000000028010000160000002800000010000000200000000100040000000000
      8000000000000000000000000000000000000000000000000000800000800000
      00808000800000008000800080800000C0C0C000808080000000FF0000FF0000
      00FFFF00FF000000FF00FF00FFFF0000FFFFFF00000000000000000000000000
      00000000000000088800000000000887F888000000088777F888880008877777
      F8888880087777FF7FF888800877FF77707FF880008F777007707FF8008F7707
      7007778000088777077788000000088777880000000000088800000000000000
      0000000000000000000000000000000000000000FFFF0000FE3F0000F80F0000
      E003000080000000000000008000000080000000C0000000C0010000E0030000
      F80F0000FE3F0000FFFF0000FFFF0000FFFF0000050000003E01000000000100
      0100101004000000000028010000160000002800000010000000200000000100
      0400000000008000000000000000000000000000000000000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00000000000000
      00000000000000000000000000088800000000000887F888000000088777F888
      880008877777F888888087777777F8888880087777FF7FF888800877FF77707F
      F880008F777007707FF8008F7707700777800008877707778800000008877788
      0000000000088800000000000000000000000000000000000000FFFF0000FE3F
      0000F80F0000E00300008000000000000000000000008000000080000000C000
      0000C0010000E0030000F80F0000FE3F0000FFFF0000FFFF0000}
    Hint = 'Hotkeys'
    PopupMenu = ppmTrayMenu
    RepeatCount = 1
    OnDblClick = mnuEditHotkeysClick
    OnEndAnimation = atiHotkeysEndAnimation
    Left = 70
    Top = 24
  end
  object opdOpenFile: TOpenDialog
    Filter =
      'Program Files (*.exe;*.com)|*.exe;*.com|Batch Files (*.bat)|*.ba' +
      't|All Files (*.*)|*.*'
    Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
    Title = 'Select Program to Run'
    Left = 100
    Top = 24
  end
end