| 1 | object Form8: TForm8 | 
 
 
 
 
 | 2 | Left = 0 | 
 
 
 
 
 | 3 | Top = 0 | 
 
 
 
 
 | 4 | Width = 650 | 
 
 
 
 
 | 5 | Height = 450 | 
 
 
 
 
 | 6 | Caption = 'Binary .dat-Editor' | 
 
 
 
 
 | 7 | Color = clBtnFace | 
 
 
 
 
 | 8 | Font.Charset = DEFAULT_CHARSET | 
 
 
 
 
 | 9 | Font.Color = clWindowText | 
 
 
 
 
 | 10 | Font.Height = -11 | 
 
 
 
 
 | 11 | Font.Name = 'Tahoma' | 
 
 
 
 
 | 12 | Font.Style = [] | 
 
 
 
 
 | 13 | FormStyle = fsMDIChild | 
 
 
 
 
 | 14 | OldCreateOrder = False | 
 
 
 
 
 | 15 | Visible = True | 
 
 
 
 
 | 16 | OnActivate = FormActivate | 
 
 
 
 
 | 17 | OnClose = FormClose | 
 
 
 
 
 | 18 | OnCloseQuery = FormCloseQuery | 
 
 
 
 
 | 19 | OnCreate = FormCreate | 
 
 
 
 
 | 20 | OnResize = FormResize | 
 
 
 
 
 | 21 | PixelsPerInch = 96 | 
 
 
 
 
 | 22 | TextHeight = 13 | 
 
 
 
 
 | 23 | object Splitter1: TSplitter | 
 
 
 
 
 | 24 | Left = 150 | 
 
 
 
 
 | 25 | Top = 0 | 
 
 
 
 
 | 26 | Width = 9 | 
 
 
 
 
 | 27 | Height = 423 | 
 
 
 
 
 | 28 | AutoSnap = False | 
 
 
 
 
 | 29 | Beveled = True | 
 
 
 
 
 | 30 | MinSize = 150 | 
 
 
 
 
 | 31 | end | 
 
 
 
 
 | 32 | object panel_data: TPanel | 
 
 
 
 
 | 33 | Left = 159 | 
 
 
 
 
 | 34 | Top = 0 | 
 
 
 
 
 | 35 | Width = 483 | 
 
 
 
 
 | 36 | Height = 423 | 
 
 
 
 
 | 37 | Align = alClient | 
 
 
 
 
 | 38 | BevelOuter = bvNone | 
 
 
 
 
 | 39 | TabOrder = 0 | 
 
 
 
 
 | 40 | OnResize = panel_dataResize | 
 
 
 
 
 | 41 | object Splitter2: TSplitter | 
 
 
 
 
 | 42 | Left = 0 | 
 
 
 
 
 | 43 | Top = 300 | 
 
 
 
 
 | 44 | Width = 483 | 
 
 
 
 
 | 45 | Height = 9 | 
 
 
 
 
 | 46 | Cursor = crVSplit | 
 
 
 
 
 | 47 | Align = alTop | 
 
 
 
 
 | 48 | AutoSnap = False | 
 
 
 
 
 | 49 | Beveled = True | 
 
 
 
 
 | 50 | MinSize = 100 | 
 
 
 
 
 | 51 | end | 
 
 
 
 
 | 52 | object hex: TMPHexEditor | 
 
 
 
 
 | 53 | Left = 0 | 
 
 
 
 
 | 54 | Top = 0 | 
 
 
 
 
 | 55 | Width = 483 | 
 
 
 
 
 | 56 | Height = 300 | 
 
 
 
 
 | 57 | Cursor = crIBeam | 
 
 
 
 
 | 58 | Align = alTop | 
 
 
 
 
 | 59 | Font.Charset = DEFAULT_CHARSET | 
 
 
 
 
 | 60 | Font.Color = clWindowText | 
 
 
 
 
 | 61 | Font.Height = -16 | 
 
 
 
 
 | 62 | Font.Name = 'Courier' | 
 
 
 
 
 | 63 | Font.Style = [] | 
 
 
 
 
 | 64 | ParentFont = False | 
 
 
 
 
 | 65 | TabOrder = 0 | 
 
 
 
 
 | 66 | BytesPerRow = 16 | 
 
 
 
 
 | 67 | Translation = tkASCII | 
 
 
 
 
 | 68 | OffsetFormat = '6!10:0x|' | 
 
 
 
 
 | 69 | Colors.Background = clWindow | 
 
 
 
 
 | 70 | Colors.ChangedBackground = clWindow | 
 
 
 
 
 | 71 | Colors.ChangedText = clRed | 
 
 
 
 
 | 72 | Colors.CursorFrame = clNavy | 
 
 
 
 
 | 73 | Colors.Offset = clBlack | 
 
 
 
 
 | 74 | Colors.OddColumn = clBlue | 
 
 
 
 
 | 75 | Colors.EvenColumn = clNavy | 
 
 
 
 
 | 76 | Colors.CurrentOffsetBackground = clBtnShadow | 
 
 
 
 
 | 77 | Colors.OffsetBackGround = clBtnFace | 
 
 
 
 
 | 78 | Colors.CurrentOffset = clBtnHighlight | 
 
 
 
 
 | 79 | Colors.Grid = clBtnFace | 
 
 
 
 
 | 80 | Colors.NonFocusCursorFrame = clAqua | 
 
 
 
 
 | 81 | Colors.ActiveFieldBackground = clWindow | 
 
 
 
 
 | 82 | FocusFrame = True | 
 
 
 
 
 | 83 | AllowInsertMode = False | 
 
 
 
 
 | 84 | DrawGridLines = False | 
 
 
 
 
 | 85 | Version = 'May 23, 2005; '#169' markus stephany, vcl[at]mirkes[dot]de' | 
 
 
 
 
 | 86 | OnChange = hexChange | 
 
 
 
 
 | 87 | ShowPositionIfNotFocused = True | 
 
 
 
 
 | 88 | OnSelectionChanged = hexSelectionChanged | 
 
 
 
 
 | 89 | end | 
 
 
 
 
 | 90 | object structs: TWrapGrid | 
 
 
 
 
 | 91 | Left = 0 | 
 
 
 
 
 | 92 | Top = 309 | 
 
 
 
 
 | 93 | Width = 483 | 
 
 
 
 
 | 94 | Height = 114 | 
 
 
 
 
 | 95 | Align = alClient | 
 
 
 
 
 | 96 | DefaultColWidth = 92 | 
 
 
 
 
 | 97 | DefaultRowHeight = 18 | 
 
 
 
 
 | 98 | FixedCols = 0 | 
 
 
 
 
 | 99 | Options = [goFixedVertLine, goFixedHorzLine, goVertLine, goHorzLine] | 
 
 
 
 
 | 100 | TabOrder = 1 | 
 
 
 
 
 | 101 | OnClick = structsClick | 
 
 
 
 
 | 102 | end | 
 
 
 
 
 | 103 | end | 
 
 
 
 
 | 104 | object panel_files: TPanel | 
 
 
 
 
 | 105 | Left = 0 | 
 
 
 
 
 | 106 | Top = 0 | 
 
 
 
 
 | 107 | Width = 150 | 
 
 
 
 
 | 108 | Height = 423 | 
 
 
 
 
 | 109 | Align = alLeft | 
 
 
 
 
 | 110 | BevelOuter = bvNone | 
 
 
 
 
 | 111 | TabOrder = 1 | 
 
 
 
 
 | 112 | object Bevel1: TBevel | 
 
 
 
 
 | 113 | Left = 0 | 
 
 
 
 
 | 114 | Top = 359 | 
 
 
 
 
 | 115 | Width = 150 | 
 
 
 
 
 | 116 | Height = 6 | 
 
 
 
 
 | 117 | Align = alBottom | 
 
 
 
 
 | 118 | Style = bsRaised | 
 
 
 
 
 | 119 | end | 
 
 
 
 
 | 120 | object list: TListBox | 
 
 
 
 
 | 121 | Left = 0 | 
 
 
 
 
 | 122 | Top = 0 | 
 
 
 
 
 | 123 | Width = 150 | 
 
 
 
 
 | 124 | Height = 315 | 
 
 
 
 
 | 125 | Align = alClient | 
 
 
 
 
 | 126 | ItemHeight = 13 | 
 
 
 
 
 | 127 | TabOrder = 0 | 
 
 
 
 
 | 128 | OnClick = listClick | 
 
 
 
 
 | 129 | end | 
 
 
 
 
 | 130 | object panel_extension: TPanel | 
 
 
 
 
 | 131 | Left = 0 | 
 
 
 
 
 | 132 | Top = 315 | 
 
 
 
 
 | 133 | Width = 150 | 
 
 
 
 
 | 134 | Height = 44 | 
 
 
 
 
 | 135 | Align = alBottom | 
 
 
 
 
 | 136 | BevelOuter = bvNone | 
 
 
 
 
 | 137 | TabOrder = 1 | 
 
 
 
 
 | 138 | OnResize = panel_extensionResize | 
 
 
 
 
 | 139 | object Label1: TLabel | 
 
 
 
 
 | 140 | Left = 2 | 
 
 
 
 
 | 141 | Top = 4 | 
 
 
 
 
 | 142 | Width = 100 | 
 
 
 
 
 | 143 | Height = 17 | 
 
 
 
 
 | 144 | AutoSize = False | 
 
 
 
 
 | 145 | Caption = 'Filter by extension:' | 
 
 
 
 
 | 146 | end | 
 
 
 
 
 | 147 | object combo_extension: TComboBox | 
 
 
 
 
 | 148 | Left = 2 | 
 
 
 
 
 | 149 | Top = 20 | 
 
 
 
 
 | 150 | Width = 145 | 
 
 
 
 
 | 151 | Height = 21 | 
 
 
 
 
 | 152 | Style = csDropDownList | 
 
 
 
 
 | 153 | DropDownCount = 12 | 
 
 
 
 
 | 154 | Font.Charset = DEFAULT_CHARSET | 
 
 
 
 
 | 155 | Font.Color = clWindowText | 
 
 
 
 
 | 156 | Font.Height = -11 | 
 
 
 
 
 | 157 | Font.Name = 'Tahoma' | 
 
 
 
 
 | 158 | Font.Style = [] | 
 
 
 
 
 | 159 | ItemHeight = 13 | 
 
 
 
 
 | 160 | ParentFont = False | 
 
 
 
 
 | 161 | Sorted = True | 
 
 
 
 
 | 162 | TabOrder = 0 | 
 
 
 
 
 | 163 | OnClick = combo_extensionClick | 
 
 
 
 
 | 164 | end | 
 
 
 
 
 | 165 | end | 
 
 
 
 
 | 166 | object panel_imexport: TPanel | 
 
 
 
 
 | 167 | Left = 0 | 
 
 
 
 
 | 168 | Top = 365 | 
 
 
 
 
 | 169 | Width = 150 | 
 
 
 
 
 | 170 | Height = 58 | 
 
 
 
 
 | 171 | Align = alBottom | 
 
 
 
 
 | 172 | BevelOuter = bvNone | 
 
 
 
 
 | 173 | TabOrder = 2 | 
 
 
 
 
 | 174 | OnResize = panel_imexportResize | 
 
 
 
 
 | 175 | object btn_export: TButton | 
 
 
 
 
 | 176 | Left = 4 | 
 
 
 
 
 | 177 | Top = 4 | 
 
 
 
 
 | 178 | Width = 142 | 
 
 
 
 
 | 179 | Height = 25 | 
 
 
 
 
 | 180 | Caption = '&Export to file...' | 
 
 
 
 
 | 181 | TabOrder = 0 | 
 
 
 
 
 | 182 | OnClick = btn_exportClick | 
 
 
 
 
 | 183 | end | 
 
 
 
 
 | 184 | object btn_import: TButton | 
 
 
 
 
 | 185 | Left = 4 | 
 
 
 
 
 | 186 | Top = 32 | 
 
 
 
 
 | 187 | Width = 142 | 
 
 
 
 
 | 188 | Height = 25 | 
 
 
 
 
 | 189 | Caption = '&Import from file...' | 
 
 
 
 
 | 190 | TabOrder = 1 | 
 
 
 
 
 | 191 | OnClick = btn_importClick | 
 
 
 
 
 | 192 | end | 
 
 
 
 
 | 193 | end | 
 
 
 
 
 | 194 | end | 
 
 
 
 
 | 195 | object opend: TOpenDialog | 
 
 
 
 
 | 196 | Options = [ofPathMustExist, ofFileMustExist, ofEnableSizing] | 
 
 
 
 
 | 197 | Left = 120 | 
 
 
 
 
 | 198 | Top = 392 | 
 
 
 
 
 | 199 | end | 
 
 
 
 
 | 200 | object saved: TSaveDialog | 
 
 
 
 
 | 201 | Options = [ofOverwritePrompt, ofPathMustExist, ofEnableSizing] | 
 
 
 
 
 | 202 | Left = 120 | 
 
 
 
 
 | 203 | Top = 368 | 
 
 
 
 
 | 204 | end | 
 
 
 
 
 | 205 | end |