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

Last change on this file since 27 was 27, checked in by alloc, 15 years ago
File size: 7.7 KB
Line 
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.