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

Diff Legend

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