ViewVC Help
View File | Revision Log | View Changeset | Root Listing
root/Oni2/oup/current/Tools/MetaEditor.dfm
(Generate patch)

Comparing oup/current/Tools/MetaEditor.dfm (file contents):
Revision 218 by alloc, Fri Jun 15 22:12:39 2007 UTC vs.
Revision 241 by alloc, Tue Jul 17 22:27:16 2007 UTC

# Line 1 | Line 1
1   inherited 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
6  inherited panel_connection: TPanel
7    ExplicitWidth = 598
8    inherited combo_connection: TComboBox
9      ExplicitWidth = 532
10    end
11  end
9    inherited panel_basecontent: TPanel
10 +    Height = 424
11      ExplicitLeft = 0
12      ExplicitTop = 25
13      ExplicitWidth = 598
14 <    ExplicitHeight = 532
14 >    ExplicitHeight = 424
15      object splitter: TSplitter
16 <      Left = 502
16 >      Left = 190
17        Top = 0
18        Width = 8
19 <      Height = 532
19 >      Height = 424
20        Align = alRight
21        AutoSnap = False
22        Beveled = True
23        MinSize = 200
24 <      ExplicitLeft = 353
24 >      ExplicitLeft = 287
25 >      ExplicitTop = 16
26 >      ExplicitHeight = 532
27      end
28      object VST: TVirtualStringTree
29        Left = 0
30        Top = 0
31 <      Width = 502
32 <      Height = 532
31 >      Width = 190
32 >      Height = 424
33        Align = alClient
34        AnimationDuration = 0
35        Header.AutoSizeIndex = 0
# Line 39 | Line 39 | inherited Form_Meta: TForm_Meta
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]
# Line 46 | Line 50 | inherited Form_Meta: TForm_Meta
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 = 'FName'
60 >          WideText = 'Name'
61          end
62          item
63            Position = 1
64 <          WideText = 'FType'
64 >          Width = 100
65 >          WideText = 'Type'
66          end
67          item
68            Position = 2
69 <          WideText = 'FID'
70 <        end
64 <        item
65 <          Position = 3
66 <          WideText = 'Data'
69 >          Width = 150
70 >          WideText = 'Value'
71          end>
72      end
73 <    object Panel2: TPanel
74 <      Left = 510
73 >    object rightPages: TPageControl
74 >      Left = 198
75        Top = 0
76 <      Width = 88
77 <      Height = 532
76 >      Width = 400
77 >      Height = 424
78 >      ActivePage = tab_meta
79        Align = alRight
75      BevelOuter = bvNone
76      Caption = 'Panel2'
80        TabOrder = 1
81 +      object tab_meta: TTabSheet
82 +        Caption = 'Meta Edit'
83 +        ImageIndex = 1
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
102 +          Top = 256
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
115 +          Top = 361
116 +          Width = 392
117 +          Height = 35
118 +          Align = alBottom
119 +          BevelOuter = bvNone
120 +          Caption = 'panel_hex_actions'
121 +          TabOrder = 0
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
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
164 +          Colors.OffsetBackGround = clBtnFace
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
173 +          Version = 'May 23, 2005; '#169' markus stephany, vcl[at]mirkes[dot]de'
174 +          ShowPositionIfNotFocused = True
175 +        end
176 +        object value_viewer: TWrapGrid
177 +          Left = 0
178 +          Top = 108
179 +          Width = 392
180 +          Height = 148
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
194 +          Top = 264
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
284 +    end
285 +  end
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
314 +  object vst_popup: TPopupMenu
315 +    AutoHotkeys = maManual
316 +    Left = 80
317 +    Top = 204
318 +    object vst_newRoot: TMenuItem
319 +      Caption = 'Set as root element in new window'
320 +      OnClick = vst_newRootClick
321 +    end
322 +    object vst_setRoot: TMenuItem
323 +      Caption = 'Set as root element here'
324 +      OnClick = vst_setRootClick
325      end
326    end
327   end

Diff Legend

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