Subversion Repositories spacemission

Rev

Rev 3 | Rev 6 | 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 = 217
3 
  Top = 117
4 
  BorderIcons = [biSystemMenu, biMinimize]
5 
  BorderStyle = bsSingle
6 
  Caption = 'Leveleditor'
3 daniel-mar 7 
  ClientHeight = 558
1 daniel-mar 8 
  ClientWidth = 753
9 
  Color = clBtnFace
10 
  Font.Charset = DEFAULT_CHARSET
11 
  Font.Color = clWindowText
12 
  Font.Height = -12
13 
  Font.Name = 'MS Sans Serif'
14 
  Font.Style = []
15 
  KeyPreview = True
16 
  Menu = MainMenu
17 
  OldCreateOrder = True
18 
  Position = poDesktopCenter
19 
  Scaled = False
20 
  OnClose = FormClose
21 
  OnCloseQuery = FormCloseQuery
22 
  OnCreate = FormCreate
23 
  OnDestroy = FormDestroy
24 
  OnMouseMove = DXDrawMouseMove
25 
  OnShow = FormShow
2 daniel-mar 26 
  PixelsPerInch = 106
1 daniel-mar 27 
  TextHeight = 13
28 
  object Bevel1: TBevel
29 
    Left = 648
30 
    Top = 200
31 
    Width = 97
32 
    Height = 2
33 
    Shape = bsBottomLine
34 
  end
35 
  object Bevel2: TBevel
36 
    Left = 648
37 
    Top = 392
38 
    Width = 97
39 
    Height = 2
40 
    Shape = bsBottomLine
41 
  end
42 
  object SelLabel: TLabel
43 
    Left = 648
44 
    Top = 0
45 
    Width = 43
46 
    Height = 13
47 
    Caption = 'Auswahl:'
48 
    Font.Charset = DEFAULT_CHARSET
49 
    Font.Color = clWindowText
50 
    Font.Height = -12
51 
    Font.Name = 'MS Sans Serif'
52 
    Font.Style = [fsUnderline]
53 
    ParentFont = False
54 
    OnMouseMove = DXDrawMouseMove
55 
  end
56 
  object Bevel3: TBevel
57 
    Left = 648
58 
    Top = 320
59 
    Width = 97
60 
    Height = 2
61 
    Shape = bsBottomLine
62 
  end
63 
  object SLabel1a: TLabel
64 
    Left = 652
65 
    Top = 424
66 
    Width = 47
67 
    Height = 13
68 
    Caption = 'Einheiten:'
69 
    OnMouseMove = DXDrawMouseMove
70 
  end
71 
  object SLabel2a: TLabel
72 
    Left = 652
73 
    Top = 440
74 
    Width = 26
75 
    Height = 13
76 
    Caption = 'Boss:'
77 
    OnMouseMove = DXDrawMouseMove
78 
  end
79 
  object SLabel1b: TLabel
80 
    Left = 720
81 
    Top = 424
82 
    Width = 6
83 
    Height = 13
84 
    Caption = '0'
85 
    OnMouseMove = DXDrawMouseMove
86 
  end
87 
  object SLabel2b: TLabel
88 
    Left = 720
89 
    Top = 440
90 
    Width = 22
91 
    Height = 13
92 
    Caption = 'Nein'
93 
    OnMouseMove = DXDrawMouseMove
94 
  end
95 
  object SLabel0: TLabel
96 
    Left = 648
97 
    Top = 400
98 
    Width = 84
99 
    Height = 13
100 
    Caption = 'Level-Information:'
101 
    Font.Charset = DEFAULT_CHARSET
102 
    Font.Color = clWindowText
103 
    Font.Height = -12
104 
    Font.Name = 'MS Sans Serif'
105 
    Font.Style = [fsUnderline]
106 
    ParentFont = False
107 
    OnMouseMove = DXDrawMouseMove
108 
  end
109 
  object SLabel3a: TLabel
110 
    Left = 652
111 
    Top = 456
112 
    Width = 32
113 
    Height = 13
114 
    Caption = 'Gr'#246#223'e:'
