source: oup/releases/0.31a/Unit8_binedit.dfm@ 34

Last change on this file since 34 was 34, checked in by alloc, 19 years ago
File size: 10.7 KB
Line 
1object Form8: TForm8
2 Left = 0
3 Top = 0
4 BorderIcons = [biSystemMenu, biMaximize]
5 Caption = 'Binary .dat-Editor'
6 ClientHeight = 555
7 ClientWidth = 642
8 Color = clBtnFace
9 Font.Charset = DEFAULT_CHARSET
10 Font.Color = clWindowText
11 Font.Height = -11
12 Font.Name = 'Tahoma'
13 Font.Style = []
14 FormStyle = fsMDIChild
15 KeyPreview = True
16 OldCreateOrder = False
17 Visible = True
18 WindowState = wsMaximized
19 OnActivate = FormActivate
20 OnClose = FormClose
21 OnCloseQuery = FormCloseQuery
22 OnCreate = FormCreate
23 OnKeyUp = FormKeyUp
24 OnResize = FormResize
25 PixelsPerInch = 96
26 TextHeight = 13
27 object Splitter1: TSplitter
28 Left = 150
29 Top = 0
30 Width = 9
31 Height = 555
32 AutoSnap = False
33 Beveled = True
34 MinSize = 150
35 ExplicitHeight = 423
36 end
37 object panel_data: TPanel
38 Left = 159
39 Top = 0
40 Width = 483
41 Height = 555
42 Align = alClient
43 BevelOuter = bvNone
44 TabOrder = 0
45 object Splitter2: TSplitter
46 Left = 0
47 Top = 209
48 Width = 483
49 Height = 9
50 Cursor = crVSplit
51 Align = alTop
52 AutoSnap = False
53 Beveled = True
54 MinSize = 40
55 end
56 object Splitter3: TSplitter
57 Left = 0
58 Top = 450
59 Width = 483
60 Height = 8
61 Cursor = crVSplit
62 Align = alBottom
63 AutoSnap = False
64 Beveled = True
65 MinSize = 40
66 ExplicitTop = 375
67 end
68 object hex: TMPHexEditor
69 Left = 0
70 Top = 0
71 Width = 483
72 Height = 209
73 Cursor = crIBeam
74 Align = alTop
75 Font.Charset = DEFAULT_CHARSET
76 Font.Color = clWindowText
77 Font.Height = -16
78 Font.Name = 'Courier'
79 Font.Style = []
80 OnKeyUp = hexKeyUp
81 ParentFont = False
82 TabOrder = 0
83 BytesPerRow = 16
84 Translation = tkASCII
85 OffsetFormat = '6!10:0x|'
86 Colors.Background = clWindow
87 Colors.ChangedBackground = clWindow
88 Colors.ChangedText = clRed
89 Colors.CursorFrame = clNavy
90 Colors.Offset = clBlack
91 Colors.OddColumn = clBlue
92 Colors.EvenColumn = clNavy
93 Colors.CurrentOffsetBackground = clBtnShadow
94 Colors.OffsetBackGround = clBtnFace
95 Colors.CurrentOffset = clBtnHighlight
96 Colors.Grid = clBtnFace
97 Colors.NonFocusCursorFrame = clAqua
98 Colors.ActiveFieldBackground = clWindow
99 FocusFrame = True
100 NoSizeChange = True
101 AllowInsertMode = False
102 DrawGridLines = False
103 Version = 'May 23, 2005; '#169' markus stephany, vcl[at]mirkes[dot]de'
104 OnChange = hexChange
105 ShowPositionIfNotFocused = True
106 OnSelectionChanged = hexSelectionChanged
107 end
108 object value_viewer: TWrapGrid
109 Left = 0
110 Top = 218
111 Width = 483
112 Height = 232
113 Align = alClient
114 ColCount = 1
115 DefaultColWidth = 80
116 DefaultRowHeight = 18
117 FixedCols = 0
118 RowCount = 8
119 FixedRows = 0
120 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing]
121 PopupMenu = value_viewer_context
122 TabOrder = 1
123 OnDblClick = value_viewerDblClick
124 OnMouseDown = value_viewerMouseDown
125 end
126 object VST: TVirtualStringTree
127 Left = 0
128 Top = 458
129 Width = 483
130 Height = 97
131 Align = alBottom
132 AnimationDuration = 0
133 AutoExpandDelay = 300
134 BiDiMode = bdLeftToRight
135 Colors.UnfocusedSelectionColor = clGradientActiveCaption
136 Colors.UnfocusedSelectionBorderColor = clGradientActiveCaption
137 Ctl3D = True
138 DragOperations = []
139 DrawSelectionMode = smBlendedRectangle
140 EditDelay = 200
141 Font.Charset = DEFAULT_CHARSET
142 Font.Color = clWindowText
143 Font.Height = -11
144 Font.Name = 'Tahoma'
145 Font.Style = []
146 Header.AutoSizeIndex = 0
147 Header.Font.Charset = DEFAULT_CHARSET
148 Header.Font.Color = clWindowText
149 Header.Font.Height = -11
150 Header.Font.Name = 'Tahoma'
151 Header.Font.Style = []
152 Header.Options = [hoColumnResize, hoDblClickResize, hoDrag, hoVisible]
153 Header.PopupMenu = VTHPopup
154 Header.Style = hsFlatButtons
155 HintAnimation = hatNone
156 HintMode = hmTooltip
157 Indent = 14
158 ParentBiDiMode = False
159 ParentCtl3D = False
160 ParentFont = False
161 ParentShowHint = False
162 ShowHint = True
163 TabOrder = 2
164 TreeOptions.MiscOptions = [toAcceptOLEDrop, toCheckSupport, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning]
165 TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toShowHorzGridLines, toShowRoot, toShowTreeLines, toShowVertGridLines, toUseBlendedImages]
166 TreeOptions.SelectionOptions = [toExtendedFocus, toFullRowSelect, toRightClickSelect]
167 OnDblClick = VSTDblClick
168 OnFocusChanged = VSTFocusChanged
169 OnGetText = VSTGetText
170 OnHeaderDragged = VSTHeaderDragged
171 Columns = <
172 item
173 MaxWidth = 300
174 MinWidth = 100
175 Options = [coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
176 Position = 0
177 Spacing = 20
178 Width = 150
179 WideText = 'Name'
180 WideHint = 'Name of the item.'
181 end
182 item
183 MaxWidth = 110
184 MinWidth = 80
185 Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
186 Position = 1
187 Spacing = 20
188 Width = 85
189 WideText = 'Offset'
190 WideHint = 'Offset of the data-item.'
191 end
192 item
193 MaxWidth = 110
194 MinWidth = 75
195 Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
196 Position = 2
197 Width = 75
198 WideText = 'Type'
199 WideHint = 'Data type of the item.'
200 end
201 item
202 MaxWidth = 250
203 MinWidth = 80
204 Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
205 Position = 3
206 Width = 100
207 WideText = 'Value'
208 WideHint = 'Value of the item.'
209 end
210 item
211 MaxWidth = 400
212 MinWidth = 80
213 Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
214 Position = 4
215 Width = 400
216 WideText = 'Description'
217 end>
218 WideDefaultText = ''
219 end
220 end
221 object panel_files: TPanel
222 Left = 0
223 Top = 0
224 Width = 150
225 Height = 555
226 Align = alLeft
227 BevelOuter = bvNone
228 TabOrder = 1
229 object Bevel1: TBevel
230 Left = 0
231 Top = 491
232 Width = 150
233 Height = 6
234 Align = alBottom
235 Style = bsRaised
236 ExplicitTop = 359
237 end
238 object list: TListBox
239 Left = 0
240 Top = 0
241 Width = 150
242 Height = 388
243 Align = alClient
244 ItemHeight = 13
245 TabOrder = 0
246 OnClick = listClick
247 end
248 object panel_extension: TPanel
249 Left = 0
250 Top = 388
251 Width = 150
252 Height = 103
253 Align = alBottom
254 BevelOuter = bvNone
255 TabOrder = 1
256 OnResize = panel_extensionResize
257 object lbl_filter: TLabel
258 Left = 2
259 Top = 62
260 Width = 100
261 Height = 17
262 AutoSize = False
263 Caption = 'Filter by &extension:'
264 FocusControl = combo_extension
265 end
266 object combo_extension: TComboBox
267 Left = 2
268 Top = 76
269 Width = 145
270 Height = 21
271 Style = csDropDownList
272 DropDownCount = 12
273 Font.Charset = DEFAULT_CHARSET
274 Font.Color = clWindowText
275 Font.Height = -11
276 Font.Name = 'Tahoma'
277 Font.Style = []
278 ItemHeight = 13
279 ParentFont = False
280 Sorted = True
281 TabOrder = 3
282 OnClick = combo_extensionClick
283 end
284 object check_zerobyte: TCheckBox
285 Left = 2
286 Top = 44
287 Width = 130
288 Height = 13
289 Caption = 'Show &zero-byte files'
290 TabOrder = 2
291 OnClick = check_zerobyteClick
292 end
293 object edit_filtername: TEdit
294 Left = 2
295 Top = 20
296 Width = 145
297 Height = 18
298 AutoSize = False
299 TabOrder = 1
300 end
301 object check_filtername: TCheckBox
302 Left = 2
303 Top = 5
304 Width = 130
305 Height = 15
306 Caption = 'Filter by file&name:'
307 TabOrder = 0
308 OnClick = check_filternameClick
309 end
310 end
311 object panel_imexport: TPanel
312 Left = 0
313 Top = 497
314 Width = 150
315 Height = 58
316 Align = alBottom
317 BevelOuter = bvNone
318 TabOrder = 2
319 OnResize = panel_imexportResize
320 object btn_export: TButton
321 Left = 4
322 Top = 4
323 Width = 142
324 Height = 25
325 Caption = 'Export to file...'
326 TabOrder = 0
327 OnClick = btn_exportClick
328 end
329 object btn_import: TButton
330 Left = 4
331 Top = 32
332 Width = 142
333 Height = 25
334 Caption = 'Import from file...'
335 TabOrder = 1
336 OnClick = btn_importClick
337 end
338 end
339 end
340 object opend: TOpenDialog
341 Options = [ofPathMustExist, ofFileMustExist, ofEnableSizing]
342 Left = 120
343 Top = 392
344 end
345 object saved: TSaveDialog
346 Options = [ofOverwritePrompt, ofPathMustExist, ofEnableSizing]
347 Left = 120
348 Top = 368
349 end
350 object value_viewer_context: TPopupMenu
351 AutoHotkeys = maManual
352 OnPopup = value_viewer_contextPopup
353 Left = 240
354 Top = 248
355 object value_viewer_context_copy: TMenuItem
356 Caption = 'Copy to &clipboard'
357 OnClick = value_viewer_context_copyClick
358 end
359 object value_viewer_context_copyasdec: TMenuItem
360 Caption = 'Copy to clipboard (as &dec)'
361 OnClick = value_viewer_context_copyClick
362 end
363 object value_viewer_context_copyasfloat: TMenuItem
364 Caption = 'Copy to clipboard (as &float)'
365 OnClick = value_viewer_context_copyClick
366 end
367 object value_viewer_context_copyasbitset: TMenuItem
368 Caption = 'Copy to clipboard (as &bitset)'
369 OnClick = value_viewer_context_copyClick
370 end
371 object value_viewer_context_copyasstring: TMenuItem
372 Caption = 'Copy to clipboard (as &string)'
373 OnClick = value_viewer_context_copyClick
374 end
375 object value_viewer_context_copyashex: TMenuItem
376 Caption = 'Copy to clipboard (as &hex)'
377 OnClick = value_viewer_context_copyClick
378 end
379 end
380 object VTHPopup: TVTHeaderPopupMenu
381 OnColumnChange = VTHPopupColumnChange
382 Left = 200
383 Top = 496
384 end
385end
Note: See TracBrowser for help on using the repository browser.