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

Comparing oup/current/Tools/RawEdit.dfm (file contents):
Revision 177 by alloc, Sat May 12 13:22:11 2007 UTC vs.
Revision 221 by alloc, Mon Jun 18 14:20:33 2007 UTC

# Line 1 | Line 1
1   inherited Form_RawEdit: TForm_RawEdit
2 <  Caption = 'RawEdit'
3 <  KeyPreview = True
2 >  Caption = 'Form_RawEdit'
3    OnCloseQuery = FormCloseQuery
4    OnCreate = FormCreate
5    OnKeyUp = FormKeyUp
7  ExplicitWidth = 500
8  ExplicitHeight = 450
6    PixelsPerInch = 96
7    TextHeight = 13
8 <  inherited panel_files: TPanel
9 <    object Splitter4: TSplitter [0]
10 <      Left = 0
11 <      Top = 205
12 <      Width = 200
13 <      Height = 8
14 <      Cursor = crVSplit
15 <      Align = alBottom
16 <      AutoSnap = False
17 <      Beveled = True
18 <      MinSize = 150
19 <      ExplicitLeft = 3
20 <      ExplicitTop = 89
21 <    end
22 <    inherited filelist: TListBox
23 <      Height = 52
24 <      ExplicitHeight = 52
25 <    end
26 <    object panel_imexport: TPanel
27 <      Left = 0
28 <      Top = 363
29 <      Width = 200
30 <      Height = 60
31 <      Align = alBottom
32 <      BevelOuter = bvNone
33 <      TabOrder = 3
34 <      DesignSize = (
35 <        200
36 <        60)
37 <      object btn_export: TButton
38 <        Left = 4
39 <        Top = 4
40 <        Width = 190
41 <        Height = 25
42 <        Anchors = [akLeft, akTop, akRight]
43 <        Caption = 'Export to file...'
44 <        TabOrder = 0
45 <        OnClick = btn_exportClick
46 <      end
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 <        OnClick = btn_importClick
8 >  inherited panel_basecontent: TPanel
9 >    inherited panel_files: TPanel
10 >      inherited FilePages: TPageControl
11 >        inherited tab_files: TTabSheet
12 >          object Splitter4: TSplitter [0]
13 >            Left = 0
14 >            Top = 285
15 >            Width = 190
16 >            Height = 8
17 >            Cursor = crVSplit
18 >            Align = alBottom
19 >            AutoSnap = False
20 >            Beveled = True
21 >            MinSize = 150
22 >            ExplicitTop = 125
23 >          end
24 >          inherited filelist: TListBox
25 >            Height = 160
26 >          end
27 >          object panel_imexport: TPanel
28 >            Left = 0
29 >            Top = 443
30 >            Width = 190
31 >            Height = 60
32 >            Align = alBottom
33 >            BevelOuter = bvNone
34 >            TabOrder = 2
35 >            ExplicitTop = 363
36 >            ExplicitWidth = 200
37 >            DesignSize = (
38 >              190
39 >              60)
40 >            object btn_export: TButton
41 >              Left = 4
42 >              Top = 4
43 >              Width = 183
44 >              Height = 25
45 >              Anchors = [akLeft, akTop, akRight]
46 >              Caption = 'Export to file...'
47 >              TabOrder = 0
48 >              OnClick = btn_exportClick
49 >            end
50 >            object btn_import: TButton
51 >              Left = 4
52 >              Top = 32
53 >              Width = 183
54 >              Height = 25
55 >              Anchors = [akLeft, akTop, akRight]
56 >              Caption = 'Import from file...'
57 >              TabOrder = 1
58 >              OnClick = btn_importClick
59 >            end
60 >          end
61 >          object GroupBox1: TGroupBox
62 >            Left = 0
63 >            Top = 293
64 >            Width = 190
65 >            Height = 150
66 >            Align = alBottom
67 >            Caption = '2. Select .dat-link-offset'
68 >            TabOrder = 3
69 >            ExplicitTop = 213
70 >            ExplicitWidth = 200
71 >            object list_offset: TListBox
72 >              Left = 2
73 >              Top = 15
74 >              Width = 186
75 >              Height = 133
76 >              Align = alClient
77 >              ItemHeight = 13
78 >              TabOrder = 0
79 >              OnClick = list_offsetClick
80 >            end
81 >          end
82 >        end
83        end
84      end
85 <    object GroupBox1: TGroupBox
86 <      Left = 0
87 <      Top = 213
88 <      Width = 200
89 <      Height = 150
90 <      Align = alBottom
91 <      Caption = '2. Select .dat-link-offset'
92 <      TabOrder = 2
93 <      object list_offset: TListBox
94 <        Left = 2
95 <        Top = 15
96 <        Width = 196
97 <        Height = 133
98 <        Align = alClient
99 <        ItemHeight = 13
85 >    inherited panel_content: TPanel
86 >      object Splitter2: TSplitter
87 >        Left = 0
88 >        Top = 300
89 >        Width = 390
90 >        Height = 8
91 >        Cursor = crVSplit
92 >        Align = alTop
93 >        AutoSnap = False
94 >        Beveled = True
95 >        MinSize = 40
96 >      end
97 >      object hex: TMPHexEditor
98 >        Left = 0
99 >        Top = 0
100 >        Width = 390
101 >        Height = 300
102 >        Cursor = crIBeam
103 >        Align = alTop
104 >        Font.Charset = DEFAULT_CHARSET
105 >        Font.Color = clWindowText
106 >        Font.Height = -16
107 >        Font.Name = 'Courier'
108 >        Font.Style = []
109 >        OnKeyUp = hexKeyUp
110 >        ParentFont = False
111          TabOrder = 0
112 <        OnClick = list_offsetClick
112 >        BytesPerRow = 16
113 >        Translation = tkAsIs
114 >        OffsetFormat = '6!10:0x|'
115 >        Colors.Background = clWindow
116 >        Colors.ChangedBackground = clWindow
117 >        Colors.ChangedText = clRed
118 >        Colors.CursorFrame = clNavy
119 >        Colors.Offset = clBlack
120 >        Colors.OddColumn = clBlue
121 >        Colors.EvenColumn = clNavy
122 >        Colors.CurrentOffsetBackground = clBtnShadow
123 >        Colors.OffsetBackGround = clBtnFace
124 >        Colors.CurrentOffset = clBtnHighlight
125 >        Colors.Grid = clBtnFace
126 >        Colors.NonFocusCursorFrame = clAqua
127 >        Colors.ActiveFieldBackground = clWindow
128 >        FocusFrame = True
129 >        NoSizeChange = True
130 >        AllowInsertMode = False
131 >        DrawGridLines = False
132 >        Version = 'May 23, 2005; '#169' markus stephany, vcl[at]mirkes[dot]de'
133 >        OnChange = hexChange
134 >        ShowPositionIfNotFocused = True
135 >        OnSelectionChanged = hexSelectionChanged
136 >        ExplicitWidth = 283
137 >      end
138 >      object value_viewer: TWrapGrid
139 >        Left = 0
140 >        Top = 308
141 >        Width = 390
142 >        Height = 224
143 >        Align = alClient
144 >        ColCount = 2
145 >        DefaultColWidth = 80
146 >        DefaultRowHeight = 18
147 >        FixedCols = 0
148 >        RowCount = 8
149 >        FixedRows = 0
150 >        Font.Charset = DEFAULT_CHARSET
151 >        Font.Color = clWindowText
152 >        Font.Height = -11
153 >        Font.Name = 'Tahoma'
154 >        Font.Style = []
155 >        Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing]
156 >        ParentFont = False
157 >        ScrollBars = ssVertical
158 >        TabOrder = 1
159 >        OnDblClick = value_viewerDblClick
160 >        OnMouseDown = value_viewerMouseDown
161 >        ExplicitTop = 309
162 >        ExplicitWidth = 283
163 >        ExplicitHeight = 114
164        end
165      end
166    end
167 <  inherited content: TPanel
168 <    object Splitter2: TSplitter
169 <      Left = 0
170 <      Top = 300
85 <      Width = 283
86 <      Height = 9
87 <      Cursor = crVSplit
88 <      Align = alTop
89 <      AutoSnap = False
90 <      Beveled = True
91 <      MinSize = 40
92 <      ExplicitTop = 414
93 <    end
94 <    object hex: TMPHexEditor
95 <      Left = 0
96 <      Top = 0
97 <      Width = 283
98 <      Height = 300
99 <      Cursor = crIBeam
100 <      Align = alTop
101 <      Font.Charset = DEFAULT_CHARSET
102 <      Font.Color = clWindowText
103 <      Font.Height = -16
104 <      Font.Name = 'Courier'
105 <      Font.Style = []
106 <      OnKeyUp = hexKeyUp
107 <      ParentFont = False
108 <      TabOrder = 0
109 <      BytesPerRow = 16
110 <      Translation = tkAsIs
111 <      OffsetFormat = '6!10:0x|'
112 <      Colors.Background = clWindow
113 <      Colors.ChangedBackground = clWindow
114 <      Colors.ChangedText = clRed
115 <      Colors.CursorFrame = clNavy
116 <      Colors.Offset = clBlack
117 <      Colors.OddColumn = clBlue
118 <      Colors.EvenColumn = clNavy
119 <      Colors.CurrentOffsetBackground = clBtnShadow
120 <      Colors.OffsetBackGround = clBtnFace
121 <      Colors.CurrentOffset = clBtnHighlight
122 <      Colors.Grid = clBtnFace
123 <      Colors.NonFocusCursorFrame = clAqua
124 <      Colors.ActiveFieldBackground = clWindow
125 <      FocusFrame = True
126 <      NoSizeChange = True
127 <      AllowInsertMode = False
128 <      DrawGridLines = False
129 <      Version = 'May 23, 2005; '#169' markus stephany, vcl[at]mirkes[dot]de'
130 <      OnChange = hexChange
131 <      ShowPositionIfNotFocused = True
132 <      OnSelectionChanged = hexSelectionChanged
133 <    end
134 <    object value_viewer: TWrapGrid
135 <      Left = 0
136 <      Top = 309
137 <      Width = 283
138 <      Height = 114
139 <      Align = alClient
140 <      ColCount = 2
141 <      DefaultColWidth = 80
142 <      DefaultRowHeight = 18
143 <      FixedCols = 0
144 <      RowCount = 8
145 <      FixedRows = 0
146 <      Font.Charset = DEFAULT_CHARSET
147 <      Font.Color = clWindowText
148 <      Font.Height = -11
149 <      Font.Name = 'Tahoma'
150 <      Font.Style = []
151 <      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing]
152 <      ParentFont = False
153 <      PopupMenu = value_viewer_context
154 <      ScrollBars = ssVertical
155 <      TabOrder = 1
156 <      OnDblClick = value_viewerDblClick
157 <      OnMouseDown = value_viewerMouseDown
158 <    end
167 >  object opend: TOpenDialog
168 >    Options = [ofPathMustExist, ofFileMustExist, ofEnableSizing]
169 >    Left = 88
170 >    Top = 396
171    end
172 <  object value_viewer_context: TPopupMenu [3]
172 >  object saved: TSaveDialog
173 >    Options = [ofOverwritePrompt, ofPathMustExist, ofEnableSizing]
174 >    Left = 88
175 >    Top = 420
176 >  end
177 >  object value_viewer_context: TPopupMenu
178      AutoHotkeys = maManual
179      OnPopup = value_viewer_contextPopup
180 <    Left = 368
181 <    Top = 264
180 >    Left = 380
181 >    Top = 388
182      object value_viewer_context_copy: TMenuItem
183        Caption = 'Copy to &clipboard'
184        OnClick = value_viewer_context_copyClick
185      end
186      object value_viewer_context_copyasdec: TMenuItem
187        Caption = 'Copy to clipboard (as &dec)'
171      OnClick = value_viewer_context_copyClick
188      end
189      object value_viewer_context_copyasfloat: TMenuItem
190        Caption = 'Copy to clipboard (as &float)'
175      OnClick = value_viewer_context_copyClick
191      end
192      object value_viewer_context_copyasbitset: TMenuItem
193        Caption = 'Copy to clipboard (as &bitset)'
179      OnClick = value_viewer_context_copyClick
194      end
195      object value_viewer_context_copyasstring: TMenuItem
196        Caption = 'Copy to clipboard (as &string)'
183      OnClick = value_viewer_context_copyClick
197      end
198      object value_viewer_context_copyashex: TMenuItem
199        Caption = 'Copy to clipboard (as &hex)'
187      OnClick = value_viewer_context_copyClick
200      end
201    end
190  object opend: TOpenDialog [4]
191    Options = [ofPathMustExist, ofFileMustExist, ofEnableSizing]
192    Left = 128
193    Top = 256
194  end
195  object saved: TSaveDialog [5]
196    Options = [ofOverwritePrompt, ofPathMustExist, ofEnableSizing]
197    Left = 128
198    Top = 280
199  end
202   end

Diff Legend

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