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

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

Diff Legend

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