source: oup/releases/0.29a/Unit8_binedit.dfm@ 94

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