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

Last change on this file since 107 was 92, checked in by alloc, 18 years ago

Rev86 was first after multi-cons
File size: 7.1 KB
RevLine 
[46]1inherited Form_BinEdit: TForm_BinEdit
2 Caption = 'BinEdit'
[61]3 KeyPreview = True
[46]4 OnCloseQuery = FormCloseQuery
5 OnKeyUp = FormKeyUp
[92]6 ExplicitWidth = 500
7 ExplicitHeight = 450
[46]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
[92]91 ScrollBars = ssVertical
[46]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.'
151 end
152 item
153 MaxWidth = 110
154 MinWidth = 80
155 Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
156 Position = 1
157 Spacing = 20
158 Width = 85
159 WideText = 'Offset'
160 WideHint = 'Offset of the data-item.'
161 end
162 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 = ''
189 end
190 end
191 object value_viewer_context: TPopupMenu [3]
192 AutoHotkeys = maManual
[92]193 AutoLineReduction = maManual
[46]194 OnPopup = value_viewer_contextPopup
195 Left = 280
196 Top = 232
197 object value_viewer_context_copy: TMenuItem
198 Caption = 'Copy to &clipboard'
199 OnClick = value_viewer_context_copyClick
200 end
201 object value_viewer_context_copyasdec: TMenuItem
202 Caption = 'Copy to clipboard (as &dec)'
203 OnClick = value_viewer_context_copyClick
204 end
205 object value_viewer_context_copyasfloat: TMenuItem
206 Caption = 'Copy to clipboard (as &float)'
207 OnClick = value_viewer_context_copyClick
208 end
209 object value_viewer_context_copyasbitset: TMenuItem
210 Caption = 'Copy to clipboard (as &bitset)'
211 OnClick = value_viewer_context_copyClick
212 end
213 object value_viewer_context_copyasstring: TMenuItem
214 Caption = 'Copy to clipboard (as &string)'
215 OnClick = value_viewer_context_copyClick
216 end
217 object value_viewer_context_copyashex: TMenuItem
218 Caption = 'Copy to clipboard (as &hex)'
219 OnClick = value_viewer_context_copyClick
220 end
221 end
222 object VTHPopup: TVTHeaderPopupMenu [4]
223 OnColumnChange = VTHPopupColumnChange
224 Left = 272
225 Top = 376
226 end
227end
Note: See TracBrowser for help on using the repository browser.