1object fmMain: TfmMain 2 Left = 326 3 Height = 533 4 Top = 178 5 Width = 902 6 Caption = 'ATBinHex demo' 7 ClientHeight = 533 8 ClientWidth = 902 9 OnCreate = FormCreate 10 Position = poScreenCenter 11 LCLVersion = '1.9.0.0' 12 object PanelOpt: TPanel 13 Left = 708 14 Height = 512 15 Top = 0 16 Width = 194 17 Align = alRight 18 ClientHeight = 512 19 ClientWidth = 194 20 TabOrder = 0 21 object btnOpen: TButton 22 Left = 7 23 Height = 25 24 Top = 11 25 Width = 89 26 Caption = 'open...' 27 OnClick = btnOpenClick 28 TabOrder = 0 29 end 30 object GroupBox1: TGroupBox 31 Left = 7 32 Height = 144 33 Top = 100 34 Width = 149 35 Caption = 'mode' 36 ClientHeight = 125 37 ClientWidth = 145 38 TabOrder = 5 39 object bText: TRadioButton 40 Left = 7 41 Height = 24 42 Top = 0 43 Width = 54 44 Caption = 'text' 45 Checked = True 46 OnChange = bTextChange 47 TabOrder = 0 48 TabStop = True 49 end 50 object bBin: TRadioButton 51 Left = 7 52 Height = 24 53 Top = 24 54 Width = 68 55 Caption = 'binary' 56 OnChange = bBinChange 57 TabOrder = 1 58 end 59 object bHex: TRadioButton 60 Left = 7 61 Height = 24 62 Top = 48 63 Width = 50 64 Caption = 'hex' 65 OnChange = bHexChange 66 TabOrder = 2 67 end 68 object bUni: TRadioButton 69 Left = 7 70 Height = 24 71 Top = 72 72 Width = 79 73 Caption = 'unicode' 74 OnChange = bUniChange 75 TabOrder = 3 76 end 77 object bUniHex: TRadioButton 78 Left = 7 79 Height = 24 80 Top = 96 81 Width = 109 82 Caption = 'unicode/hex' 83 OnChange = bUniHexChange 84 TabOrder = 4 85 end 86 end 87 object btnFont: TButton 88 Left = 7 89 Height = 25 90 Top = 40 91 Width = 89 92 Caption = 'font...' 93 OnClick = btnFontClick 94 TabOrder = 1 95 end 96 object edBin: TSpinEdit 97 Left = 10 98 Height = 27 99 Top = 248 100 Width = 59 101 MaxValue = 160 102 MinValue = 40 103 OnChange = edBinChange 104 TabOrder = 6 105 Value = 80 106 end 107 object Label1: TLabel 108 Left = 80 109 Height = 17 110 Top = 252 111 Width = 83 112 Caption = 'binary width' 113 ParentColor = False 114 end 115 object chkUnpr: TCheckBox 116 Left = 7 117 Height = 24 118 Top = 344 119 Width = 131 120 Caption = 'unprinted chars' 121 OnChange = chkUnprChange 122 TabOrder = 10 123 end 124 object chkGutter: TCheckBox 125 Left = 7 126 Height = 24 127 Top = 324 128 Width = 68 129 Caption = 'gutter' 130 Checked = True 131 OnChange = chkGutterChange 132 State = cbChecked 133 TabOrder = 9 134 end 135 object chkWrap: TCheckBox 136 Left = 7 137 Height = 24 138 Top = 304 139 Width = 60 140 Caption = 'wrap' 141 OnChange = chkWrapChange 142 TabOrder = 8 143 end 144 object chkEn: TCheckBox 145 Left = 7 146 Height = 24 147 Top = 364 148 Width = 80 149 Caption = 'enabled' 150 Checked = True 151 OnChange = chkEnChange 152 State = cbChecked 153 TabOrder = 11 154 end 155 object btnGoto: TButton 156 Left = 104 157 Height = 25 158 Top = 11 159 Width = 83 160 Caption = 'go to...' 161 OnClick = btnGotoClick 162 TabOrder = 2 163 end 164 object chkEnSel: TCheckBox 165 Left = 7 166 Height = 24 167 Top = 384 168 Width = 102 169 Caption = 'enabled sel' 170 Checked = True 171 OnChange = chkEnSelChange 172 State = cbChecked 173 TabOrder = 12 174 end 175 object edTabsize: TSpinEdit 176 Left = 10 177 Height = 27 178 Top = 275 179 Width = 59 180 MaxValue = 12 181 MinValue = 2 182 OnChange = edTabsizeChange 183 TabOrder = 7 184 Value = 8 185 end 186 object Label2: TLabel 187 Left = 79 188 Height = 17 189 Top = 280 190 Width = 52 191 Caption = 'tab size' 192 ParentColor = False 193 end 194 object btnFind: TButton 195 Left = 104 196 Height = 25 197 Top = 40 198 Width = 83 199 Caption = 'find...' 200 OnClick = btnFindClick 201 TabOrder = 3 202 end 203 object btnFindNext: TButton 204 Left = 104 205 Height = 25 206 Top = 70 207 Width = 83 208 Caption = 'find next' 209 Enabled = False 210 OnClick = btnFindNextClick 211 TabOrder = 4 212 end 213 end 214 object StatusBar1: TStatusBar 215 Left = 0 216 Height = 21 217 Top = 512 218 Width = 902 219 Panels = < 220 item 221 Alignment = taCenter 222 Text = 'pos' 223 Width = 200 224 end 225 item 226 Alignment = taCenter 227 Text = 'encoding' 228 Width = 200 229 end 230 item 231 Width = 50 232 end> 233 SimplePanel = False 234 end 235 object OpenDialog1: TOpenDialog 236 left = 480 237 top = 16 238 end 239 object FontDialog1: TFontDialog 240 MinFontSize = 0 241 MaxFontSize = 0 242 left = 472 243 top = 64 244 end 245end 246