115 
    OnMouseMove = DXDrawMouseMove
116 
  end
117 
  object SLabel3b: TLabel
118 
    Left = 720
119 
    Top = 456
120 
    Width = 24
121 
    Height = 13
122 
    Caption = '1200'
123 
    OnMouseMove = DXDrawMouseMove
124 
  end
125 
  object SLabel4a: TLabel
126 
    Left = 652
127 
    Top = 480
128 
    Width = 60
129 
    Height = 13
130 
    Caption = 'Gespeichert:'
131 
    Font.Charset = DEFAULT_CHARSET
132 
    Font.Color = 150
133 
    Font.Height = -12
134 
    Font.Name = 'MS Sans Serif'
135 
    Font.Style = []
136 
    ParentFont = False
137 
    OnMouseMove = DXDrawMouseMove
138 
  end
139 
  object SLabel4b: TLabel
140 
    Left = 720
141 
    Top = 480
142 
    Width = 22
143 
    Height = 13
144 
    Caption = 'Nein'
145 
    Font.Charset = DEFAULT_CHARSET
146 
    Font.Color = 150
147 
    Font.Height = -12
148 
    Font.Name = 'MS Sans Serif'
149 
    Font.Style = []
150 
    ParentFont = False
151 
    OnMouseMove = DXDrawMouseMove
152 
  end
153 
  object LivesLabel: TLabel
154 
    Left = 648
155 
    Top = 332
156 
    Width = 33
157 
    Height = 13
158 
    Caption = 'Leben:'
159 
    Font.Charset = DEFAULT_CHARSET
160 
    Font.Color = clWindowText
161 
    Font.Height = -12
162 
    Font.Name = 'MS Sans Serif'
163 
    Font.Style = [fsUnderline]
164 
    ParentFont = False
165 
    OnMouseMove = DXDrawMouseMove
166 
  end
167 
  object Enemy1: TRadioButton
168 
    Left = 652
169 
    Top = 24
4 daniel-mar 170 
    Width = 93
1 daniel-mar 171 
    Height = 17
4 daniel-mar 172 
    Caption = 'Angreifer Typ 1'
1 daniel-mar 173 
    Checked = True
174 
    TabOrder = 0
175 
    TabStop = True
176 
    OnClick = EnemyClick
177 
    OnMouseMove = DXDrawMouseMove
178 
  end
179 
  object Enemy2: TRadioButton
180 
    Left = 652
181 
    Top = 48
4 daniel-mar 182 
    Width = 93
1 daniel-mar 183 
    Height = 17
4 daniel-mar 184 
    Caption = 'Angreifer Typ 2'
1 daniel-mar 185 
    TabOrder = 1
186 
    OnClick = EnemyClick
187 
    OnMouseMove = DXDrawMouseMove
188 
  end
189 
  object Enemy3: TRadioButton
190 
    Left = 652
191 
    Top = 72
4 daniel-mar 192 
    Width = 93
1 daniel-mar 193 
    Height = 17
4 daniel-mar 194 
    Caption = 'Angreifer Typ 3'
1 daniel-mar 195 
    TabOrder = 2
196 
    OnClick = EnemyClick
197 
    OnMouseMove = DXDrawMouseMove
198 
  end
199 
  object Enemy4: TRadioButton
200 
    Left = 652
201 
    Top = 96
202 
    Width = 55
203 
    Height = 17
204 
    Caption = 'Meteor'
205 
    TabOrder = 3
206 
    OnClick = EnemyClick
207 
    OnMouseMove = DXDrawMouseMove
208 
  end
209 
  object Enemy5: TRadioButton
210 
    Left = 652
211 
    Top = 120
212 
    Width = 44
213 
    Height = 17
214 
    Caption = 'UFO'
215 
    TabOrder = 4
216 
    OnClick = EnemyClick
217 
    OnMouseMove = DXDrawMouseMove
218 
  end
219 
  object Enemy6: TRadioButton
220 
    Left = 652
221 
    Top = 144
222 
    Width = 53
223 
    Height = 17
224 
    Caption = 'UFO 2'
225 
    TabOrder = 5
