source: oup/releases/0.28a/Unit8_binedit.dfm@ 794

Last change on this file since 794 was 27, checked in by alloc, 18 years ago
File size: 7.7 KB
RevLine 
[27]1object Form8: TForm8
2 Left = 0
3 Top = 0
4 BorderIcons = [biSystemMenu, biMaximize]
5 Caption = 'Binary .dat-Editor'
6 ClientHeight = 423
7 ClientWidth = 642
8 Color = clBtnFace
9 Font.Charset = DEFAULT_CHARSET
10 Font.Color = clWindowText
11 Font.Height = -11
12 Font.Name = 'Tahoma'
13 Font.Style = []
14 FormStyle = fsMDIChild
15 KeyPreview = True
16 OldCreateOrder = False
17 Visible = True
18 WindowState = wsMaximized
19 OnActivate = FormActivate
20 OnClose = FormClose
21 OnCloseQuery = FormCloseQuery
22 OnCreate = FormCreate
23 OnKeyUp = FormKeyUp
24 OnResize = FormResize
25 PixelsPerInch = 96
26 TextHeight = 13
27 object Splitter1: TSplitter
28 Left = 150
29 Top = 0
30 Width = 9
31 Height = 423
32 AutoSnap = False
33 Beveled = True
34 MinSize = 150
35 end
36 object panel_data: TPanel
37 Left = 159
38 Top = 0
39 Width = 483
40 Height = 423
41 Align = alClient
42 BevelOuter = bvNone
43 TabOrder = 0
44 OnResize = panel_dataResize
45 object Splitter2: TSplitter
46 Left = 0
47 Top = 209
48 Width = 483
49 Height = 9
50 Cursor = crVSplit
51 Align = alTop
52 AutoSnap = False
53 Beveled = True
54 MinSize = 40
55 end
56 object Splitter3: TSplitter
57 Left = 0
58 Top = 375
59 Width = 483
60 Height = 8
61 Cursor = crVSplit
62 Align = alBottom
63 AutoSnap = False
64 Beveled = True
65 MinSize = 40
66 end
67 object hex: TMPHexEditor
68 Left = 0
69 Top = 0
70 Width = 483
71 Height = 209
72 Cursor = crIBeam
73 Align = alTop
74 Font.Charset = DEFAULT_CHARSET
75 Font.Color = clWindowText
76 Font.Height = -16
77 Font.Name = 'Courier'
78 Font.Style = []
79 OnKeyUp = hexKeyUp
80 ParentFont = False
81 TabOrder = 0
82 BytesPerRow = 16
83 Translation = tkASCII
84 OffsetFormat = '6!10:0x|'
85 Colors.Background = clWindow
86 Colors.ChangedBackground = clWindow
87 Colors.ChangedText = clRed
88 Colors.CursorFrame = clNavy
89 Colors.Offset = clBlack
90 Colors.OddColumn = clBlue
91 Colors.EvenColumn = clNavy
92 Colors.CurrentOffsetBackground = clBtnShadow
93 Colors.OffsetBackGround = clBtnFace
94 Colors.CurrentOffset = clBtnHighlight
95 Colors.Grid = clBtnFace
96 Colors.NonFocusCursorFrame = clAqua
97 Colors.ActiveFieldBackground = clWindow
98 FocusFrame = True
99 NoSizeChange = True
100 AllowInsertMode = False
101 DrawGridLines = False
102 Version = 'May 23, 2005; '#169' markus stephany, vcl[at]mirkes[dot]de'
103 OnChange = hexChange
104 ShowPositionIfNotFocused = True
105 OnSelectionChanged = hexSelectionChanged
106 end
107 object structs: TWrapGrid
108 Left = 0
109 Top = 383
110 Width = 483
111 Height = 40
112 Align = alBottom
113 ColCount = 1
114 DefaultColWidth = 80
115 DefaultRowHeight = 18
116 Enabled = False
117 FixedCols = 0
118 RowCount = 1
119 FixedRows = 0
120 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing]
121 TabOrder = 1
122 OnClick = structsClick
123 OnDblClick = structsDblClick
124 end
125 object value_viewer: TWrapGrid
126 Left = 0
127 Top = 218
128 Width = 483
129 Height = 157
130 Align = alClient
131 ColCount = 1
132 DefaultColWidth = 80
133 DefaultRowHeight = 18
134 FixedCols = 0
135 RowCount = 8
136 FixedRows = 0
137 Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing]
138 PopupMenu = value_viewer_context
139 TabOrder = 2
140 OnDblClick = value_viewerDblClick
141 OnMouseDown = value_viewerMouseDown
142 end
143 end
144 object panel_files: TPanel
145 Left = 0
146 Top = 0
147 Width = 150
148 Height = 423
149 Align = alLeft
150 BevelOuter = bvNone
151 TabOrder = 1
152 object Bevel1: TBevel
153 Left = 0
154 Top = 359
155 Width = 150
156 Height = 6
157 Align = alBottom
158 Style = bsRaised
159 end
160 object list: TListBox
161 Left = 0
162 Top = 0
163 Width = 150
164 Height = 256
165 Align = alClient
166 ItemHeight = 13
167 TabOrder = 0
168 OnClick = listClick
169 end
170 object panel_extension: TPanel
171 Left = 0
172 Top = 256
173 Width = 150
174 Height = 103
175 Align = alBottom
176 BevelOuter = bvNone
177 TabOrder = 1
178 OnResize = panel_extensionResize
179 object lbl_filter: TLabel
180 Left = 2
181 Top = 62
182 Width = 100
183 Height = 17
184 AutoSize = False
185 Caption = 'Filter by &extension:'
186 FocusControl = combo_extension
187 end
188 object combo_extension: TComboBox
189 Left = 2
190 Top = 76
191 Width = 145
192 Height = 21
193 Style = csDropDownList
194 DropDownCount = 12
195 Font.Charset = DEFAULT_CHARSET
196 Font.Color = clWindowText
197 Font.Height = -11
198 Font.Name = 'Tahoma'
199 Font.Style = []
200 ItemHeight = 13
201 ParentFont = False
202 Sorted = True
203 TabOrder = 3
204 OnClick = combo_extensionClick
205 end
206 object check_zerobyte: TCheckBox
207 Left = 2
208 Top = 44
209 Width = 130
210 Height = 13
211 Caption = 'Show &zero-byte files'
212 TabOrder = 2
213 OnClick = check_zerobyteClick
214 end
215 object edit_filtername: TEdit
216 Left = 2
217 Top = 20
218 Width = 145
219 Height = 18
220 AutoSize = False
221 TabOrder = 1
222 end
223 object check_filtername: TCheckBox
224 Left = 2
225 Top = 5
226 Width = 130
227 Height = 15
228 Caption = 'Filter by file&name:'
229 TabOrder = 0
230 OnClick = check_filternameClick
231 end
232 end
233 object panel_imexport: TPanel
234 Left = 0
235 Top = 365
236 Width = 150
237 Height = 58
238 Align = alBottom
239 BevelOuter = bvNone
240 TabOrder = 2
241 OnResize = panel_imexportResize
242 object btn_export: TButton
243 Left = 4
244 Top = 4
245 Width = 142
246 Height = 25
247 Caption = 'Export to file...'
248 TabOrder = 0
249 OnClick = btn_exportClick
250 end
251 object btn_import: TButton
252 Left = 4
253 Top = 32
254 Width = 142
255 Height = 25
256 Caption = 'Import from file...'
257 TabOrder = 1
258 OnClick = btn_importClick
259 end
260 end
261 end
262 object opend: TOpenDialog
263 Options = [ofPathMustExist, ofFileMustExist, ofEnableSizing]
264 Left = 120
265 Top = 392
266 end
267 object saved: TSaveDialog
268 Options = [ofOverwritePrompt, ofPathMustExist, ofEnableSizing]
269 Left = 120
270 Top = 368
271 end
272 object value_viewer_context: TPopupMenu
273 AutoHotkeys = maManual
274 OnPopup = value_viewer_contextPopup
275 Left = 240
276 Top = 248
277 object value_viewer_context_copy: TMenuItem
278 Caption = 'Copy to &clipboard'
279 OnClick = value_viewer_context_copyClick
280 end
281 object value_viewer_context_copyasdec: TMenuItem
282 Caption = 'Copy to clipboard (as &dec)'
283 OnClick = value_viewer_context_copyClick
284 end
285 object value_viewer_context_copyasfloat: TMenuItem
286 Caption = 'Copy to clipboard (as &float)'
287 OnClick = value_viewer_context_copyClick
288 end
289 object value_viewer_context_copyasbitset: TMenuItem
290 Caption = 'Copy to clipboard (as &bitset)'
291 OnClick = value_viewer_context_copyClick
292 end
293 object value_viewer_context_copyasstring: TMenuItem
294 Caption = 'Copy to clipboard (as &string)'
295 OnClick = value_viewer_context_copyClick
296 end
297 object value_viewer_context_copyashex: TMenuItem
298 Caption = 'Copy to clipboard (as &hex)'
299 OnClick = value_viewer_context_copyClick
300 end
301 end
302end
Note: See TracBrowser for help on using the repository browser.