Subversion Repositories jumper

Rev

Rev 19 | Blame | Compare with Previous | Last modification | View Log | RSS feed

object MainForm: TMainForm
  Left = 242
  Top = 142
  BorderIcons = [biSystemMenu, biMinimize]
  BorderStyle = bsSingle
  Caption = 'ViaThinkSoft Peg Solitaire'
  ClientHeight = 277
  ClientWidth = 340
  Color = clBtnFace
  Constraints.MinHeight = 320
  Constraints.MinWidth = 300
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  Menu = MainMenu
  OldCreateOrder = False
  Position = poScreenCenter
  OnClose = FormClose
  OnCloseQuery = FormCloseQuery
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Playground: TPanel
    Left = 0
    Top = 0
    Width = 313
    Height = 289
    BevelOuter = bvNone
    TabOrder = 0
  end
  object Statistics: TStatusBar
    Left = 0
    Top = 258
    Width = 340
    Height = 19
    Panels = <
      item
        Width = 85
      end
      item
        Alignment = taCenter
        Width = 140
      end
      item
        Alignment = taRightJustify
        Width = 50
      end>
  end
  object MainMenu: TMainMenu
    Left = 8
    Top = 8
    object Help1: TMenuItem
      Caption = 'Game'
      object MNewGame: TMenuItem
        Caption = 'New game...'
        ShortCut = 16462
        OnClick = MNewGameClick
      end
      object N1: TMenuItem
        Caption = '-'
      end
      object MRestartGame: TMenuItem
        Caption = 'Restart level'
        ShortCut = 16466
        OnClick = MRestartGameClick
      end
      object MPauseTime: TMenuItem
        AutoCheck = True
        Caption = 'Pause timer'
        ShortCut = 16464
      end
      object N2: TMenuItem
        Caption = '-'
      end
      object MUndo: TMenuItem
        Caption = 'Undo'
        Enabled = False
        ShortCut = 16474
        OnClick = MUndoClick
      end
      object N3: TMenuItem
        Caption = '-'
      end
      object MJumpHistory: TMenuItem
        Caption = 'View jump history...'
        ShortCut = 16458
        OnClick = MJumpHistoryClick
      end
      object MHighScores: TMenuItem
        Caption = 'High scores of this level...'
        ShortCut = 16456
        OnClick = MHighScoresClick
      end
      object N4: TMenuItem
        Caption = '-'
      end
      object MExit: TMenuItem
        Caption = 'Exit'
        ShortCut = 32883
        OnClick = MExitClick
      end
    end
    object MSettings: TMenuItem
      Caption = 'Settings'
      object MEnableSound: TMenuItem
        AutoCheck = True
        Caption = 'Enable sound'
        Checked = True
        ShortCut = 32851
      end
    end
    object Help2: TMenuItem
      Caption = 'Help'
      object MHelp: TMenuItem
        Caption = 'Help...'
        ShortCut = 112
        OnClick = MHelpClick
      end
      object Aboutthislevel1: TMenuItem
        Caption = 'About this level'
        OnClick = Aboutthislevel1Click
      end
      object N5: TMenuItem
        Caption = '-'
      end
      object MAbout: TMenuItem
        Caption = 'About...'
        OnClick = MAboutClick
      end
    end
  end
  object Timer: TTimer
    Enabled = False
    OnTimer = TimerTimer
    Left = 40
    Top = 8
  end
end