Subversion Repositories jumper

Rev

Rev 6 | Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1 daniel-mar 1 
object MainForm: TMainForm
2 
  Left = 242
3 
  Top = 142
4 
  BorderIcons = [biSystemMenu, biMinimize]
5 
  BorderStyle = bsSingle
6 
  Caption = 'ViaThinkSoft Peg Solitaire'
7 
  ClientHeight = 277
8 
  ClientWidth = 340
9 
  Color = clBtnFace
10 
  Constraints.MinHeight = 320
11 
  Constraints.MinWidth = 300
12 
  Font.Charset = DEFAULT_CHARSET
13 
  Font.Color = clWindowText
14 
  Font.Height = -11
15 
  Font.Name = 'Tahoma'
16 
  Font.Style = []
17 
  Menu = MainMenu
18 
  OldCreateOrder = False
19 
  Position = poDesktopCenter
20 
  OnClose = FormClose
21 
  OnCreate = FormCreate
22 
  OnDestroy = FormDestroy
23 
  OnShow = FormShow
24 
  PixelsPerInch = 96
25 
  TextHeight = 13
26 
  object Playground: TPanel
27 
    Left = 8
28 
    Top = 8
29 
    Width = 313
30 
    Height = 289
31 
    BevelOuter = bvNone
32 
    TabOrder = 0
33 
  end
34 
  object Statistics: TStatusBar
35 
    Left = 0
36 
    Top = 258
37 
    Width = 340
38 
    Height = 19
39 
    Panels = <
40 
      item
41 
        Width = 85
42 
      end
43 
      item
44 
        Alignment = taCenter
45 
        Width = 140
46 
      end
47 
      item
48 
        Alignment = taRightJustify
49 
        Width = 50
50 
      end>
51 
  end
52 
  object MainMenu: TMainMenu
53 
    Left = 8
54 
    Top = 8
55 
    object Help1: TMenuItem
56 
      Caption = 'Game'
57 
      object MNewGame: TMenuItem
58 
        Caption = 'New game...'
59 
        ShortCut = 16462
60 
        OnClick = MNewGameClick
61 
      end
62 
      object N1: TMenuItem
63 
        Caption = '-'
64 
      end
65 
      object MRestartGame: TMenuItem
66 
        Caption = 'Restart level'
67 
        ShortCut = 16466
68 
        OnClick = MRestartGameClick
69 
      end
70 
      object MPauseTime: TMenuItem
71 
        Caption = 'Pause timer'
72 
        ShortCut = 16464
73 
        OnClick = MPauseTimeClick
74 
      end
75 
      object N2: TMenuItem
76 
        Caption = '-'
77 
      end
78 
      object MUndo: TMenuItem
79 
        Caption = 'Undo'
80 
        Enabled = False
81 
        ShortCut = 16474
82 
      end
83 
      object MRedo: TMenuItem
84 
        Caption = 'Redo'
85 
        Enabled = False
86 
        ShortCut = 16473
87 
      end
88 
      object N3: TMenuItem
89 
        Caption = '-'
90 
      end
91 
      object MJumpHistory: TMenuItem
92 
        Caption = 'View jump history...'
93 
        ShortCut = 16458
94 
        OnClick = MJumpHistoryClick
95 
      end
96 
      object MHighScores: TMenuItem
97 
        Caption = 'High scores of this level...'
98 
        ShortCut = 16456
99 
        OnClick = MHighScoresClick
100 
      end
101 
      object N4: TMenuItem
102 
        Caption = '-'
103 
      end
104 
      object MExit: TMenuItem
105 
        Caption = 'Exit'
106 
        ShortCut = 32883
107 
        OnClick = MExitClick
108 
      end
109 
    end
110 
    object MSettings: TMenuItem
111 
      Caption = 'Settings'
112 
      object MEnableSound: TMenuItem
113 
        Caption = 'Enable sound'
114 
        Checked = True
115 
        ShortCut = 32851
116 
        OnClick = MEnableSoundClick
117 
      end
118 
    end
119 
    object Help2: TMenuItem
120 
      Caption = 'Help'
121 
      object MHelp: TMenuItem
122 
        Caption = 'Help...'
123 
        ShortCut = 112
124 
        OnClick = MHelpClick
125 
      end
126 
      object N5: TMenuItem
127 
        Caption = '-'
128 
      end
129 
      object MAbout: TMenuItem
130 
        Caption = 'About...'
131 
        OnClick = MAboutClick
132 
      end
133 
    end
134 
  end
135 
  object Timer: TTimer
136 
    Enabled = False
137 
    OnTimer = TimerTimer
138 
    Left = 40
139 
    Top = 8
140 
  end
141 
end