-
Notifications
You must be signed in to change notification settings - Fork 0
/
Unit1.dfm
274 lines (274 loc) · 7.15 KB
/
Unit1.dfm
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
object f3DS: Tf3DS
Left = 134
Top = 160
BorderStyle = bsSingle
Caption = 'Core'
ClientHeight = 534
ClientWidth = 666
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Icon.Data = {
0000010002002020100000000000E80200002600000010101000000000002801
00000E0300002800000020000000400000000100040000000000800200000000
0000000000000000000000000000000000000000800000800000008080008000
0000800080008080000080808000C0C0C0000000FF0000FF000000FFFF00FF00
0000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFF88877778888FFFFFFFFFFFFFFFFFF87766666666666778FFFFFFFFFF
FF87666666666777766666678FFFFFFFF76666667788FFFFFFFF887667FFFFF8
66666678FFFFFFFFFFFFFFFF8778FF866666678FFFFFFFFFFFFFFFFFFF88FF66
66666FFFFFFFFFFFFFFFFFFFFFFFF76666668FFFFFFFFFFFFFFFFFFFFFFFF666
6668FFFFFFFFFFFFFFFFFFFFFFFF86666668FFFFFFFFFFFFFFFFFFFFFFFF8666
6668FFFFFFFFFFFFFFFFFFFFFFFFF7666667FFFFFFFFFFFFFFFFFFFFFFFFF866
66668FFFFFFFFFFFFFFFFFFFFFFFFF7666666FFFFFFFFFFFFFFFFFFFFFFFFFF7
6666678FFFFFFFFFFFFFFFFFFF88FFFF766666788FFFFFFFFFFFFFFF877FFFFF
F8766666777888FFFFF8887678FFFFFFFFF876666666666766666678FFFFFFFF
FFFFF88776666666667788FFFFFFFFFFFFFFFFFFFF8888888FFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFF000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000280000001000000020000000010004000000
0000C00000000000000000000000000000000000000000000000000080000080
00000080800080000000800080008080000080808000C0C0C0000000FF0000FF
000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
887777778FFFFF8766678887778FF86668FFFFFFF88886668FFFFFFFFFFF7667
FFFFFFFFFFFF8667FFFFFFFFFFFFF6667FFFFFFFFFFFF86668FFFFFFFF88FFF8
66677777778FFFFFF88777788FFFFFFFFFFFFFFFFFFF00000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
00000000000000000000000000000000000000000000}
Menu = MainMenu
OldCreateOrder = False
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 8
Top = 112
Width = 22
Height = 13
Caption = 'Tree'
end
object Memo: TMemo
Left = 0
Top = 8
Width = 577
Height = 97
ScrollBars = ssVertical
TabOrder = 0
WordWrap = False
OnDblClick = MemoDblClick
end
object bImport3DS: TButton
Left = 584
Top = 56
Width = 75
Height = 25
Action = ActionImport3DS
TabOrder = 1
end
object Tree3DS: TTreeView
Left = 0
Top = 128
Width = 577
Height = 385
Indent = 19
ReadOnly = True
TabOrder = 2
OnDblClick = Tree3DSDblClick
end
object StatusBar: TStatusBar
Left = 0
Top = 515
Width = 666
Height = 19
Panels = <>
end
object bOpenGL: TButton
Left = 584
Top = 8
Width = 75
Height = 25
Action = ActionDisplay
TabOrder = 4
OnMouseMove = bOpenGLMouseMove
end
object bSaveAsGM: TButton
Left = 584
Top = 80
Width = 75
Height = 25
Action = ActionSaveAsGM
Enabled = False
TabOrder = 5
Visible = False
end
object eFPS: TEdit
Left = 584
Top = 488
Width = 73
Height = 21
Color = clBtnFace
ReadOnly = True
TabOrder = 6
end
object bLoadBSP: TButton
Left = 584
Top = 200
Width = 75
Height = 25
Action = ActionLoadBSP
TabOrder = 7
end
object bLoadMap: TButton
Left = 584
Top = 136
Width = 75
Height = 25
Action = ActionLoadMap
TabOrder = 8
end
object bClearMap: TButton
Left = 584
Top = 160
Width = 75
Height = 25
Caption = 'Clear Map'
TabOrder = 9
OnClick = bClearMapClick
end
object bClearBSP: TButton
Left = 584
Top = 224
Width = 75
Height = 25
Caption = 'Clear BSP'
TabOrder = 10
OnClick = bClearBSPClick
end
object bGenerateTerrain: TButton
Left = 584
Top = 264
Width = 75
Height = 25
Action = ActionGenerateTerrain
TabOrder = 11
end
object bClearTerrain: TButton
Left = 584
Top = 288
Width = 75
Height = 25
Caption = 'Clear Terrain'
TabOrder = 12
OnClick = bClearTerrainClick
end
object ProgressBarClass: TProgressBar
Left = 224
Top = 519
Width = 433
Height = 6
Hint = 'Class'
ParentShowHint = False
Smooth = True
Step = 1
ShowHint = True
TabOrder = 13
end
object ProgressBarTotal: TProgressBar
Left = 224
Top = 526
Width = 433
Height = 6
Hint = 'Total'
ParentShowHint = False
Smooth = True
Step = 1
ShowHint = True
TabOrder = 14
end
object OpenDialog3DS: TOpenDialog
DefaultExt = '.3ds'
Filter = '3D-Studio file (*.3DS)|*.3ds'
Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofEnableSizing]
Title = 'Import 3DS file'
Left = 584
Top = 416
end
object ActionList: TActionList
Left = 616
Top = 384
object ActionImport3DS: TAction
Caption = 'Import 3DS'
OnExecute = ActionImport3DSExecute
end
object ActionSaveAsGM: TAction
Caption = 'Save As GM'
OnExecute = ActionSaveAsGMExecute
end
object ActionDisplay: TAction
Caption = 'Display'
OnExecute = ActionDisplayExecute
end
object ActionCloseGL: TAction
Caption = 'CloseGL'
OnExecute = ActionCloseGLExecute
end
object ActionDefaultCam: TAction
Caption = 'Default Cam'
OnExecute = ActionDefaultCamExecute
end
object ActionExit: TAction
Caption = 'Exit'
OnExecute = ActionExitExecute
end
object ActionLoadBSP: TAction
Caption = 'Load BSP'
OnExecute = ActionLoadBSPExecute
end
object ActionLoadMap: TAction
Caption = 'Load Map'
OnExecute = ActionLoadMapExecute
end
object ActionGenerateTerrain: TAction
Caption = 'Gen. Terrain'
OnExecute = ActionGenerateTerrainExecute
end
end
object MainMenu: TMainMenu
Left = 584
Top = 384
object MenuFile: TMenuItem
Caption = '&File'
object MenuExit: TMenuItem
Action = ActionExit
end
end
end
object OpenDialogBSP: TOpenDialog
DefaultExt = '.bsp'
Filter = 'Quake3 BSP file (*.BSP)|*.bsp'
Options = [ofReadOnly, ofFileMustExist, ofEnableSizing]
Title = 'Load .BSP file'
Left = 616
Top = 416
end
object OpenDialogMAP: TOpenDialog
DefaultExt = '.map'
Filter = 'Level MAP file (*.MAP)|*.map'
Options = [ofReadOnly, ofFileMustExist, ofEnableSizing]
Title = 'Load .MAP file'
Left = 616
Top = 448
end
end