source: oup/releases/0.31a/Unit8_binedit.dfm @ 34

Last change on this file since 34 was 34, checked in by alloc, 16 years ago
File size: 10.7 KB
Line 
1object Form8: TForm8
2  Left = 0
3  Top = 0
4  BorderIcons = [biSystemMenu, biMaximize]
5  Caption = 'Binary .dat-Editor'
6  ClientHeight = 555
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 = 555
32    AutoSnap = False
33    Beveled = True
34    MinSize = 150
35    ExplicitHeight = 423
36  end
37  object panel_data: TPanel
38    Left = 159
39    Top = 0
40    Width = 483
41    Height = 555
42    Align = alClient
43    BevelOuter = bvNone
44    TabOrder = 0
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 = 450
59      Width = 483
60      Height = 8
61      Cursor = crVSplit
62      Align = alBottom
63      AutoSnap = False
64      Beveled = True
65      MinSize = 40
66      ExplicitTop = 375
67    end
68    object hex: TMPHexEditor
69      Left = 0
70      Top = 0
71      Width = 483
72      Height = 209
73      Cursor = crIBeam
74      Align = alTop
75      Font.Charset = DEFAULT_CHARSET
76      Font.Color = clWindowText
77      Font.Height = -16
78      Font.Name = 'Courier'
79      Font.Style = []
80      OnKeyUp = hexKeyUp
81      ParentFont = False
82      TabOrder = 0
83      BytesPerRow = 16
84      Translation = tkASCII
85      OffsetFormat = '6!10:0x|'
86      Colors.Background = clWindow
87      Colors.ChangedBackground = clWindow
88      Colors.ChangedText = clRed
89      Colors.CursorFrame = clNavy
90      Colors.Offset = clBlack
91      Colors.OddColumn = clBlue
92      Colors.EvenColumn = clNavy
93      Colors.CurrentOffsetBackground = clBtnShadow
94      Colors.OffsetBackGround = clBtnFace
95      Colors.CurrentOffset = clBtnHighlight
96      Colors.Grid = clBtnFace
97      Colors.NonFocusCursorFrame = clAqua
98      Colors.ActiveFieldBackground = clWindow
99      FocusFrame = True
100      NoSizeChange = True
101      AllowInsertMode = False
102      DrawGridLines = False
103      Version = 'May 23, 2005; '#169' markus stephany, vcl[at]mirkes[dot]de'
104      OnChange = hexChange
105      ShowPositionIfNotFocused = True
106      OnSelectionChanged = hexSelectionChanged
107    end
108    object value_viewer: TWrapGrid
109      Left = 0
110      Top = 218
111      Width = 483
112      Height = 232
113      Align = alClient
114      ColCount = 1
115      DefaultColWidth = 80
116      DefaultRowHeight = 18
117      FixedCols = 0
118      RowCount = 8
119      FixedRows = 0
120      Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing]
121      PopupMenu = value_viewer_context
122      TabOrder = 1
123      OnDblClick = value_viewerDblClick
124      OnMouseDown = value_viewerMouseDown
125    end
126    object VST: TVirtualStringTree
127      Left = 0
128      Top = 458
129      Width = 483
130      Height = 97
131      Align = alBottom
132      AnimationDuration = 0
133      AutoExpandDelay = 300
134      BiDiMode = bdLeftToRight
135      Colors.UnfocusedSelectionColor = clGradientActiveCaption
136      Colors.UnfocusedSelectionBorderColor = clGradientActiveCaption
137      Ctl3D = True
138      DragOperations = []
139      DrawSelectionMode = smBlendedRectangle
140      EditDelay = 200
141      Font.Charset = DEFAULT_CHARSET
142      Font.Color = clWindowText
143      Font.Height = -11
144      Font.Name = 'Tahoma'
145      Font.Style = []
146      Header.AutoSizeIndex = 0
147      Header.Font.Charset = DEFAULT_CHARSET
148      Header.Font.Color = clWindowText
149      Header.Font.Height = -11
150      Header.Font.Name = 'Tahoma'
151      Header.Font.Style = []
152      Header.Options = [hoColumnResize, hoDblClickResize, hoDrag, hoVisible]
153      Header.PopupMenu = VTHPopup
154      Header.Style = hsFlatButtons
155      HintAnimation = hatNone
156      HintMode = hmTooltip
157      Indent = 14
158      ParentBiDiMode = False
159      ParentCtl3D = False
160      ParentFont = False
161      ParentShowHint = False
162      ShowHint = True
163      TabOrder = 2
164      TreeOptions.MiscOptions = [toAcceptOLEDrop, toCheckSupport, toFullRepaintOnResize, toInitOnSave, toToggleOnDblClick, toWheelPanning]
165      TreeOptions.PaintOptions = [toShowButtons, toShowDropmark, toShowHorzGridLines, toShowRoot, toShowTreeLines, toShowVertGridLines, toUseBlendedImages]
166      TreeOptions.SelectionOptions = [toExtendedFocus, toFullRowSelect, toRightClickSelect]
167      OnDblClick = VSTDblClick
168      OnFocusChanged = VSTFocusChanged
169      OnGetText = VSTGetText
170      OnHeaderDragged = VSTHeaderDragged
171      Columns = <
172        item
173          MaxWidth = 300
174          MinWidth = 100
175          Options = [coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
176          Position = 0
177          Spacing = 20
178          Width = 150
179          WideText = 'Name'
180          WideHint = 'Name of the item.'
181        end
182        item
183          MaxWidth = 110
184          MinWidth = 80
185          Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
186          Position = 1
187          Spacing = 20
188          Width = 85
189          WideText = 'Offset'
190          WideHint = 'Offset of the data-item.'
191        end
192        item
193          MaxWidth = 110
194          MinWidth = 75
195          Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
196          Position = 2
197          Width = 75
198          WideText = 'Type'
199          WideHint = 'Data type of the item.'
200        end
201        item
202          MaxWidth = 250
203          MinWidth = 80
204          Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
205          Position = 3
206          Width = 100
207          WideText = 'Value'
208          WideHint = 'Value of the item.'
209        end
210        item
211          MaxWidth = 400
212          MinWidth = 80
213          Options = [coDraggable, coEnabled, coParentBidiMode, coParentColor, coResizable, coShowDropMark, coVisible]
214          Position = 4
215          Width = 400
216          WideText = 'Description'
217        end>
218      WideDefaultText = ''
219    end
220  end
221  object panel_files: TPanel
222    Left = 0
223    Top = 0
224    Width = 150
225    Height = 555
226    Align = alLeft
227    BevelOuter = bvNone
228    TabOrder = 1
229    object Bevel1: TBevel
230      Left = 0
231      Top = 491
232      Width = 150
233      Height = 6
234      Align = alBottom
235      Style = bsRaised
236      ExplicitTop = 359
237    end
238    object list: TListBox
239      Left = 0
240      Top = 0
241      Width = 150
242      Height = 388
243      Align = alClient
244      ItemHeight = 13
245      TabOrder = 0
246      OnClick = listClick
247    end
248    object panel_extension: TPanel
249      Left = 0
250      Top = 388
251      Width = 150
252      Height = 103
253      Align = alBottom
254      BevelOuter = bvNone
255      TabOrder = 1
256      OnResize = panel_extensionResize
257      object lbl_filter: TLabel
258        Left = 2
259        Top = 62
260        Width = 100
261        Height = 17
262        AutoSize = False
263        Caption = 'Filter by &extension:'
264        FocusControl = combo_extension
265      end
266      object combo_extension: TComboBox
267        Left = 2
268        Top = 76
269        Width = 145
270        Height = 21
271        Style = csDropDownList
272        DropDownCount = 12
273        Font.Charset = DEFAULT_CHARSET
274        Font.Color = clWindowText
275        Font.Height = -11
276        Font.Name = 'Tahoma'
277        Font.Style = []
278        ItemHeight = 13
279        ParentFont = False
280        Sorted = True
281        TabOrder = 3
282        OnClick = combo_extensionClick
283      end
284      object check_zerobyte: TCheckBox
285        Left = 2
286        Top = 44
287        Width = 130
288        Height = 13
289        Caption = 'Show &zero-byte files'
290        TabOrder = 2
291        OnClick = check_zerobyteClick
292      end
293      object edit_filtername: TEdit
294        Left = 2
295        Top = 20
296        Width = 145
297        Height = 18
298        AutoSize = False
299        TabOrder = 1
300      end
301      object check_filtername: TCheckBox
302        Left = 2
303        Top = 5
304        Width = 130
305        Height = 15
306        Caption = 'Filter by file&name:'
307        TabOrder = 0
308        OnClick = check_filternameClick
309      end
310    end
311    object panel_imexport: TPanel
312      Left = 0
313      Top = 497
314      Width = 150
315      Height = 58
316      Align = alBottom
317      BevelOuter = bvNone
318      TabOrder = 2
319      OnResize = panel_imexportResize
320      object btn_export: TButton
321        Left = 4
322        Top = 4
323        Width = 142
324        Height = 25
325        Caption = 'Export to file...'
326        TabOrder = 0
327        OnClick = btn_exportClick
328      end
329      object btn_import: TButton
330        Left = 4
331        Top = 32
332        Width = 142
333        Height = 25
334        Caption = 'Import from file...'
335        TabOrder = 1
336        OnClick = btn_importClick
337      end
338    end
339  end
340  object opend: TOpenDialog
341    Options = [ofPathMustExist, ofFileMustExist, ofEnableSizing]
342    Left = 120
343    Top = 392
344  end
345  object saved: TSaveDialog
346    Options = [ofOverwritePrompt, ofPathMustExist, ofEnableSizing]
347    Left = 120
348    Top = 368
349  end
350  object value_viewer_context: TPopupMenu
351    AutoHotkeys = maManual
352    OnPopup = value_viewer_contextPopup
353    Left = 240
354    Top = 248
355    object value_viewer_context_copy: TMenuItem
356      Caption = 'Copy to &clipboard'
357      OnClick = value_viewer_context_copyClick
358    end
359    object value_viewer_context_copyasdec: TMenuItem
360      Caption = 'Copy to clipboard (as &dec)'
361      OnClick = value_viewer_context_copyClick
362    end
363    object value_viewer_context_copyasfloat: TMenuItem
364      Caption = 'Copy to clipboard (as &float)'
365      OnClick = value_viewer_context_copyClick
366    end
367    object value_viewer_context_copyasbitset: TMenuItem
368      Caption = 'Copy to clipboard (as &bitset)'
369      OnClick = value_viewer_context_copyClick
370    end
371    object value_viewer_context_copyasstring: TMenuItem
372      Caption = 'Copy to clipboard (as &string)'
373      OnClick = value_viewer_context_copyClick
374    end
375    object value_viewer_context_copyashex: TMenuItem
376      Caption = 'Copy to clipboard (as &hex)'
377      OnClick = value_viewer_context_copyClick
378    end
379  end
380  object VTHPopup: TVTHeaderPopupMenu
381    OnColumnChange = VTHPopupColumnChange
382    Left = 200
383    Top = 496
384  end
385end
Note: See TracBrowser for help on using the repository browser.