226 
    OnClick = EnemyClick
227 
    OnMouseMove = DXDrawMouseMove
228 
  end
229 
  object Enemy7: TRadioButton
230 
    Left = 652
231 
    Top = 168
232 
    Width = 45
233 
    Height = 17
234 
    Caption = 'Boss'
235 
    TabOrder = 6
236 
    OnClick = EnemyClick
237 
    OnMouseMove = DXDrawMouseMove
238 
  end
239 
  object ScrollBar: TScrollBar
240 
    Left = 0
241 
    Top = 480
242 
    Width = 640
243 
    Height = 17
244 
    Max = 1200
245 
    PageSize = 0
246 
    TabOrder = 7
247 
    OnScroll = ScrollBarScroll
248 
  end
249 
  object SelPanel: TPanel
250 
    Left = 652
251 
    Top = 216
252 
    Width = 89
253 
    Height = 89
254 
    Color = clWhite
255 
    TabOrder = 8
256 
    OnMouseMove = DXDrawMouseMove
257 
    object Image1: TImage
258 
      Left = 1
259 
      Top = 1
260 
      Width = 610
261 
      Height = 88
262 
      AutoSize = True
263 
      OnMouseMove = DXDrawMouseMove
264 
    end
265 
  end
266 
  object StatusBar: TStatusBar
267 
    Left = 0
3 daniel-mar 268 
    Top = 539
1 daniel-mar 269 
    Width = 753
270 
    Height = 19
271 
    Panels = <>
272 
    SimpleText =
273 
      ' Zeigen Sie mit dem Mauszeiger auf eine Einheit, um deren Eigens' +
274 
      'chaften anzuzeigen...'
275 
    OnMouseMove = DXDrawMouseMove
276 
  end
277 
  object LivesEdt: TEdit
278 
    Left = 648
279 
    Top = 360
280 
    Width = 73
281 
    Height = 21
282 
    TabOrder = 10
283 
    Text = '1'
284 
    OnChange = LivesEdtChange
285 
    OnKeyPress = LivesEdtKeyPress
286 
    OnMouseMove = DXDrawMouseMove
287 
  end
288 
  object Lives: TUpDown
289 
    Left = 720
290 
    Top = 360
291 
    Width = 17
292 
    Height = 19
293 
    Min = 1
294 
    Max = 999
295 
    Position = 1
296 
    TabOrder = 11
297 
    OnClick = LivesClick
298 
    OnMouseMove = DXDrawMouseMove
299 
  end
300 
  object MainMenu: TMainMenu
4 daniel-mar 301 
    Left = 32
302 
    Top = 16
1 daniel-mar 303 
    object Spiel: TMenuItem
304 
      Caption = '&Datei'
305 
      object Level: TMenuItem
306 
        Caption = '&Verwaltung...'
307 
        ShortCut = 115
308 
        OnClick = LevelClick
309 
      end
310 
      object Quelltext1: TMenuItem
311 
        Caption = '&Quelltext...'
312 
        ShortCut = 116
313 
        OnClick = Quelltext1Click
314 
      end
315 
      object N1: TMenuItem
316 
        Caption = '-'
317 
      end
318 
      object Neu: TMenuItem
319 
        Caption = '&Neu'
320 
        ShortCut = 117
321 
        OnClick = NeuClick
322 
      end
323 
      object Spielfelderweitern1: TMenuItem
324 
        Caption = 'Leveleigenschaften...'
325 
        ShortCut = 118
326 
        OnClick = Spielfelderweitern1Click
327 
      end
328 
      object Leer1: TMenuItem
329 
        Caption = '-'
330 
      end
331 
      object Beenden: TMenuItem
332 
        Caption = '&Beenden'
333 
        ShortCut = 32883
334 
        OnClick = BeendenClick
335 
      end
336 
    end
337 
    object Hilfe: TMenuItem
338 
      Caption = '&Hilfe'
339 
      object Informationen: TMenuItem
340 
        Caption = '&Informationen...'
341 
        GroupIndex = 1
342 
        OnClick = InformationenClick
343 
      end
344 
    end
345 
  end
346 
end