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

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