source: oup/current/Unit13_rawedit.dfm @ 10

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