Subversion Repositories jumper

Rev

Rev 1 | Rev 14 | 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
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
6 daniel-mar 82 
        OnClick = MUndoClick
1 daniel-mar 83 
      end
84 
      object N3: TMenuItem
85 
        Caption = '-'
86 
      end
87 
      object MJumpHistory: TMenuItem
88 
        Caption = 'View jump history...'
89 
        ShortCut = 16458
90 
        OnClick = MJumpHistoryClick
91 
      end
92 
      object MHighScores: TMenuItem
93 
        Caption = 'High scores of this level...'
94 
        ShortCut = 16456
95 
        OnClick = MHighScoresClick
96 
      end
97 
      object N4: TMenuItem
98 
        Caption = '-'
99 
      end
100 
      object MExit: TMenuItem
101 
        Caption = 'Exit'
102 
        ShortCut = 32883
103 
        OnClick = MExitClick
104 
      end
105 
    end
106 
    object MSettings: TMenuItem
107 
      Caption = 'Settings'
108 
      object MEnableSound: TMenuItem
109 
        Caption = 'Enable sound'
110 
        Checked = True
111 
        ShortCut = 32851
112 
        OnClick = MEnableSoundClick
113 
      end
114 
    end
115 
    object Help2: TMenuItem
116 
      Caption = 'Help'
117 
      object MHelp: TMenuItem
118 
        Caption = 'Help...'
119 
        ShortCut = 112
120 
        OnClick = MHelpClick
121 
      end
122 
      object N5: TMenuItem
123 
        Caption = '-'
124 
      end
125 
      object MAbout: TMenuItem
126 
        Caption = 'About...'
127 
        OnClick = MAboutClick
128 
      end
129 
    end
130 
  end
131 
  object Timer: TTimer
132 
    Enabled = False
133 
    OnTimer = TimerTimer
134 
    Left = 40
135 
    Top = 8
136 
  end
137 
end