| 1 | object Form8: TForm8 | 
 
 
 
 
 | 2 | Left = 0 | 
 
 
 
 
 | 3 | Top = 0 | 
 
 
 
 
 | 4 | Width = 650 | 
 
 
 
 
 | 5 | Height = 450 | 
 
 
 
 
 | 6 | BorderIcons = [biSystemMenu, biMaximize] | 
 
 
 
 
 | 7 | Caption = 'Binary .dat-Editor' | 
 
 
 
 
 | 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 | DefaultColWidth = 80 | 
 
 
 
 
 | 113 | DefaultRowHeight = 18 | 
 
 
 
 
 | 114 | Enabled = False | 
 
 
 
 
 | 115 | FixedCols = 0 | 
 
 
 
 
 | 116 | Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing] | 
 
 
 
 
 | 117 | TabOrder = 1 | 
 
 
 
 
 | 118 | OnClick = structsClick | 
 
 
 
 
 | 119 | OnDblClick = structsDblClick | 
 
 
 
 
 | 120 | end | 
 
 
 
 
 | 121 | object value_viewer: TWrapGrid | 
 
 
 
 
 | 122 | Left = 0 | 
 
 
 
 
 | 123 | Top = 218 | 
 
 
 
 
 | 124 | Width = 483 | 
 
 
 
 
 | 125 | Height = 157 | 
 
 
 
 
 | 126 | Align = alClient | 
 
 
 
 
 | 127 | DefaultColWidth = 80 | 
 
 
 
 
 | 128 | DefaultRowHeight = 18 | 
 
 
 
 
 | 129 | FixedCols = 0 | 
 
 
 
 
 | 130 | RowCount = 8 | 
 
 
 
 
 | 131 | Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine, goColSizing] | 
 
 
 
 
 | 132 | PopupMenu = value_viewer_context | 
 
 
 
 
 | 133 | TabOrder = 2 | 
 
 
 
 
 | 134 | OnDblClick = value_viewerDblClick | 
 
 
 
 
 | 135 | OnMouseDown = value_viewerMouseDown | 
 
 
 
 
 | 136 | end | 
 
 
 
 
 | 137 | end | 
 
 
 
 
 | 138 | object panel_files: TPanel | 
 
 
 
 
 | 139 | Left = 0 | 
 
 
 
 
 | 140 | Top = 0 | 
 
 
 
 
 | 141 | Width = 150 | 
 
 
 
 
 | 142 | Height = 423 | 
 
 
 
 
 | 143 | Align = alLeft | 
 
 
 
 
 | 144 | BevelOuter = bvNone | 
 
 
 
 
 | 145 | TabOrder = 1 | 
 
 
 
 
 | 146 | object Bevel1: TBevel | 
 
 
 
 
 | 147 | Left = 0 | 
 
 
 
 
 | 148 | Top = 359 | 
 
 
 
 
 | 149 | Width = 150 | 
 
 
 
 
 | 150 | Height = 6 | 
 
 
 
 
 | 151 | Align = alBottom | 
 
 
 
 
 | 152 | Style = bsRaised | 
 
 
 
 
 | 153 | end | 
 
 
 
 
 | 154 | object list: TListBox | 
 
 
 
 
 | 155 | Left = 0 | 
 
 
 
 
 | 156 | Top = 0 | 
 
 
 
 
 | 157 | Width = 150 | 
 
 
 
 
 | 158 | Height = 256 | 
 
 
 
 
 | 159 | Align = alClient | 
 
 
 
 
 | 160 | ItemHeight = 13 | 
 
 
 
 
 | 161 | TabOrder = 0 | 
 
 
 
 
 | 162 | OnClick = listClick | 
 
 
 
 
 | 163 | end | 
 
 
 
 
 | 164 | object panel_extension: TPanel | 
 
 
 
 
 | 165 | Left = 0 | 
 
 
 
 
 | 166 | Top = 256 | 
 
 
 
 
 | 167 | Width = 150 | 
 
 
 
 
 | 168 | Height = 103 | 
 
 
 
 
 | 169 | Align = alBottom | 
 
 
 
 
 | 170 | BevelOuter = bvNone | 
 
 
 
 
 | 171 | TabOrder = 1 | 
 
 
 
 
 | 172 | OnResize = panel_extensionResize | 
 
 
 
 
 | 173 | object lbl_filter: TLabel | 
 
 
 
 
 | 174 | Left = 2 | 
 
 
 
 
 | 175 | Top = 62 | 
 
 
 
 
 | 176 | Width = 100 | 
 
 
 
 
 | 177 | Height = 17 | 
 
 
 
 
 | 178 | AutoSize = False | 
 
 
 
 
 | 179 | Caption = 'Filter by &extension:' | 
 
 
 
 
 | 180 | FocusControl = combo_extension | 
 
 
 
 
 | 181 | end | 
 
 
 
 
 | 182 | object combo_extension: TComboBox | 
 
 
 
 
 | 183 | Left = 2 | 
 
 
 
 
 | 184 | Top = 76 | 
 
 
 
 
 | 185 | Width = 145 | 
 
 
 
 
 | 186 | Height = 21 | 
 
 
 
 
 | 187 | Style = csDropDownList | 
 
 
 
 
 | 188 | DropDownCount = 12 | 
 
 
 
 
 | 189 | Font.Charset = DEFAULT_CHARSET | 
 
 
 
 
 | 190 | Font.Color = clWindowText | 
 
 
 
 
 | 191 | Font.Height = -11 | 
 
 
 
 
 | 192 | Font.Name = 'Tahoma' | 
 
 
 
 
 | 193 | Font.Style = [] | 
 
 
 
 
 | 194 | ItemHeight = 13 | 
 
 
 
 
 | 195 | ParentFont = False | 
 
 
 
 
 | 196 | Sorted = True | 
 
 
 
 
 | 197 | TabOrder = 3 | 
 
 
 
 
 | 198 | OnClick = combo_extensionClick | 
 
 
 
 
 | 199 | end | 
 
 
 
 
 | 200 | object check_zerobyte: TCheckBox | 
 
 
 
 
 | 201 | Left = 2 | 
 
 
 
 
 | 202 | Top = 44 | 
 
 
 
 
 | 203 | Width = 130 | 
 
 
 
 
 | 204 | Height = 13 | 
 
 
 
 
 | 205 | Caption = 'Show &zero-byte files' | 
 
 
 
 
 | 206 | TabOrder = 2 | 
 
 
 
 
 | 207 | OnClick = check_zerobyteClick | 
 
 
 
 
 | 208 | end | 
 
 
 
 
 | 209 | object edit_filtername: TEdit | 
 
 
 
 
 | 210 | Left = 2 | 
 
 
 
 
 | 211 | Top = 20 | 
 
 
 
 
 | 212 | Width = 145 | 
 
 
 
 
 | 213 | Height = 18 | 
 
 
 
 
 | 214 | AutoSize = False | 
 
 
 
 
 | 215 | TabOrder = 1 | 
 
 
 
 
 | 216 | end | 
 
 
 
 
 | 217 | object check_filtername: TCheckBox | 
 
 
 
 
 | 218 | Left = 2 | 
 
 
 
 
 | 219 | Top = 5 | 
 
 
 
 
 | 220 | Width = 130 | 
 
 
 
 
 | 221 | Height = 15 | 
 
 
 
 
 | 222 | Caption = 'Filter by file&name:' | 
 
 
 
 
 | 223 | TabOrder = 0 | 
 
 
 
 
 | 224 | OnClick = check_filternameClick | 
 
 
 
 
 | 225 | end | 
 
 
 
 
 | 226 | end | 
 
 
 
 
 | 227 | object panel_imexport: TPanel | 
 
 
 
 
 | 228 | Left = 0 | 
 
 
 
 
 | 229 | Top = 365 | 
 
 
 
 
 | 230 | Width = 150 | 
 
 
 
 
 | 231 | Height = 58 | 
 
 
 
 
 | 232 | Align = alBottom | 
 
 
 
 
 | 233 | BevelOuter = bvNone | 
 
 
 
 
 | 234 | TabOrder = 2 | 
 
 
 
 
 | 235 | OnResize = panel_imexportResize | 
 
 
 
 
 | 236 | object btn_export: TButton | 
 
 
 
 
 | 237 | Left = 4 | 
 
 
 
 
 | 238 | Top = 4 | 
 
 
 
 
 | 239 | Width = 142 | 
 
 
 
 
 | 240 | Height = 25 | 
 
 
 
 
 | 241 | Caption = 'Export to file...' | 
 
 
 
 
 | 242 | TabOrder = 0 | 
 
 
 
 
 | 243 | OnClick = btn_exportClick | 
 
 
 
 
 | 244 | end | 
 
 
 
 
 | 245 | object btn_import: TButton | 
 
 
 
 
 | 246 | Left = 4 | 
 
 
 
 
 | 247 | Top = 32 | 
 
 
 
 
 | 248 | Width = 142 | 
 
 
 
 
 | 249 | Height = 25 | 
 
 
 
 
 | 250 | Caption = 'Import from file...' | 
 
 
 
 
 | 251 | TabOrder = 1 | 
 
 
 
 
 | 252 | OnClick = btn_importClick | 
 
 
 
 
 | 253 | end | 
 
 
 
 
 | 254 | end | 
 
 
 
 
 | 255 | end | 
 
 
 
 
 | 256 | object opend: TOpenDialog | 
 
 
 
 
 | 257 | Options = [ofPathMustExist, ofFileMustExist, ofEnableSizing] | 
 
 
 
 
 | 258 | Left = 120 | 
 
 
 
 
 | 259 | Top = 392 | 
 
 
 
 
 | 260 | end | 
 
 
 
 
 | 261 | object saved: TSaveDialog | 
 
 
 
 
 | 262 | Options = [ofOverwritePrompt, ofPathMustExist, ofEnableSizing] | 
 
 
 
 
 | 263 | Left = 120 | 
 
 
 
 
 | 264 | Top = 368 | 
 
 
 
 
 | 265 | end | 
 
 
 
 
 | 266 | object value_viewer_context: TPopupMenu | 
 
 
 
 
 | 267 | AutoHotkeys = maManual | 
 
 
 
 
 | 268 | OnPopup = value_viewer_contextPopup | 
 
 
 
 
 | 269 | Left = 240 | 
 
 
 
 
 | 270 | Top = 248 | 
 
 
 
 
 | 271 | object value_viewer_context_copy: TMenuItem | 
 
 
 
 
 | 272 | Caption = 'Copy to &clipboard' | 
 
 
 
 
 | 273 | OnClick = value_viewer_context_copyClick | 
 
 
 
 
 | 274 | end | 
 
 
 
 
 | 275 | object value_viewer_context_copyasdec: TMenuItem | 
 
 
 
 
 | 276 | Caption = 'Copy to clipboard (as &dec)' | 
 
 
 
 
 | 277 | OnClick = value_viewer_context_copyClick | 
 
 
 
 
 | 278 | end | 
 
 
 
 
 | 279 | object value_viewer_context_copyasfloat: TMenuItem | 
 
 
 
 
 | 280 | Caption = 'Copy to clipboard (as &float)' | 
 
 
 
 
 | 281 | OnClick = value_viewer_context_copyClick | 
 
 
 
 
 | 282 | end | 
 
 
 
 
 | 283 | object value_viewer_context_copyasbitset: TMenuItem | 
 
 
 
 
 | 284 | Caption = 'Copy to clipboard (as &bitset)' | 
 
 
 
 
 | 285 | OnClick = value_viewer_context_copyClick | 
 
 
 
 
 | 286 | end | 
 
 
 
 
 | 287 | object value_viewer_context_copyasstring: TMenuItem | 
 
 
 
 
 | 288 | Caption = 'Copy to clipboard (as &string)' | 
 
 
 
 
 | 289 | OnClick = value_viewer_context_copyClick | 
 
 
 
 
 | 290 | end | 
 
 
 
 
 | 291 | object value_viewer_context_copyashex: TMenuItem | 
 
 
 
 
 | 292 | Caption = 'Copy to clipboard (as &hex)' | 
 
 
 
 
 | 293 | OnClick = value_viewer_context_copyClick | 
 
 
 
 
 | 294 | end | 
 
 
 
 
 | 295 | end | 
 
 
 
 
 | 296 | end |