object frmProperties: TfrmProperties
  Left = 192
  Top = 114
  HorzScrollBar.Visible = False
  VertScrollBar.Visible = False
  ActiveControl = btnOK
  BorderIcons = [biSystemMenu, biHelp]
  BorderStyle = bsSingle
  Caption = 'Properties'
  ClientHeight = 211
  ClientWidth = 407
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  Position = poScreenCenter
  OnClose = FormClose
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Bevel1: TBevel
    Left = 6
    Top = 169
    Width = 394
    Height = 9
    Shape = bsBottomLine
  end
  object btnOK: TButton
    Left = 121
    Top = 182
    Width = 75
    Height = 25
    HelpContext = 1
    Caption = 'OK'
    Default = True
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ModalResult = 1
    ParentFont = False
    PopupMenu = pmenuWhatsThis
    TabOrder = 0
  end
  object btnCancel: TButton
    Left = 211
    Top = 182
    Width = 75
    Height = 25
    HelpContext = 2
    Cancel = True
    Caption = 'Cancel'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ModalResult = 2
    ParentFont = False
    PopupMenu = pmenuWhatsThis
    TabOrder = 1
  end
  object pcontrolProperties: TPageControl
    Left = 6
    Top = 5
    Width = 394
    Height = 164
    ActivePage = tsheetMusic
    TabOrder = 2
    object tsheetGeneral: TTabSheet
      Caption = 'General'
      object cboxSmartHints: TCheckBox
        Left = 19
        Top = 51
        Width = 97
        Height = 17
        HelpContext = 1101
        Caption = 'Smart Hints'
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        PopupMenu = pmenuWhatsThis
        State = cbChecked
        TabOrder = 0
      end
      object cboxAutoCheck: TCheckBox
        Left = 19
        Top = 84
        Width = 122
        Height = 17
        HelpContext = 1102
        Caption = 'Automatic Checking'
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        PopupMenu = pmenuWhatsThis
        State = cbChecked
        TabOrder = 1
      end
    end
    object tsheetMusic: TTabSheet
      Caption = 'Music'
      object cboxBackgroundMusic: TCheckBox
        Left = 9
        Top = 5
        Width = 124
        Height = 17
        HelpContext = 1201
        Caption = 'Background music'
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        PopupMenu = pmenuWhatsThis
        State = cbChecked
        TabOrder = 0
        OnClick = cboxBackgroundMusicClick
      end
      object rgroupMusicFile: TRadioGroup
        Left = 9
        Top = 27
        Width = 371
        Height = 104
        HelpContext = 1202
        Caption = 'Music File:'
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ItemIndex = 0
        Items.Strings = (
          '"Heal the world" (by Michael Jackson)'
          '"Jump in the fire" (by Metallica)'
          '"Across the universe" (by the Beatles)'
          '"Don'#39't stop" (by Madonna)')
        ParentFont = False
        PopupMenu = pmenuWhatsThis
        TabOrder = 1
      end
    end
  end
  object btnApply: TButton
    Left = 319
    Top = 182
    Width = 75
    Height = 25
    Caption = '&Apply'
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    Visible = False
    OnClick = btnApplyClick
  end
  object pmenuWhatsThis: TPopupMenu
    Left = 72
    Top = 182
    object pmitemWhatsThis: TMenuItem
      Caption = '&What'#39's This?'
      ShortCut = 0
      OnClick = pmitemWhatsThisClick
    end
  end
end