source: oup/current/Tools/BinEdit.dfm @ 174

Last change on this file since 174 was 174, checked in by alloc, 15 years ago
File size: 7.2 KB
Line 
1inherited Form_BinEdit: TForm_BinEdit
2  Caption = 'BinEdit'
3  KeyPreview = True
4  OnCloseQuery = FormCloseQuery
5  OnCreate = FormCreate
6  OnKeyUp = FormKeyUp
7  ExplicitWidth = 500
8  ExplicitHeight = 450
9  PixelsPerInch = 96
10  TextHeight = 13
11  inherited content: TPanel
12    object Splitter2: TSplitter
13      Left = 0
14      Top = 209
15      Width = 283
16      Height = 9
17      Cursor = crVSplit
18      Align = alTop
19      AutoSnap = False
20      Beveled = True
21      MinSize = 40
22      ExplicitWidth = 425
23    end
24    object Splitter3: TSplitter
25      Left = 0
26      Top = 318
27      Width = 283
28      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 = 'december 06, 2006; '#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.'
152        end
153        item
154          MaxWidth = 110
155          MinWidth = 80
156          Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
157          Position = 1
158          Spacing = 20
159          Width = 85
160          WideText = 'Offset'
161          WideHint = 'Offset of the data-item.'
162        end
163        item
164          MaxWidth = 110
165          MinWidth = 75
166          Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
167          Position = 2
168          Width = 75
169          WideText = 'Type'
170          WideHint = 'Data type of the item.'
171        end
172        item
173          MaxWidth = 250
174          MinWidth = 80
175          Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
176          Position = 3
177          Width = 100
178          WideText = 'Value'
179          WideHint = 'Value of the item.'
180        end
181        item
182          MaxWidth = 400
183          MinWidth = 80
184          Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
185          Position = 4
186          Width = 400
187          WideText = 'Description'
188        end>
189      WideDefaultText = ''
190    end
191  end
192  object value_viewer_context: TPopupMenu [3]
193    AutoHotkeys = maManual
194    AutoLineReduction = maManual
195    OnPopup = value_viewer_contextPopup
196    Left = 280
197    Top = 232
198    object value_viewer_context_copy: TMenuItem
199      Caption = 'Copy to &clipboard'
200      OnClick = value_viewer_context_copyClick
201    end
202    object value_viewer_context_copyasdec: TMenuItem
203      Caption = 'Copy to clipboard (as &dec)'
204      OnClick = value_viewer_context_copyClick
205    end
206    object value_viewer_context_copyasfloat: TMenuItem
207      Caption = 'Copy to clipboard (as &float)'
208      OnClick = value_viewer_context_copyClick
209    end
210    object value_viewer_context_copyasbitset: TMenuItem
211      Caption = 'Copy to clipboard (as &bitset)'
212      OnClick = value_viewer_context_copyClick
213    end
214    object value_viewer_context_copyasstring: TMenuItem
215      Caption = 'Copy to clipboard (as &string)'
216      OnClick = value_viewer_context_copyClick
217    end
218    object value_viewer_context_copyashex: TMenuItem
219      Caption = 'Copy to clipboard (as &hex)'
220      OnClick = value_viewer_context_copyClick
221    end
222  end
223  object VTHPopup: TVTHeaderPopupMenu [4]
224    OnColumnChange = VTHPopupColumnChange
225    Left = 272
226    Top = 376
227  end
228end
Note: See TracBrowser for help on using the repository browser.