source: oup/releases/0.17a/Unit1_main.dfm@ 580

Last change on this file since 580 was 21, checked in by alloc, 18 years ago
File size: 7.4 KB
RevLine 
[21]1object Form1: TForm1
2 Left = 0
3 Top = 0
4 HorzScrollBar.Visible = False
5 VertScrollBar.Visible = False
6 AutoScroll = False
7 Caption = 'Form1'
8 ClientHeight = 563
9 ClientWidth = 692
10 Color = clBtnFace
11 Font.Charset = DEFAULT_CHARSET
12 Font.Color = clWindowText
13 Font.Height = -11
14 Font.Name = 'Tahoma'
15 Font.Style = []
16 Menu = menu
17 OldCreateOrder = False
18 OnClose = FormClose
19 OnCreate = FormCreate
20 OnResize = FormResize
21 PixelsPerInch = 96
22 TextHeight = 13
23 object panel_all: TPanel
24 Left = 0
25 Top = 100
26 Width = 692
27 Height = 300
28 BevelOuter = bvNone
29 TabOrder = 0
30 object Splitter2: TSplitter
31 Left = 360
32 Top = 0
33 Width = 8
34 Height = 300
35 AutoSnap = False
36 Beveled = True
37 MinSize = 360
38 end
39 object panel_left: TPanel
40 Left = 0
41 Top = 0
42 Width = 360
43 Height = 300
44 Cursor = crDrag
45 Align = alLeft
46 BevelOuter = bvNone
47 TabOrder = 0
48 object Splitter1: TSplitter
49 Left = 0
50 Top = 241
51 Width = 360
52 Height = 8
53 Cursor = crVSplit
54 Align = alTop
55 AutoSnap = False
56 Beveled = True
57 MinSize = 75
58 OnMoved = Splitter1Moved
59 end
60 object panel_files: TPanel
61 Left = 0
62 Top = 0
63 Width = 360
64 Height = 241
65 Align = alTop
66 BevelOuter = bvNone
67 TabOrder = 0
68 object btn_extractconvert: TButton
69 Left = 1
70 Top = 220
71 Width = 358
72 Height = 20
73 Caption = 'Convert and extract file'
74 Enabled = False
75 TabOrder = 0
76 WordWrap = True
77 OnClick = btn_extractconvertClick
78 end
79 object list_files: TListBox
80 Left = 0
81 Top = 0
82 Width = 360
83 Height = 218
84 Align = alTop
85 Font.Charset = DEFAULT_CHARSET
86 Font.Color = clWindowText
87 Font.Height = -11
88 Font.Name = 'Fixedsys'
89 Font.Style = []
90 ItemHeight = 15
91 ParentFont = False
92 TabOrder = 1
93 OnClick = list_filesDblClick
94 OnDblClick = list_filesDblClick
95 end
96 end
97 object list_extensions: TListBox
98 Left = 0
99 Top = 249
100 Width = 360
101 Height = 51
102 Align = alClient
103 Font.Charset = DEFAULT_CHARSET
104 Font.Color = clWindowText
105 Font.Height = -11
106 Font.Name = 'Fixedsys'
107 Font.Style = []
108 ItemHeight = 15
109 ParentFont = False
110 Sorted = True
111 TabOrder = 1
112 OnClick = list_extensionsClick
113 OnDblClick = list_extensionsClick
114 end
115 end
116 object panel_file: TPanel
117 Left = 368
118 Top = 0
119 Width = 324
120 Height = 300
121 Align = alClient
122 BevelOuter = bvNone
123 TabOrder = 1
124 object lbl_fileinfo: TLabel
125 Left = 0
126 Top = 0
127 Width = 324
128 Height = 44
129 Align = alTop
130 AutoSize = False
131 end
132 object lbl_zerobyte: TLabel
133 Left = 32
134 Top = 136
135 Width = 265
136 Height = 41
137 AutoSize = False
138 Caption =
139 'Zero byte file. Oni will take the data for this file of level0_f' +
140 'inal.dat/raw'
141 Font.Charset = DEFAULT_CHARSET
142 Font.Color = clWindowText
143 Font.Height = -16
144 Font.Name = 'Tahoma'
145 Font.Style = []
146 ParentFont = False
147 Visible = False
148 WordWrap = True
149 end
150 object hex: TMPHexEditor
151 Left = 0
152 Top = 44
153 Width = 324
154 Height = 256
155 Cursor = crIBeam
156 Align = alClient
157 Font.Charset = DEFAULT_CHARSET
158 Font.Color = clWindowText
159 Font.Height = -16
160 Font.Name = 'Fixedsys'
161 Font.Style = []
162 ParentFont = False
163 TabOrder = 0
164 BytesPerRow = 16
165 Translation = tkAsIs
166 OffsetFormat = '6!10:0x|'
167 Colors.Background = clWindow
168 Colors.ChangedBackground = clWhite
169 Colors.ChangedText = clRed
170 Colors.CursorFrame = clNavy
171 Colors.Offset = clBlack
172 Colors.OddColumn = clBlue
173 Colors.EvenColumn = clNavy
174 Colors.CurrentOffsetBackground = clBtnShadow
175 Colors.OffsetBackGround = clBtnFace
176 Colors.CurrentOffset = clBtnHighlight
177 Colors.Grid = clBtnFace
178 Colors.NonFocusCursorFrame = clAqua
179 Colors.ActiveFieldBackground = clWindow
180 FocusFrame = False
181 AllowInsertMode = False
182 DrawGridLines = False
183 ReadOnlyView = True
184 Version = 'May 23, 2005; '#169' markus stephany, vcl[at]mirkes[dot]de'
185 end
186 end
187 end
188 object group_progress: TGroupBox
189 Left = 296
190 Top = 480
191 Width = 297
192 Height = 57
193 Caption = 'Extracting...'
194 TabOrder = 1
195 Visible = False
196 object lbl_progress: TLabel
197 Left = 10
198 Top = 36
199 Width = 279
200 Height = 18
201 AutoSize = False
202 end
203 object progress: TProgressBar
204 Left = 8
205 Top = 16
206 Width = 217
207 Height = 17
208 Step = 1
209 TabOrder = 0
210 end
211 object btn_extractcancel: TButton
212 Left = 232
213 Top = 16
214 Width = 57
215 Height = 33
216 Caption = 'Cancel'
217 TabOrder = 1
218 OnClick = btn_extractcancelClick
219 end
220 end
221 object statbar: TStatusBar
222 Left = 0
223 Top = 546
224 Width = 692
225 Height = 17
226 BiDiMode = bdLeftToRight
227 Panels = <
228 item
229 Text = 'Current .dat: -'
230 Width = 500
231 end
232 item
233 Text = 'Files: -'
234 Width = 90
235 end
236 item
237 Text = 'Extensions: -'
238 Width = 100
239 end>
240 ParentBiDiMode = False
241 end
242 object fopen: TOpenDialog
243 Filter = 'Oni-Dat-Files|*.dat|Oni-Sep-Files (MAC)|*.sep'
244 Left = 64
245 Top = 120
246 end
247 object menu: TMainMenu
248 AutoHotkeys = maManual
249 Left = 224
250 object menu_main: TMenuItem
251 Caption = '&Main'
252 object menu_loaddat: TMenuItem
253 Caption = '&Select .dat-file ...'
254 OnClick = menu_loaddatClick
255 end
256 object menu_sep1: TMenuItem
257 Caption = '-'
258 end
259 object menu_exit: TMenuItem
260 Caption = '&Exit'
261 OnClick = menu_exitClick
262 end
263 end
264 object menu_extract: TMenuItem
265 Caption = '&Extract/Convert'
266 Enabled = False
267 object menu_extractfile: TMenuItem
268 Caption = 'Convert and extract current &file'
269 OnClick = menu_extractfileClick
270 end
271 object menu_extractlist: TMenuItem
272 Caption = 'Convert and extract all files currently in &list'
273 OnClick = menu_extractlistClick
274 end
275 object menu_extractall: TMenuItem
276 Caption = 'Convert and extract &all files'
277 OnClick = menu_extractallClick
278 end
279 end
280 object menu_tools: TMenuItem
281 Caption = '&Tools'
282 Enabled = False
283 object menu_preview: TMenuItem
284 Caption = '&Preview Window ...'
285 OnClick = menu_previewClick
286 end
287 object menu_binedit: TMenuItem
288 Caption = '&Binary .dat editor ...'
289 OnClick = menu_bineditClick
290 end
291 object menu_txmpreplace: TMenuItem
292 Caption = '&TXMP replacer ...'
293 OnClick = menu_txmpreplaceClick
294 end
295 end
296 end
297end
Note: See TracBrowser for help on using the repository browser.