ViewVC Help

View File | Revision Log | View Changeset | Root Listing

root/Oni2/oup/current/Tools/BinEdit.dfm

Comparing:
oup/rewrite/Tools/BinEdit.dfm (file contents), Revision 104 by alloc, Tue Feb 20 22:03:11 2007 UTC vs.
oup/current/Tools/BinEdit.dfm (file contents), Revision 218 by alloc, Fri Jun 15 22:12:39 2007 UTC

#	Line 1 | Line 1
1		inherited Form_BinEdit: TForm_BinEdit
2	<	Caption = 'BinEdit'
3	<	KeyPreview = True
2	>	Caption = 'Form_BinEdit'
3		OnCloseQuery = FormCloseQuery
4	+	OnCreate = FormCreate
5		OnKeyUp = FormKeyUp
6	–	ExplicitWidth = 500
7	–	ExplicitHeight = 450
6		PixelsPerInch = 96
7		TextHeight = 13
8	<	inherited content: TPanel
9	<	object Splitter2: TSplitter
10	<	Left = 0
11	<	Top = 209
12	<	Width = 283
13	<	Height = 9
14	<	Cursor = crVSplit
15	<	Align = alTop
16	<	AutoSnap = False
17	<	Beveled = True
18	<	MinSize = 40
19	<	ExplicitWidth = 425
20	<	end
21	<	object Splitter3: TSplitter
22	<	Left = 0
23	<	Top = 318
24	<	Width = 283
25	<	Height = 8
26	<	Cursor = crVSplit
27	<	Align = alBottom
28	<	AutoSnap = False
29	<	Beveled = True
30	<	MinSize = 40
31	<	ExplicitLeft = -9
32	<	ExplicitTop = 430
33	<	ExplicitWidth = 425
34	<	end
35	<	object hex: TMPHexEditor
36	<	Left = 0
37	<	Top = 0
38	<	Width = 283
39	<	Height = 209
40	<	Cursor = crIBeam
41	<	Align = alTop
42	<	Font.Charset = DEFAULT_CHARSET
43	<	Font.Color = clWindowText
44	<	Font.Height = -16
45	<	Font.Name = 'Courier'
46	<	Font.Style = []
47	<	OnKeyUp = hexKeyUp
48	<	ParentFont = False
49	<	TabOrder = 0
50	<	BytesPerRow = 16
51	<	Translation = tkASCII
52	<	OffsetFormat = '6!10:0x|'
53	<	Colors.Background = clWindow
54	<	Colors.ChangedBackground = clWindow
55	<	Colors.ChangedText = clRed
56	<	Colors.CursorFrame = clNavy
57	<	Colors.Offset = clBlack
58	<	Colors.OddColumn = clBlue
59	<	Colors.EvenColumn = clNavy
60	<	Colors.CurrentOffsetBackground = clBtnShadow
61	<	Colors.OffsetBackGround = clBtnFace
62	<	Colors.CurrentOffset = clBtnHighlight
63	<	Colors.Grid = clBtnFace
64	<	Colors.NonFocusCursorFrame = clAqua
65	<	Colors.ActiveFieldBackground = clWindow
66	<	FocusFrame = True
67	<	NoSizeChange = True
68	<	AllowInsertMode = False
69	<	DrawGridLines = False
70	<	Version = 'May 23, 2005; '#169' markus stephany, vcl[at]mirkes[dot]de'
71	<	OnChange = hexChange
72	<	ShowPositionIfNotFocused = True
73	<	OnSelectionChanged = hexSelectionChanged
74	<	end
75	<	object value_viewer: TWrapGrid
76	<	Left = 0
77	<	Top = 218
78	<	Width = 283
79	<	Height = 100
80	<	Align = alClient
81	<	ColCount = 1
82	<	DefaultColWidth = 80
83	<	DefaultRowHeight = 18
84	<	FixedCols = 0
85	<	RowCount = 8
86	<	FixedRows = 0
87	<	Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing]
88	<	PopupMenu = value_viewer_context
89	<	ScrollBars = ssVertical
90	<	TabOrder = 1
91	<	OnDblClick = value_viewerDblClick
92	<	OnMouseDown = value_viewerMouseDown
93	<	end
94	<	object VST: TVirtualStringTree
95	<	Left = 0
96	<	Top = 326
97	<	Width = 283
98	<	Height = 97
99	<	Align = alBottom
100	<	AnimationDuration = 0
101	<	AutoExpandDelay = 300
102	<	BiDiMode = bdLeftToRight
103	<	Colors.UnfocusedSelectionColor = clGradientActiveCaption
104	<	Colors.UnfocusedSelectionBorderColor = clGradientActiveCaption
105	<	Ctl3D = True
106	<	DragOperations = []
107	<	DrawSelectionMode = smBlendedRectangle
108	<	EditDelay = 200
109	<	Font.Charset = DEFAULT_CHARSET
110	<	Font.Color = clWindowText
111	<	Font.Height = -11
112	<	Font.Name = 'Tahoma'
113	<	Font.Style = []
114	<	Header.AutoSizeIndex = 0
115	<	Header.Font.Charset = DEFAULT_CHARSET
116	<	Header.Font.Color = clWindowText
117	<	Header.Font.Height = -11
118	<	Header.Font.Name = 'Tahoma'
119	<	Header.Font.Style = []
120	<	Header.Options = [hoColumnResize, hoDblClickResize, hoDrag, hoVisible]
121	<	Header.PopupMenu = VTHPopup
122	<	Header.Style = hsFlatButtons
123	<	HintAnimation = hatNone
124	<	HintMode = hmTooltip
125	<	Indent = 14
126	<	ParentBiDiMode = False
127	<	ParentCtl3D = False
128	<	ParentFont = False
129	<	ParentShowHint = False
130	<	ShowHint = True
131	<	TabOrder = 2
132	<	TreeOptions.MiscOptions = [toAcceptOLEDrop, toCheckSupport, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning]
133	<	TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toShowHorzGridLines, toShowRoot, toShowTreeLines, toShowVertGridLines, toUseBlendedImages]
134	<	TreeOptions.SelectionOptions = [toExtendedFocus, toFullRowSelect, toRightClickSelect]
135	<	OnDblClick = VSTDblClick
136	<	OnFocusChanged = VSTFocusChanged
137	<	OnGetText = VSTGetText
138	<	OnHeaderDragged = VSTHeaderDragged
139	<	Columns = <
140	<	item
141	<	MaxWidth = 300
142	<	MinWidth = 100
143	<	Options = [coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
144	<	Position = 0
145	<	Spacing = 20
146	<	Width = 150
147	<	WideText = 'Name'
148	<	WideHint = 'Name of the item.'
149	<	end
150	<	item
151	<	MaxWidth = 110
152	<	MinWidth = 80
153	<	Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
154	<	Position = 1
155	<	Spacing = 20
156	<	Width = 85
157	<	WideText = 'Offset'
158	<	WideHint = 'Offset of the data-item.'
159	<	end
160	<	item
161	<	MaxWidth = 110
162	<	MinWidth = 75
163	<	Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
164	<	Position = 2
165	<	Width = 75
166	<	WideText = 'Type'
167	<	WideHint = 'Data type of the item.'
168	<	end
169	<	item
170	<	MaxWidth = 250
171	<	MinWidth = 80
172	<	Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
173	<	Position = 3
174	<	Width = 100
175	<	WideText = 'Value'
176	<	WideHint = 'Value of the item.'
177	<	end
178	<	item
179	<	MaxWidth = 400
180	<	MinWidth = 80
181	<	Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
182	<	Position = 4
183	<	Width = 400
184	<	WideText = 'Description'
185	<	end>
186	<	WideDefaultText = ''
8	>	inherited panel_basecontent: TPanel
9	>	inherited panel_files: TPanel
10	>	ExplicitHeight = 532
11	>	inherited filelist: TListBox
12	>	Height = 347
13	>	OnClick = nil
14	>	OnMouseDown = nil
15	>	ExplicitTop = 125
16	>	ExplicitHeight = 407
17	>	end
18	>	inherited panel_extension: TPanel
19	>	inherited btn_sort_id_asc: TSpeedButton
20	>	OnClick = nil
21	>	end
22	>	inherited btn_sort_id_desc: TSpeedButton
23	>	OnClick = nil
24	>	end
25	>	inherited btn_sort_name_asc: TSpeedButton
26	>	OnClick = nil
27	>	end
28	>	inherited btn_sort_name_desc: TSpeedButton
29	>	OnClick = nil
30	>	end
31	>	inherited btn_sort_ext_asc: TSpeedButton
32	>	OnClick = nil
33	>	end
34	>	inherited btn_sort_ext_desc: TSpeedButton
35	>	OnClick = nil
36	>	end
37	>	inherited combo_extension: TComboBox
38	>	OnClick = nil
39	>	end
40	>	inherited check_zerobyte: TCheckBox
41	>	OnClick = nil
42	>	end
43	>	inherited check_filtername: TCheckBox
44	>	OnClick = nil
45	>	end
46	>	end
47	>	object panel_imexport: TPanel
48	>	Left = 0
49	>	Top = 472
50	>	Width = 200
51	>	Height = 60
52	>	Align = alBottom
53	>	BevelOuter = bvNone
54	>	TabOrder = 2
55	>	ExplicitTop = 363
56	>	DesignSize = (
57	>	200
58	>	60)
59	>	object btn_export: TButton
60	>	Left = 4
61	>	Top = 4
62	>	Width = 190
63	>	Height = 25
64	>	Anchors = [akLeft, akTop, akRight]
65	>	Caption = 'Export to file...'
66	>	TabOrder = 0
67	>	end
68	>	object btn_import: TButton
69	>	Left = 4
70	>	Top = 32
71	>	Width = 190
72	>	Height = 25
73	>	Anchors = [akLeft, akTop, akRight]
74	>	Caption = 'Import from file...'
75	>	TabOrder = 1
76	>	end
77	>	end
78	>	end
79	>	inherited panel_content: TPanel
80	>	ExplicitTop = 0
81	>	ExplicitWidth = 390
82	>	ExplicitHeight = 532
83	>	object Splitter2: TSplitter
84	>	Left = 0
85	>	Top = 209
86	>	Width = 390
87	>	Height = 8
88	>	Cursor = crVSplit
89	>	Align = alTop
90	>	AutoSnap = False
91	>	Beveled = True
92	>	MinSize = 40
93	>	end
94	>	object Splitter3: TSplitter
95	>	Left = 0
96	>	Top = 435
97	>	Width = 390
98	>	Height = 0
99	>	Cursor = crVSplit
100	>	Align = alBottom
101	>	AutoSnap = False
102	>	Beveled = True
103	>	MinSize = 40
104	>	ExplicitLeft = 32
105	>	ExplicitTop = 447
106	>	end
107	>	object hex: TMPHexEditor
108	>	Left = 0
109	>	Top = 0
110	>	Width = 390
111	>	Height = 209
112	>	Cursor = crIBeam
113	>	Align = alTop
114	>	Font.Charset = DEFAULT_CHARSET
115	>	Font.Color = clWindowText
116	>	Font.Height = -16
117	>	Font.Name = 'Courier'
118	>	Font.Style = []
119	>	OnKeyUp = hexKeyUp
120	>	ParentFont = False
121	>	TabOrder = 0
122	>	BytesPerRow = 16
123	>	Translation = tkASCII
124	>	OffsetFormat = '6!10:0x|'
125	>	Colors.Background = clWindow
126	>	Colors.ChangedBackground = clWindow
127	>	Colors.ChangedText = clRed
128	>	Colors.CursorFrame = clNavy
129	>	Colors.Offset = clBlack
130	>	Colors.OddColumn = clBlue
131	>	Colors.EvenColumn = clNavy
132	>	Colors.CurrentOffsetBackground = clBtnShadow
133	>	Colors.OffsetBackGround = clBtnFace
134	>	Colors.CurrentOffset = clBtnHighlight
135	>	Colors.Grid = clBtnFace
136	>	Colors.NonFocusCursorFrame = clAqua
137	>	Colors.ActiveFieldBackground = clWindow
138	>	FocusFrame = True
139	>	NoSizeChange = True
140	>	AllowInsertMode = False
141	>	DrawGridLines = False
142	>	Version = 'May 23, 2005; '#169' markus stephany, vcl[at]mirkes[dot]de'
143	>	OnChange = hexChange
144	>	ShowPositionIfNotFocused = True
145	>	OnSelectionChanged = hexSelectionChanged
146	>	ExplicitLeft = 32
147	>	ExplicitTop = 12
148	>	end
149	>	object value_viewer: TWrapGrid
150	>	Left = 0
151	>	Top = 217
152	>	Width = 390
153	>	Height = 218
154	>	Align = alClient
155	>	ColCount = 1
156	>	DefaultColWidth = 80
157	>	DefaultRowHeight = 18
158	>	FixedCols = 0
159	>	RowCount = 8
160	>	FixedRows = 0
161	>	Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing]
162	>	ScrollBars = ssVertical
163	>	TabOrder = 1
164	>	OnDblClick = value_viewerDblClick
165	>	OnMouseDown = value_viewerMouseDown
166	>	ExplicitLeft = 32
167	>	ExplicitTop = 544
168	>	ExplicitHeight = 0
169	>	end
170	>	object VST: TVirtualStringTree
171	>	Left = 0
172	>	Top = 435
173	>	Width = 390
174	>	Height = 97
175	>	Align = alBottom
176	>	AnimationDuration = 0
177	>	AutoExpandDelay = 300
178	>	BiDiMode = bdLeftToRight
179	>	Colors.UnfocusedSelectionColor = clGradientActiveCaption
180	>	Colors.UnfocusedSelectionBorderColor = clGradientActiveCaption
181	>	Ctl3D = True
182	>	DragOperations = []
183	>	DrawSelectionMode = smBlendedRectangle
184	>	EditDelay = 200
185	>	Font.Charset = DEFAULT_CHARSET
186	>	Font.Color = clWindowText
187	>	Font.Height = -11
188	>	Font.Name = 'Tahoma'
189	>	Font.Style = []
190	>	Header.AutoSizeIndex = 0
191	>	Header.Font.Charset = DEFAULT_CHARSET
192	>	Header.Font.Color = clWindowText
193	>	Header.Font.Height = -11
194	>	Header.Font.Name = 'Tahoma'
195	>	Header.Font.Style = []
196	>	Header.Options = [hoColumnResize, hoDblClickResize, hoDrag, hoVisible]
197	>	Header.Style = hsFlatButtons
198	>	HintAnimation = hatNone
199	>	HintMode = hmTooltip
200	>	Indent = 14
201	>	ParentBiDiMode = False
202	>	ParentCtl3D = False
203	>	ParentFont = False
204	>	ParentShowHint = False
205	>	ShowHint = True
206	>	TabOrder = 2
207	>	TreeOptions.MiscOptions = [toAcceptOLEDrop, toCheckSupport, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning]
208	>	TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toShowHorzGridLines, toShowRoot, toShowTreeLines, toShowVertGridLines, toUseBlendedImages]
209	>	TreeOptions.SelectionOptions = [toExtendedFocus, toFullRowSelect, toRightClickSelect]
210	>	OnDblClick = VSTDblClick
211	>	OnFocusChanged = VSTFocusChanged
212	>	OnGetText = VSTGetText
213	>	OnHeaderDragged = VSTHeaderDragged
214	>	ExplicitLeft = 32
215	>	ExplicitTop = 447
216	>	Columns = <
217	>	item
218	>	MaxWidth = 300
219	>	MinWidth = 100
220	>	Options = [coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
221	>	Position = 0
222	>	Spacing = 20
223	>	Width = 150
224	>	WideText = 'Name'
225	>	WideHint = 'Name of the item.'
226	>	end
227	>	item
228	>	MaxWidth = 110
229	>	MinWidth = 80
230	>	Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
231	>	Position = 1
232	>	Spacing = 20
233	>	Width = 85
234	>	WideText = 'Offset'
235	>	WideHint = 'Offset of the data-item.'
236	>	end
237	>	item
238	>	MaxWidth = 110
239	>	MinWidth = 75
240	>	Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
241	>	Position = 2
242	>	Width = 75
243	>	WideText = 'Type'
244	>	WideHint = 'Data type of the item.'
245	>	end
246	>	item
247	>	MaxWidth = 250
248	>	MinWidth = 80
249	>	Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
250	>	Position = 3
251	>	Width = 100
252	>	WideText = 'Value'
253	>	WideHint = 'Value of the item.'
254	>	end
255	>	item
256	>	MaxWidth = 400
257	>	MinWidth = 80
258	>	Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
259	>	Position = 4
260	>	Width = 400
261	>	WideText = 'Description'
262	>	end>
263	>	WideDefaultText = ''
264	>	end
265		end
266		end
267	<	object value_viewer_context: TPopupMenu [3]
267	>	inherited filepopup: TPopupMenu
268	>	OnPopup = nil
269	>	inherited popup_linkshere: TMenuItem
270	>	OnClick = nil
271	>	end
272	>	inherited popup_import: TMenuItem
273	>	OnClick = nil
274	>	end
275	>	inherited popup_export: TMenuItem
276	>	OnClick = nil
277	>	end
278	>	end
279	>	object VTHPopup: TVTHeaderPopupMenu
280	>	OnColumnChange = VTHPopupColumnChange
281	>	Left = 272
282	>	Top = 376
283	>	end
284	>	object value_viewer_context: TPopupMenu
285		AutoHotkeys = maManual
286		AutoLineReduction = maManual
287		OnPopup = value_viewer_contextPopup
#	Line 200 | Line 293 | inherited Form_BinEdit: TForm_BinEdit
293		end
294		object value_viewer_context_copyasdec: TMenuItem
295		Caption = 'Copy to clipboard (as &dec)'
203	–	OnClick = value_viewer_context_copyClick
296		end
297		object value_viewer_context_copyasfloat: TMenuItem
298		Caption = 'Copy to clipboard (as &float)'
207	–	OnClick = value_viewer_context_copyClick
299		end
300		object value_viewer_context_copyasbitset: TMenuItem
301		Caption = 'Copy to clipboard (as &bitset)'
211	–	OnClick = value_viewer_context_copyClick
302		end
303		object value_viewer_context_copyasstring: TMenuItem
304		Caption = 'Copy to clipboard (as &string)'
215	–	OnClick = value_viewer_context_copyClick
305		end
306		object value_viewer_context_copyashex: TMenuItem
307		Caption = 'Copy to clipboard (as &hex)'
219	–	OnClick = value_viewer_context_copyClick
308		end
309		end
222	–	object VTHPopup: TVTHeaderPopupMenu [4]
223	–	OnColumnChange = VTHPopupColumnChange
224	–	Left = 272
225	–	Top = 376
226	–	end
310		end

Diff Legend

–	Removed lines
+	Added lines
<	Changed lines (old)
>	Changed lines (new)