Subversion Repositories jumper

Rev

Rev 19 | Go to most recent revision | Details | Compare with Previous | 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
18 daniel-mar 19
  Position = poScreenCenter
1 daniel-mar 20
  OnClose = FormClose
14 daniel-mar 21
  OnCloseQuery = FormCloseQuery
1 daniel-mar 22
  OnCreate = FormCreate
23
  OnDestroy = FormDestroy
24
  OnShow = FormShow
25
  PixelsPerInch = 96
26
  TextHeight = 13
27
  object Playground: TPanel
19 daniel-mar 28
    Left = 0
29
    Top = 0
1 daniel-mar 30
    Width = 313
31
    Height = 289
32
    BevelOuter = bvNone
33
    TabOrder = 0
34
  end
35
  object Statistics: TStatusBar
36
    Left = 0
37
    Top = 258
38
    Width = 340
39
    Height = 19
40
    Panels = <
41
      item
42
        Width = 85
43
      end
44
      item
45
        Alignment = taCenter
46
        Width = 140
47
      end
48
      item
49
        Alignment = taRightJustify
50
        Width = 50
51
      end>
52
  end
53
  object MainMenu: TMainMenu
54
    Left = 8
55
    Top = 8
56
    object Help1: TMenuItem
57
      Caption = 'Game'
58
      object MNewGame: TMenuItem
59
        Caption = 'New game...'
60
        ShortCut = 16462
61
        OnClick = MNewGameClick
62
      end
63
      object N1: TMenuItem
64
        Caption = '-'
65
      end
66
      object MRestartGame: TMenuItem
67
        Caption = 'Restart level'
68
        ShortCut = 16466
69
        OnClick = MRestartGameClick
70
      end
71
      object MPauseTime: TMenuItem
21 daniel-mar 72
        AutoCheck = True
1 daniel-mar 73
        Caption = 'Pause timer'
74
        ShortCut = 16464
75
      end
76
      object N2: TMenuItem
77
        Caption = '-'
78
      end
79
      object MUndo: TMenuItem
80
        Caption = 'Undo'
81
        Enabled = False
82
        ShortCut = 16474
6 daniel-mar 83
        OnClick = MUndoClick
1 daniel-mar 84
      end
85
      object N3: TMenuItem
86
        Caption = '-'
87
      end
88
      object MJumpHistory: TMenuItem
89
        Caption = 'View jump history...'
90
        ShortCut = 16458
91
        OnClick = MJumpHistoryClick
92
      end
93
      object MHighScores: TMenuItem
94
        Caption = 'High scores of this level...'
95
        ShortCut = 16456
96
        OnClick = MHighScoresClick
97
      end
98
      object N4: TMenuItem
99
        Caption = '-'
100
      end
101
      object MExit: TMenuItem
102
        Caption = 'Exit'
103
        ShortCut = 32883
104
        OnClick = MExitClick
105
      end
106
    end
107
    object MSettings: TMenuItem
108
      Caption = 'Settings'
109
      object MEnableSound: TMenuItem
21 daniel-mar 110
        AutoCheck = True
1 daniel-mar 111
        Caption = 'Enable sound'
112
        Checked = True
113
        ShortCut = 32851
114
      end
115
    end
116
    object Help2: TMenuItem
117
      Caption = 'Help'
118
      object MHelp: TMenuItem
119
        Caption = 'Help...'
120
        ShortCut = 112
121
        OnClick = MHelpClick
122
      end
14 daniel-mar 123
      object Aboutthislevel1: TMenuItem
124
        Caption = 'About this level'
125
        OnClick = Aboutthislevel1Click
126
      end
1 daniel-mar 127
      object N5: TMenuItem
128
        Caption = '-'
129
      end
130
      object MAbout: TMenuItem
131
        Caption = 'About...'
132
        OnClick = MAboutClick
133
      end
134
    end
135
  end
136
  object Timer: TTimer
137
    Enabled = False
138
    OnTimer = TimerTimer
139
    Left = 40
140
    Top = 8
141
  end
142
end