PC World Plus! (NZ) 2001 October/PCW1001.iso/HowTo/Winkey/winkey2.exe/_SETUP.1/WinKeyMgr.exe/0/RCDATA/TWINKEYFORM/TWINKEYFORM.txt

Text File | 1999-07-04 | 4.6 KB | 210 lines

object WinKeyForm: TWinKeyForm
  Tag = 123
  Left = 276
  Top = 204
  AutoScroll = False
  BorderIcons = [biSystemMenu, biMinimize]
  ClientHeight = 337
  ClientWidth = 602
  Color = clBtnFace
  Constraints.MinHeight = 200
  Constraints.MinWidth = 200
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  KeyPreview = True
  Menu = MainMenu
  OldCreateOrder = True
  Position = poScreenCenter
  OnCreate = FormCreate
  OnHide = FormHide
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 0
    Top = 0
    Width = 602
    Height = 2
    Align = alTop
    Shape = bsTopLine
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 318
    Width = 602
    Height = 19
    Panels = <
      item
        Bevel = pbNone
        Width = 9999
      end>
    SimplePanel = False
  end
  object ShortCutView: TListView
    Left = 10
    Top = 12
    Width = 496
    Height = 315
    Anchors = [akLeft, akTop, akRight, akBottom]
    Columns = <
      item
        Caption = 'Shortcut Key'
        Width = 143
      end
      item
        Caption = 'Command'
        Width = 220
      end
      item
        Caption = 'Parameters'
        Width = 107
      end>
    ColumnClick = False
    HideSelection = False
    HotTrackStyles = []
    Items.Data = {
      300000000100000000000000FFFFFFFFFFFFFFFF000000000000000013205374
      616E646172642053686F727463757473}
    MultiSelect = True
    ReadOnly = True
    RowSelect = True
    PopupMenu = ShortCutPopup
    SmallImages = ShortCutImages
    TabOrder = 0
    ViewStyle = vsReport
    OnChange = ShortCutViewChange
    OnDblClick = PropertiesBtnClick
    OnDeletion = ShortCutViewDeletion
    OnKeyDown = ShortCutViewKeyDown
  end
  object AddBtn: TButton
    Left = 516
    Top = 12
    Width = 75
    Height = 23
    Anchors = [akTop, akRight]
    Caption = '&Add...'
    TabOrder = 1
    OnClick = AddBtnClick
  end
  object RemoveBtn: TButton
    Left = 516
    Top = 42
    Width = 75
    Height = 23
    Anchors = [akTop, akRight]
    Caption = '&Remove'
    TabOrder = 2
    OnClick = RemoveBtnClick
  end
  object PropertiesBtn: TButton
    Left = 516
    Top = 72
    Width = 75
    Height = 23
    Anchors = [akTop, akRight]
    Caption = '&Properties'
    TabOrder = 3
    OnClick = PropertiesBtnClick
  end
  object HotKeyEngine: THotKeyEngine
    Active = False
    Left = 520
    Top = 110
  end
  object MainMenu: TMainMenu
    Left = 550
    Top = 110
    object File1: TMenuItem
      Caption = '&File'
      OnClick = File1Click
      object Add1: TMenuItem
        Caption = '&Add...'
        OnClick = AddBtnClick
      end
      object Remove1: TMenuItem
        Caption = '&Remove'
        OnClick = RemoveBtnClick
      end
      object Properties1: TMenuItem
        Caption = '&Properties'
        OnClick = PropertiesBtnClick
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object Unload1: TMenuItem
        Caption = '&Unload'
        OnClick = UnloadBtnClick
      end
      object Exit1: TMenuItem
        Caption = 'E&xit'
        OnClick = CloseBtnClick
      end
    end
    object Options1: TMenuItem
      Caption = '&Options'
      object ShowTaskbarIcon1: TMenuItem
        Caption = 'Show Taskbar &Icon'
        Checked = True
        OnClick = ShowTaskbarIcon1Click
      end
      object EnableWindowsKeys1: TMenuItem
        Caption = 'Enable Windows &Keys'
        Checked = True
        OnClick = EnableWindowsKeys1Click
      end
    end
    object Help1: TMenuItem
      Caption = '&Help'
      object StandardShortcutList1: TMenuItem
        Caption = '&Standard Shortcut List'
        OnClick = StandardShortcutList1Click
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object AboutWinKey1: TMenuItem
        Caption = '&About WinKey'
        OnClick = AboutBtnClick
      end
    end
  end
  object ShortCutPopup: TPopupMenu
    Left = 520
    Top = 140
    object AddItem: TMenuItem
      Caption = 'Add'
      OnClick = AddBtnClick
    end
    object RemoveItem: TMenuItem
      Caption = 'Remove'
      OnClick = RemoveBtnClick
    end
    object N1: TMenuItem
      Caption = '-'
    end
    object PropertiesItem: TMenuItem
      Caption = 'Properties'
      Default = True
      OnClick = PropertiesBtnClick
    end
  end
  object ShortCutImages: TImageList
    Tag = 16
    Left = 550
    Top = 140
  end
  object DropTarget: TDropTarget
    GiveFeedback = False
    OnDragOver = DropTargetDragOver
    OnDragDrop = DropTargetDragDrop
    Left = 520
    Top = 170
  end
end