source: oup/current/Tools/MetaEditor.dfm@ 694

Last change on this file since 694 was 321, checked in by alloc, 16 years ago
File size: 10.4 KB
Line 
1inherited Form_Meta: TForm_Meta
2 Caption = 'Form_Meta'
3 ClientHeight = 449
4 OnCreate = FormCreate
5 ExplicitWidth = 606
6 ExplicitHeight = 476
7 PixelsPerInch = 96
8 TextHeight = 13
9 inherited panel_basecontent: TPanel
10 Height = 424
11 ExplicitLeft = 0
12 ExplicitTop = 25
13 ExplicitWidth = 598
14 ExplicitHeight = 424
15 object splitter: TSplitter
16 Left = 190
17 Top = 0
18 Width = 8
19 Height = 424
20 Align = alRight
21 AutoSnap = False
22 Beveled = True
23 MinSize = 200
24 ExplicitLeft = 287
25 ExplicitTop = 16
26 ExplicitHeight = 532
27 end
28 object VST: TVirtualStringTree
29 Left = 0
30 Top = 0
31 Width = 190
32 Height = 424
33 Align = alClient
34 AnimationDuration = 0
35 Header.AutoSizeIndex = 0
36 Header.Font.Charset = DEFAULT_CHARSET
37 Header.Font.Color = clWindowText
38 Header.Font.Height = -11
39 Header.Font.Name = 'Tahoma'
40 Header.Font.Style = []
41 Header.Options = [hoColumnResize, hoDrag, hoVisible]
42 HintAnimation = hatNone
43 HintMode = hmHint
44 ParentShowHint = False
45 ShowHint = True
46 TabOrder = 0
47 TreeOptions.AutoOptions = [toAutoDropExpand, toAutoScrollOnExpand, toAutoDeleteMovedNodes]
48 TreeOptions.MiscOptions = [toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning]
49 OnFocusChanged = VSTFocusChanged
50 OnFocusChanging = VSTFocusChanging
51 OnGetText = VSTGetText
52 OnPaintText = VSTPaintText
53 OnGetHint = VSTGetHint
54 OnGetPopupMenu = VSTGetPopupMenu
55 OnInitChildren = VSTInitChildren
56 Columns = <
57 item
58 Position = 0
59 Width = 250
60 WideText = 'Name'
61 end
62 item
63 Position = 1
64 Width = 100
65 WideText = 'Type'
66 end
67 item
68 Position = 2
69 Width = 150
70 WideText = 'Value'
71 end>
72 end
73 object rightPages: TPageControl
74 Left = 198
75 Top = 0
76 Width = 400
77 Height = 424
78 ActivePage = tab_meta
79 Align = alRight
80 TabOrder = 1
81 object tab_meta: TTabSheet
82 Caption = 'Meta Edit'
83 ImageIndex = 1
84 ExplicitLeft = 0
85 ExplicitTop = 0
86 ExplicitWidth = 0
87 ExplicitHeight = 0
88 end
89 object tab_hex: TTabSheet
90 Caption = 'Binary Edit'
91 ExplicitLeft = 0
92 ExplicitTop = 0
93 ExplicitWidth = 0
94 ExplicitHeight = 0
95 object splitter_hex_1: TSplitter
96 Left = 0
97 Top = 100
98 Width = 392
99 Height = 8
100 Cursor = crVSplit
101 Align = alTop
102 AutoSnap = False
103 Beveled = True
104 MinSize = 40
105 ExplicitTop = 209
106 ExplicitWidth = 192
107 end
108 object splitter_hex_2: TSplitter
109 Left = 0
110 Top = 256
111 Width = 392
112 Height = 8
113 Cursor = crVSplit
114 Align = alBottom
115 AutoSnap = False
116 Beveled = True
117 MinSize = 40
118 ExplicitTop = 300
119 ExplicitWidth = 192
120 end
121 object panel_hex_actions: TPanel
122 Left = 0
123 Top = 361
124 Width = 392
125 Height = 35
126 Align = alBottom
127 BevelOuter = bvNone
128 Caption = 'panel_hex_actions'
129 TabOrder = 0
130 object btn_export: TButton
131 Left = 2
132 Top = 6
133 Width = 117
134 Height = 25
135 Caption = 'Export to file...'
136 TabOrder = 0
137 end
138 object btn_import: TButton
139 Left = 125
140 Top = 6
141 Width = 117
142 Height = 25
143 Caption = 'Import from file...'
144 TabOrder = 1
145 end
146 end
147 object hex: TMPHexEditor
148 Left = 0
149 Top = 0
150 Width = 392
151 Height = 100
152 Cursor = crIBeam
153 Align = alTop
154 Font.Charset = DEFAULT_CHARSET
155 Font.Color = clWindowText
156 Font.Height = -16
157 Font.Name = 'Courier'
158 Font.Style = []
159 ParentFont = False
160 TabOrder = 1
161 BytesPerRow = 16
162 Translation = tkASCII
163 OffsetFormat = '6!10:0x|'
164 Colors.Background = clWindow
165 Colors.ChangedBackground = clWindow
166 Colors.ChangedText = clRed
167 Colors.CursorFrame = clNavy
168 Colors.Offset = clBlack
169 Colors.OddColumn = clBlue
170 Colors.EvenColumn = clNavy
171 Colors.CurrentOffsetBackground = clBtnShadow
172 Colors.OffsetBackGround = clBtnFace
173 Colors.CurrentOffset = clBtnHighlight
174 Colors.Grid = clBtnFace
175 Colors.NonFocusCursorFrame = clAqua
176 Colors.ActiveFieldBackground = clWindow
177 FocusFrame = True
178 NoSizeChange = True
179 AllowInsertMode = False
180 DrawGridLines = False
181 Version = 'May 23, 2005; '#169' markus stephany, vcl[at]mirkes[dot]de'
182 ShowPositionIfNotFocused = True
183 end
184 object value_viewer: TWrapGrid
185 Left = 0
186 Top = 108
187 Width = 392
188 Height = 148
189 Align = alClient
190 ColCount = 1
191 DefaultColWidth = 80
192 DefaultRowHeight = 18
193 FixedCols = 0
194 RowCount = 8
195 FixedRows = 0
196 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing]
197 ScrollBars = ssVertical
198 TabOrder = 2
199 end
200 object structviewer: TVirtualStringTree
201 Left = 0
202 Top = 264
203 Width = 392
204 Height = 97
205 Align = alBottom
206 AnimationDuration = 0
207 AutoExpandDelay = 300
208 BiDiMode = bdLeftToRight
209 Colors.UnfocusedSelectionColor = clGradientActiveCaption
210 Colors.UnfocusedSelectionBorderColor = clGradientActiveCaption
211 Ctl3D = True
212 DragOperations = []
213 DrawSelectionMode = smBlendedRectangle
214 EditDelay = 200
215 Font.Charset = DEFAULT_CHARSET
216 Font.Color = clWindowText
217 Font.Height = -11
218 Font.Name = 'Tahoma'
219 Font.Style = []
220 Header.AutoSizeIndex = 0
221 Header.Font.Charset = DEFAULT_CHARSET
222 Header.Font.Color = clWindowText
223 Header.Font.Height = -11
224 Header.Font.Name = 'Tahoma'
225 Header.Font.Style = []
226 Header.Options = [hoColumnResize, hoDblClickResize, hoDrag, hoVisible]
227 Header.Style = hsFlatButtons
228 HintAnimation = hatNone
229 HintMode = hmTooltip
230 Indent = 14
231 ParentBiDiMode = False
232 ParentCtl3D = False
233 ParentFont = False
234 ParentShowHint = False
235 ShowHint = True
236 TabOrder = 3
237 TreeOptions.MiscOptions = [toAcceptOLEDrop, toCheckSupport, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning]
238 TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toShowHorzGridLines, toShowRoot, toShowTreeLines, toShowVertGridLines, toUseBlendedImages]
239 TreeOptions.SelectionOptions = [toExtendedFocus, toFullRowSelect, toRightClickSelect]
240 OnFocusChanged = VSTFocusChanged
241 OnGetText = VSTGetText
242 Columns = <
243 item
244 MaxWidth = 300
245 MinWidth = 100
246 Options = [coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
247 Position = 0
248 Spacing = 20
249 Width = 150
250 WideText = 'Name'
251 WideHint = 'Name of the item.'
252 end
253 item
254 MaxWidth = 110
255 MinWidth = 80
256 Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
257 Position = 1
258 Spacing = 20
259 Width = 85
260 WideText = 'Offset'
261 WideHint = 'Offset of the data-item.'
262 end
263 item
264 MaxWidth = 110
265 MinWidth = 75
266 Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
267 Position = 2
268 Width = 75
269 WideText = 'Type'
270 WideHint = 'Data type of the item.'
271 end
272 item
273 MaxWidth = 250
274 MinWidth = 80
275 Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
276 Position = 3
277 Width = 100
278 WideText = 'Value'
279 WideHint = 'Value of the item.'
280 end
281 item
282 MaxWidth = 400
283 MinWidth = 80
284 Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
285 Position = 4
286 Width = 400
287 WideText = 'Description'
288 end>
289 WideDefaultText = ''
290 end
291 end
292 end
293 end
294 object value_viewer_context: TPopupMenu
295 AutoHotkeys = maManual
296 AutoLineReduction = maManual
297 Left = 300
298 Top = 196
299 object value_viewer_context_copy: TMenuItem
300 Caption = 'Copy to &clipboard'
301 end
302 object value_viewer_context_copyasdec: TMenuItem
303 Caption = 'Copy to clipboard (as &dec)'
304 end
305 object value_viewer_context_copyasfloat: TMenuItem
306 Caption = 'Copy to clipboard (as &float)'
307 end
308 object value_viewer_context_copyasbitset: TMenuItem
309 Caption = 'Copy to clipboard (as &bitset)'
310 end
311 object value_viewer_context_copyasstring: TMenuItem
312 Caption = 'Copy to clipboard (as &string)'
313 end
314 object value_viewer_context_copyashex: TMenuItem
315 Caption = 'Copy to clipboard (as &hex)'
316 end
317 end
318 object VTHPopup: TVTHeaderPopupMenu
319 Left = 292
320 Top = 340
321 end
322 object vst_popup: TPopupMenu
323 AutoHotkeys = maManual
324 Left = 80
325 Top = 204
326 object vst_newRoot: TMenuItem
327 Caption = 'Set as root element in new window'
328 OnClick = vst_newRootClick
329 end
330 object vst_setRoot: TMenuItem
331 Caption = 'Set as root element here'
332 OnClick = vst_setRootClick
333 end
334 end
335end
Note: See TracBrowser for help on using the repository browser.