| 1 | 
 object 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 | 
   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 = 640 | 
 
 
 
 
 
 | 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 = 640 | 
 
 
 
 
 
 | 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 = 592 | 
 
 
 
 
 
 | 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 = 600 | 
 
 
 
 
 
 | 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 = 374 | 
 
 
 
 
 
 | 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 = 640 | 
 
 
 
 
 
 | 149 | 
     Align = alLeft | 
 
 
 
 
 
 | 150 | 
     BevelOuter = bvNone | 
 
 
 
 
 
 | 151 | 
     TabOrder = 1 | 
 
 
 
 
 
 | 152 | 
     object Splitter4: TSplitter | 
 
 
 
 
 
 | 153 | 
       Left = 0 | 
 
 
 
 
 
 | 154 | 
       Top = 442 | 
 
 
 
 
 
 | 155 | 
       Width = 150 | 
 
 
 
 
 
 | 156 | 
       Height = 9 | 
 
 
 
 
 
 | 157 | 
       Cursor = crVSplit | 
 
 
 
 
 
 | 158 | 
       Align = alBottom | 
 
 
 
 
 
 | 159 | 
       AutoSnap = False | 
 
 
 
 
 
 | 160 | 
       Beveled = True | 
 
 
 
 
 
 | 161 | 
       MinSize = 150 | 
 
 
 
 
 
 | 162 | 
     end | 
 
 
 
 
 
 | 163 | 
     object panel_imexport: TPanel | 
 
 
 
 
 
 | 164 | 
       Left = 0 | 
 
 
 
 
 
 | 165 | 
       Top = 580 | 
 
 
 
 
 
 | 166 | 
       Width = 150 | 
 
 
 
 
 
 | 167 | 
       Height = 60 | 
 
 
 
 
 
 | 168 | 
       Align = alBottom | 
 
 
 
 
 
 | 169 | 
       BevelOuter = bvNone | 
 
 
 
 
 
 | 170 | 
       TabOrder = 0 | 
 
 
 
 
 
 | 171 | 
       OnResize = panel_imexportResize | 
 
 
 
 
 
 | 172 | 
       object btn_export: TButton | 
 
 
 
 
 
 | 173 | 
         Left = 4 | 
 
 
 
 
 
 | 174 | 
         Top = 4 | 
 
 
 
 
 
 | 175 | 
         Width = 142 | 
 
 
 
 
 
 | 176 | 
         Height = 25 | 
 
 
 
 
 
 | 177 | 
         Caption = 'Export to file...' | 
 
 
 
 
 
 | 178 | 
         TabOrder = 0 | 
 
 
 
 
 
 | 179 | 
         OnClick = btn_exportClick | 
 
 
 
 
 
 | 180 | 
       end | 
 
 
 
 
 
 | 181 | 
       object btn_import: TButton | 
 
 
 
 
 
 | 182 | 
         Left = 4 | 
 
 
 
 
 
 | 183 | 
         Top = 32 | 
 
 
 
 
 
 | 184 | 
         Width = 142 | 
 
 
 
 
 
 | 185 | 
         Height = 25 | 
 
 
 
 
 
 | 186 | 
         Caption = 'Import from file...' | 
 
 
 
 
 
 | 187 | 
         TabOrder = 1 | 
 
 
 
 
 
 | 188 | 
         OnClick = btn_importClick | 
 
 
 
 
 
 | 189 | 
       end | 
 
 
 
 
 
 | 190 | 
     end | 
 
 
 
 
 
 | 191 | 
     object group_file: TGroupBox | 
 
 
 
 
 
 | 192 | 
       Left = 0 | 
 
 
 
 
 
 | 193 | 
       Top = 0 | 
 
 
 
 
 
 | 194 | 
       Width = 150 | 
 
 
 
 
 
 | 195 | 
       Height = 442 | 
 
 
 
 
 
 | 196 | 
       Align = alClient | 
 
 
 
 
 
 | 197 | 
       Caption = '1. Select file' | 
 
 
 
 
 
 | 198 | 
       TabOrder = 1 | 
 
 
 
 
 
 | 199 | 
       object list: TListBox | 
 
 
 
 
 
 | 200 | 
         Left = 2 | 
 
 
 
 
 
 | 201 | 
         Top = 15 | 
 
 
 
 
 
 | 202 | 
         Width = 146 | 
 
 
 
 
 
 | 203 | 
         Height = 337 | 
 
 
 
 
 
 | 204 | 
         Align = alClient | 
 
 
 
 
 
 | 205 | 
         ItemHeight = 13 | 
 
 
 
 
 
 | 206 | 
         TabOrder = 0 | 
 
 
 
 
 
 | 207 | 
         OnClick = listClick | 
 
 
 
 
 
 | 208 | 
       end | 
 
 
 
 
 
 | 209 | 
       object panel_extension: TPanel | 
 
 
 
 
 
 | 210 | 
         Left = 2 | 
 
 
 
 
 
 | 211 | 
         Top = 352 | 
 
 
 
 
 
 | 212 | 
         Width = 146 | 
 
 
 
 
 
 | 213 | 
         Height = 88 | 
 
 
 
 
 
 | 214 | 
         Align = alBottom | 
 
 
 
 
 
 | 215 | 
         BevelOuter = bvNone | 
 
 
 
 
 
 | 216 | 
         TabOrder = 1 | 
 
 
 
 
 
 | 217 | 
         OnResize = panel_extensionResize | 
 
 
 
 
 
 | 218 | 
         object lbl_filter: TLabel | 
 
 
 
 
 
 | 219 | 
           Left = 2 | 
 
 
 
 
 
 | 220 | 
           Top = 46 | 
 
 
 
 
 
 | 221 | 
           Width = 100 | 
 
 
 
 
 
 | 222 | 
           Height = 17 | 
 
 
 
 
 
 | 223 | 
           AutoSize = False | 
 
 
 
 
 
 | 224 | 
           Caption = 'Filter by &extension:' | 
 
 
 
 
 
 | 225 | 
           FocusControl = combo_extension | 
 
 
 
 
 
 | 226 | 
         end | 
 
 
 
 
 
 | 227 | 
         object combo_extension: TComboBox | 
 
 
 
 
 
 | 228 | 
           Left = 2 | 
 
 
 
 
 
 | 229 | 
           Top = 60 | 
 
 
 
 
 
 | 230 | 
           Width = 145 | 
 
 
 
 
 
 | 231 | 
           Height = 21 | 
 
 
 
 
 
 | 232 | 
           Style = csDropDownList | 
 
 
 
 
 
 | 233 | 
           DropDownCount = 12 | 
 
 
 
 
 
 | 234 | 
           Font.Charset = DEFAULT_CHARSET | 
 
 
 
 
 
 | 235 | 
           Font.Color = clWindowText | 
 
 
 
 
 
 | 236 | 
           Font.Height = -11 | 
 
 
 
 
 
 | 237 | 
           Font.Name = 'Tahoma' | 
 
 
 
 
 
 | 238 | 
           Font.Style = [] | 
 
 
 
 
 
 | 239 | 
           ItemHeight = 0 | 
 
 
 
 
 
 | 240 | 
           ParentFont = False | 
 
 
 
 
 
 | 241 | 
           Sorted = True | 
 
 
 
 
 
 | 242 | 
           TabOrder = 2 | 
 
 
 
 
 
 | 243 | 
           OnClick = combo_extensionClick | 
 
 
 
 
 
 | 244 | 
         end | 
 
 
 
 
 
 | 245 | 
         object edit_filtername: TEdit | 
 
 
 
 
 
 | 246 | 
           Left = 2 | 
 
 
 
 
 
 | 247 | 
           Top = 20 | 
 
 
 
 
 
 | 248 | 
           Width = 145 | 
 
 
 
 
 
 | 249 | 
           Height = 18 | 
 
 
 
 
 
 | 250 | 
           AutoSize = False | 
 
 
 
 
 
 | 251 | 
           TabOrder = 1 | 
 
 
 
 
 
 | 252 | 
         end | 
 
 
 
 
 
 | 253 | 
         object check_filtername: TCheckBox | 
 
 
 
 
 
 | 254 | 
           Left = 2 | 
 
 
 
 
 
 | 255 | 
           Top = 5 | 
 
 
 
 
 
 | 256 | 
           Width = 130 | 
 
 
 
 
 
 | 257 | 
           Height = 15 | 
 
 
 
 
 
 | 258 | 
           Caption = 'Filter by file&name:' | 
 
 
 
 
 
 | 259 | 
           TabOrder = 0 | 
 
 
 
 
 
 | 260 | 
           OnClick = check_filternameClick | 
 
 
 
 
 
 | 261 | 
         end | 
 
 
 
 
 
 | 262 | 
       end | 
 
 
 
 
 
 | 263 | 
     end | 
 
 
 
 
 
 | 264 | 
     object GroupBox1: TGroupBox | 
 
 
 
 
 
 | 265 | 
       Left = 0 | 
 
 
 
 
 
 | 266 | 
       Top = 451 | 
 
 
 
 
 
 | 267 | 
       Width = 150 | 
 
 
 
 
 
 | 268 | 
       Height = 129 | 
 
 
 
 
 
 | 269 | 
       Align = alBottom | 
 
 
 
 
 
 | 270 | 
       Caption = '2. Select .dat-link-offset' | 
 
 
 
 
 
 | 271 | 
       TabOrder = 2 | 
 
 
 
 
 
 | 272 | 
       object list_offset: TListBox | 
 
 
 
 
 
 | 273 | 
         Left = 2 | 
 
 
 
 
 
 | 274 | 
         Top = 15 | 
 
 
 
 
 
 | 275 | 
         Width = 146 | 
 
 
 
 
 
 | 276 | 
         Height = 112 | 
 
 
 
 
 
 | 277 | 
         Align = alClient | 
 
 
 
 
 
 | 278 | 
         ItemHeight = 13 | 
 
 
 
 
 
 | 279 | 
         TabOrder = 0 | 
 
 
 
 
 
 | 280 | 
         OnClick = list_offsetClick | 
 
 
 
 
 
 | 281 | 
       end | 
 
 
 
 
 
 | 282 | 
     end | 
 
 
 
 
 
 | 283 | 
   end | 
 
 
 
 
 
 | 284 | 
   object value_viewer_context: TPopupMenu | 
 
 
 
 
 
 | 285 | 
     AutoHotkeys = maManual | 
 
 
 
 
 
 | 286 | 
     OnPopup = value_viewer_contextPopup | 
 
 
 
 
 
 | 287 | 
     Left = 368 | 
 
 
 
 
 
 | 288 | 
     Top = 264 | 
 
 
 
 
 
 | 289 | 
     object value_viewer_context_copy: TMenuItem | 
 
 
 
 
 
 | 290 | 
       Caption = 'Copy to &clipboard' | 
 
 
 
 
 
 | 291 | 
       OnClick = value_viewer_context_copyClick | 
 
 
 
 
 
 | 292 | 
     end | 
 
 
 
 
 
 | 293 | 
     object value_viewer_context_copyasdec: TMenuItem | 
 
 
 
 
 
 | 294 | 
       Caption = 'Copy to clipboard (as &dec)' | 
 
 
 
 
 
 | 295 | 
       OnClick = value_viewer_context_copyClick | 
 
 
 
 
 
 | 296 | 
     end | 
 
 
 
 
 
 | 297 | 
     object value_viewer_context_copyasfloat: TMenuItem | 
 
 
 
 
 
 | 298 | 
       Caption = 'Copy to clipboard (as &float)' | 
 
 
 
 
 
 | 299 | 
       OnClick = value_viewer_context_copyClick | 
 
 
 
 
 
 | 300 | 
     end | 
 
 
 
 
 
 | 301 | 
     object value_viewer_context_copyasbitset: TMenuItem | 
 
 
 
 
 
 | 302 | 
       Caption = 'Copy to clipboard (as &bitset)' | 
 
 
 
 
 
 | 303 | 
       OnClick = value_viewer_context_copyClick | 
 
 
 
 
 
 | 304 | 
     end | 
 
 
 
 
 
 | 305 | 
     object value_viewer_context_copyasstring: TMenuItem | 
 
 
 
 
 
 | 306 | 
       Caption = 'Copy to clipboard (as &string)' | 
 
 
 
 
 
 | 307 | 
       OnClick = value_viewer_context_copyClick | 
 
 
 
 
 
 | 308 | 
     end | 
 
 
 
 
 
 | 309 | 
     object value_viewer_context_copyashex: TMenuItem | 
 
 
 
 
 
 | 310 | 
       Caption = 'Copy to clipboard (as &hex)' | 
 
 
 
 
 
 | 311 | 
       OnClick = value_viewer_context_copyClick | 
 
 
 
 
 
 | 312 | 
     end | 
 
 
 
 
 
 | 313 | 
   end | 
 
 
 
 
 
 | 314 | 
   object opend: TOpenDialog | 
 
 
 
 
 
 | 315 | 
     Options = [ofPathMustExist, ofFileMustExist, ofEnableSizing] | 
 
 
 
 
 
 | 316 | 
     Left = 120 | 
 
 
 
 
 
 | 317 | 
     Top = 584 | 
 
 
 
 
 
 | 318 | 
   end | 
 
 
 
 
 
 | 319 | 
   object saved: TSaveDialog | 
 
 
 
 
 
 | 320 | 
     Options = [ofOverwritePrompt, ofPathMustExist, ofEnableSizing] | 
 
 
 
 
 
 | 321 | 
     Left = 120 | 
 
 
 
 
 
 | 322 | 
     Top = 608 | 
 
 
 
 
 
 | 323 | 
   end | 
 
 
 
 
 
 | 324 | 
 end |