source: oup/releases/0.27a/Unit8_binedit.dfm @ 26

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