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

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

Diff Legend

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