Subversion Repositories spacemission

Rev

Rev 40 | Rev 63 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 40 Rev 54
Line 42... Line 42...
42 
    SimplePanel = True
 42 
    SimplePanel = True
43 
    SimpleText =
43 
    SimpleText =
44 
      ' Zeigen Sie mit dem Mauszeiger auf eine Einheit, um deren Eigens' +
 44 
      ' Zeigen Sie mit dem Mauszeiger auf eine Einheit, um deren Eigens' +
45 
      'chaften anzuzeigen...'
 45 
      'chaften anzuzeigen...'
46 
    OnMouseMove = DXDrawMouseMove
 46 
    OnMouseMove = DXDrawMouseMove
47 
    ExplicitTop = 498
 - 
 
48 
    ExplicitWidth = 741
 - 
 
49 
  end
 47 
  end
50 
  object SidePanel: TPanel
 48 
  object SidePanel: TPanel
51 
    Left = 636
 49 
    Left = 636
52 
    Top = 0
 50 
    Top = 0
53 
    Width = 109
 51 
    Width = 109
54 
    Height = 499
 52 
    Height = 499
55 
    Align = alRight
 53 
    Align = alRight
56 
    BevelOuter = bvNone
 54 
    BevelOuter = bvNone
57 
    TabOrder = 2
 55 
    TabOrder = 2
58 
    ExplicitLeft = 632
 - 
 
59 
    ExplicitHeight = 498
 - 
 
60 
    object Bevel1: TBevel
 56 
    object Bevel1: TBevel
61 
      Left = 4
 57 
      Left = 4
62 
      Top = 200
 58 
      Top = 200
63 
      Width = 97
 59 
      Width = 97
64 
      Height = 2
 60 
      Height = 2
Line 2023... Line 2019...
2023 
      object Neu: TMenuItem
 2019 
      object Neu: TMenuItem
2024 
        Caption = '&Neu'
 2020 
        Caption = '&Neu'
2025 
        ShortCut = 16462
 2021 
        ShortCut = 16462
2026 
        OnClick = NeuClick
 2022 
        OnClick = NeuClick
2027 
      end
 2023 
      end
- 
 
 2024 
      object N2: TMenuItem
- 
 
 2025 
        Caption = '-'
- 
 
 2026 
      end
2028 
      object Level: TMenuItem
 2027 
      object Level: TMenuItem
2029 
        Caption = '&Laden/Speichern...'
 2028 
        Caption = '&Laden/Speichern...'
2030 
        ShortCut = 16463
 2029 
        ShortCut = 16463
2031 
        OnClick = LevelClick
 2030 
        OnClick = LevelClick
2032 
      end
 2031 
      end
2033 
      object AlleLeveldateienaktualisieren1: TMenuItem
 2032 
      object AlleLeveldateienaktualisieren1: TMenuItem
2034 
        Caption = 'Alle Leveldateien aktualisieren'
 2033 
        Caption = 'Alle Leveldateien aktualisieren'
2035 
        Visible = False
 2034 
        Visible = False
2036 
        OnClick = AlleLeveldateienaktualisieren1Click
 2035 
        OnClick = AlleLeveldateienaktualisieren1Click
2037 
      end
 2036 
      end
- 
 
 2037 
      object Leveltesten1: TMenuItem
- 
 
 2038 
        Caption = 'Level testen'
- 
 
 2039 
        OnClick = Leveltesten1Click
- 
 
 2040 
      end
2038 
      object N1: TMenuItem
 2041 
      object N1: TMenuItem
2039 
        Caption = '-'
 2042 
        Caption = '-'
2040 
      end
 2043 
      end
2041 
      object Spielfelderweitern1: TMenuItem
 2044 
      object Spielfelderweitern1: TMenuItem
2042 
        Caption = 'Leveleigenschaften...'
 2045 
        Caption = 'Leveleigenschaften...'