Subversion Repositories jumper

Rev

Rev 1 | Rev 7 | Go to most recent revision | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1 Rev 5
1
ÿ
1
object MainForm: TMainForm
2
TMAINFORM0{TPF0	TMainFormMainFormLeftòTopŽBorderIconsbiSystemMenu
2
  Left = 242
3
biMinimizeBorderStylebsSingleCaptionViaThinkSoft Peg SolitärClientHeightClientWidthTColor	clBtnFaceConstraints.MinHeight@Constraints.MinWidth,Font.CharsetDEFAULT_CHARSET
3
  Top = 142
4
Font.ColorclWindowTextFont.Heightõ	Font.NameTahoma
4
  BorderIcons = [biSystemMenu, biMinimize]
5
Font.StyleMenuMainMenuOldCreateOrderPositionpoDesktopCenterOnClose	FormCloseOnCreate
5
  BorderStyle = bsSingle
6
FormCreate	OnDestroyFormDestroyOnShowFormShow
PixelsPerInch`
6
  Caption = 'ViaThinkSoft Peg Solit'#228'r'
7
TextHeight
TPanel
7
  ClientHeight = 277
8
PlaygroundLeftTopWidth9Height!
8
  ClientWidth = 340
9
BevelOuterbvNoneTabOrder
9
  Color = clBtnFace
10
TStatusBar
10
  Constraints.MinHeight = 320
11
StatisticsLeftTopWidthTHeightPanelsWidthU	AlignmenttaCenterWidthŒ	AlignmenttaRightJustifyWidth2	TMainMenuMainMenuLeftTop	TMenuItemHelp1CaptionSpiel	TMenuItemMNewGameCaptionNeues Spiel...ShortCutN@OnClick
MNewGameClick	TMenuItemN1Caption-	TMenuItemMRestartGameCaptionNeu startenShortCutR@OnClickMRestartGameClick	TMenuItem
11
  Constraints.MinWidth = 300
12
MPauseTimeCaption
Zeit anhaltenShortCutP@OnClickMPauseTimeClick	TMenuItemN2Caption-	TMenuItemMUndoCaptionRückgängigEnabledShortCutZ@	TMenuItemMRedoCaptionWiederholenEnabledShortCutY@	TMenuItemN3Caption-	TMenuItemMJumpHistoryCaptionSprungverlauf...ShortCutJ@OnClickMJumpHistoryClick	TMenuItemMHighScoresCaptionHighscores von diesem Level...ShortCutH@OnClickMHighScoresClick	TMenuItemN4Caption-	TMenuItemMExitCaptionBeendenShortCuts€OnClick
12
  Font.Charset = DEFAULT_CHARSET
13
MExitClick	TMenuItem	MSettingsCaption
Einstellungen	TMenuItemMEnableSoundCaptionTonChecked	ShortCutS€OnClickMEnableSoundClick	TMenuItemHelp2CaptionHilfe	TMenuItemMHelpCaptionHilfe anzeigen...ShortCutpOnClick
13
  Font.Color = clWindowText
14
MHelpClick	TMenuItemN5Caption-	TMenuItemMAboutCaptionÜber...OnClickMAboutClickTTimerTimerEnabledOnTimer
14
  Font.Height = -11
15
TimerTimerLeft(Top
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 = 'Spiel'
-
 
57
      object MNewGame: TMenuItem
-
 
58
        Caption = 'Neues Spiel...'
-
 
59
        ShortCut = 16462
-
 
60
        OnClick = MNewGameClick
-
 
61
      end
-
 
62
      object N1: TMenuItem
-
 
63
        Caption = '-'
-
 
64
      end
-
 
65
      object MRestartGame: TMenuItem
-
 
66
        Caption = 'Neu starten'
-
 
67
        ShortCut = 16466
-
 
68
        OnClick = MRestartGameClick
-
 
69
      end
-
 
70
      object MPauseTime: TMenuItem
-
 
71
        Caption = 'Zeit anhalten'
-
 
72
        ShortCut = 16464
-
 
73
        OnClick = MPauseTimeClick
-
 
74
      end
-
 
75
      object N2: TMenuItem
-
 
76
        Caption = '-'
-
 
77
      end
-
 
78
      object MUndo: TMenuItem
-
 
79
        Caption = 'R'#252'ckg'#228'ngig'
-
 
80
        Enabled = False
-
 
81
        ShortCut = 16474
-
 
82
      end
-
 
83
      object MRedo: TMenuItem
-
 
84
        Caption = 'Wiederholen'
-
 
85
        Enabled = False
-
 
86
        ShortCut = 16473
-
 
87
      end
-
 
88
      object N3: TMenuItem
-
 
89
        Caption = '-'
-
 
90
      end
-
 
91
      object MJumpHistory: TMenuItem
-
 
92
        Caption = 'Sprungverlauf...'
-
 
93
        ShortCut = 16458
-
 
94
        OnClick = MJumpHistoryClick
-
 
95
      end
-
 
96
      object MHighScores: TMenuItem
-
 
97
        Caption = 'Highscores von diesem Level...'
-
 
98
        ShortCut = 16456
-
 
99
        OnClick = MHighScoresClick
-
 
100
      end
-
 
101
      object N4: TMenuItem
-
 
102
        Caption = '-'
-
 
103
      end
-
 
104
      object MExit: TMenuItem
-
 
105
        Caption = 'Beenden'
-
 
106
        ShortCut = 32883
-
 
107
        OnClick = MExitClick
-
 
108
      end
-
 
109
    end
-
 
110
    object MSettings: TMenuItem
-
 
111
      Caption = 'Einstellungen'
-
 
112
      object MEnableSound: TMenuItem
-
 
113
        Caption = 'Ton'
-
 
114
        Checked = True
-
 
115
        ShortCut = 32851
-
 
116
        OnClick = MEnableSoundClick
-
 
117
      end
-
 
118
    end
-
 
119
    object Help2: TMenuItem
-
 
120
      Caption = 'Hilfe'
-
 
121
      object MHelp: TMenuItem
-
 
122
        Caption = 'Hilfe anzeigen...'
-
 
123
        ShortCut = 112
-
 
124
        OnClick = MHelpClick
-
 
125
      end
-
 
126
      object N5: TMenuItem
-
 
127
        Caption = '-'
-
 
128
      end
-
 
129
      object MAbout: TMenuItem
-
 
130
        Caption = #220'ber...'
-
 
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