ViewVC Help

View File | Revision Log | View Changeset | Root Listing

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

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

Diff Legend

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