Context Navigation

Tool_BinEdit.dfm @ 43

Last change on this file since 43 was 43, checked in by alloc, 17 years ago
DevTree 0.33a.
File size: 10.8 KB

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

Note: See TracBrowser for help on using the repository browser.

Download in other formats:

Original Format