Subversion Repositories jumper

Rev

Rev 20 | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 20 Rev 29
Line 13... Line 13...
13 
  Font.Color = clWindowText
 13 
  Font.Color = clWindowText
14 
  Font.Height = -11
 14 
  Font.Height = -11
15 
  Font.Name = 'Tahoma'
 15 
  Font.Name = 'Tahoma'
16 
  Font.Style = []
 16 
  Font.Style = []
17 
  Menu = MainMenu
 17 
  Menu = MainMenu
18 
  OldCreateOrder = False
 - 
 
19 
  Position = poScreenCenter
 18 
  Position = poScreenCenter
20 
  OnClose = FormClose
 19 
  OnClose = FormClose
21 
  OnCloseQuery = FormCloseQuery
 20 
  OnCloseQuery = FormCloseQuery
22 
  OnCreate = FormCreate
 21 
  OnCreate = FormCreate
23 
  OnDestroy = FormDestroy
 22 
  OnDestroy = FormDestroy
24 
  OnShow = FormShow
 23 
  OnShow = FormShow
25 
  PixelsPerInch = 96
 - 
 
26 
  TextHeight = 13
 24 
  TextHeight = 13
27 
  object Playground: TPanel
 25 
  object Playground: TPanel
28 
    Left = 0
 26 
    Left = 0
29 
    Top = 0
 27 
    Top = 0
30 
    Width = 313
 28 
    Width = 313
Line 47... Line 45...
47 
      end
 45 
      end
48 
      item
 46 
      item
49 
        Alignment = taRightJustify
 47 
        Alignment = taRightJustify
50 
        Width = 50
 48 
        Width = 50
51 
      end>
 49 
      end>
- 
 
 50 
    ExplicitTop = 257
- 
 
 51 
    ExplicitWidth = 336
52 
  end
 52 
  end
53 
  object MainMenu: TMainMenu
 53 
  object MainMenu: TMainMenu
54 
    Left = 8
 54 
    Left = 8
55 
    Top = 8
 55 
    Top = 8
56 
    object Help1: TMenuItem
 56 
    object Help1: TMenuItem
Line 67... Line 67...
67 
        Caption = 'Neu starten'
 67 
        Caption = 'Neu starten'
68 
        ShortCut = 16466
 68 
        ShortCut = 16466
69 
        OnClick = MRestartGameClick
 69 
        OnClick = MRestartGameClick
70 
      end
 70 
      end
71 
      object MPauseTime: TMenuItem
 71 
      object MPauseTime: TMenuItem
- 
 
 72 
        AutoCheck = True
72 
        Caption = 'Zeit anhalten'
 73 
        Caption = 'Zeit anhalten'
73 
        ShortCut = 16464
 74 
        ShortCut = 16464
74 
        OnClick = MPauseTimeClick
 - 
 
75 
      end
 75 
      end
76 
      object N2: TMenuItem
 76 
      object N2: TMenuItem
77 
        Caption = '-'
 77 
        Caption = '-'
78 
      end
 78 
      end
79 
      object MUndo: TMenuItem
 79 
      object MUndo: TMenuItem
Line 105... Line 105...
105 
      end
 105 
      end
106 
    end
 106 
    end
107 
    object MSettings: TMenuItem
 107 
    object MSettings: TMenuItem
108 
      Caption = 'Einstellungen'
 108 
      Caption = 'Einstellungen'
109 
      object MEnableSound: TMenuItem
 109 
      object MEnableSound: TMenuItem
- 
 
 110 
        AutoCheck = True
110 
        Caption = 'Ton'
 111 
        Caption = 'Ton'
111 
        Checked = True
 112 
        Checked = True
112 
        ShortCut = 32851
 113 
        ShortCut = 32851
113 
        OnClick = MEnableSoundClick
 - 
 
114 
      end
 114 
      end
115 
    end
 115 
    end
116 
    object Help2: TMenuItem
 116 
    object Help2: TMenuItem
117 
      Caption = 'Hilfe'
 117 
      Caption = 'Hilfe'
118 
      object MHelp: TMenuItem
 118 
      object MHelp: TMenuItem