| 1 | object Form7: TForm7 | 
 
 
 
 
 | 2 | Left = 0 | 
 
 
 
 
 | 3 | Top = 0 | 
 
 
 
 
 | 4 | BorderStyle = bsSingle | 
 
 
 
 
 | 5 | Caption = 'TXMP Replacer' | 
 
 
 
 
 | 6 | ClientHeight = 428 | 
 
 
 
 
 | 7 | ClientWidth = 394 | 
 
 
 
 
 | 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 | OldCreateOrder = False | 
 
 
 
 
 | 16 | Visible = True | 
 
 
 
 
 | 17 | OnClose = FormClose | 
 
 
 
 
 | 18 | OnResize = FormResize | 
 
 
 
 
 | 19 | PixelsPerInch = 96 | 
 
 
 
 
 | 20 | TextHeight = 13 | 
 
 
 
 
 | 21 | object panel_12: TPanel | 
 
 
 
 
 | 22 | Left = 0 | 
 
 
 
 
 | 23 | Top = 0 | 
 
 
 
 
 | 24 | Width = 394 | 
 
 
 
 
 | 25 | Height = 349 | 
 
 
 
 
 | 26 | Align = alClient | 
 
 
 
 
 | 27 | BevelOuter = bvNone | 
 
 
 
 
 | 28 | TabOrder = 0 | 
 
 
 
 
 | 29 | object Splitter1: TSplitter | 
 
 
 
 
 | 30 | Left = 200 | 
 
 
 
 
 | 31 | Top = 0 | 
 
 
 
 
 | 32 | Width = 8 | 
 
 
 
 
 | 33 | Height = 349 | 
 
 
 
 
 | 34 | AutoSnap = False | 
 
 
 
 
 | 35 | Beveled = True | 
 
 
 
 
 | 36 | MinSize = 150 | 
 
 
 
 
 | 37 | end | 
 
 
 
 
 | 38 | object group_txmpselect: TGroupBox | 
 
 
 
 
 | 39 | Left = 0 | 
 
 
 
 
 | 40 | Top = 0 | 
 
 
 
 
 | 41 | Width = 200 | 
 
 
 
 
 | 42 | Height = 349 | 
 
 
 
 
 | 43 | Align = alLeft | 
 
 
 
 
 | 44 | Caption = '1. Select TXMP to replace' | 
 
 
 
 
 | 45 | TabOrder = 0 | 
 
 
 
 
 | 46 | object splitter_txmp: TSplitter | 
 
 
 
 
 | 47 | Left = 2 | 
 
 
 
 
 | 48 | Top = 190 | 
 
 
 
 
 | 49 | Width = 196 | 
 
 
 
 
 | 50 | Height = 8 | 
 
 
 
 
 | 51 | Cursor = crVSplit | 
 
 
 
 
 | 52 | Align = alTop | 
 
 
 
 
 | 53 | AutoSnap = False | 
 
 
 
 
 | 54 | Beveled = True | 
 
 
 
 
 | 55 | MinSize = 60 | 
 
 
 
 
 | 56 | end | 
 
 
 
 
 | 57 | object image_txmppreview: TImage | 
 
 
 
 
 | 58 | Left = 2 | 
 
 
 
 
 | 59 | Top = 198 | 
 
 
 
 
 | 60 | Width = 196 | 
 
 
 
 
 | 61 | Height = 149 | 
 
 
 
 
 | 62 | Align = alClient | 
 
 
 
 
 | 63 | end | 
 
 
 
 
 | 64 | object list_txmp: TListBox | 
 
 
 
 
 | 65 | Left = 2 | 
 
 
 
 
 | 66 | Top = 15 | 
 
 
 
 
 | 67 | Width = 196 | 
 
 
 
 
 | 68 | Height = 175 | 
 
 
 
 
 | 69 | Align = alTop | 
 
 
 
 
 | 70 | ItemHeight = 13 | 
 
 
 
 
 | 71 | TabOrder = 0 | 
 
 
 
 
 | 72 | OnClick = list_txmpClick | 
 
 
 
 
 | 73 | end | 
 
 
 
 
 | 74 | end | 
 
 
 
 
 | 75 | object group_bmpselect: TGroupBox | 
 
 
 
 
 | 76 | Left = 208 | 
 
 
 
 
 | 77 | Top = 0 | 
 
 
 
 
 | 78 | Width = 186 | 
 
 
 
 
 | 79 | Height = 349 | 
 
 
 
 
 | 80 | Align = alClient | 
 
 
 
 
 | 81 | Caption = '2. Open BMP to replace with' | 
 
 
 
 
 | 82 | Enabled = False | 
 
 
 
 
 | 83 | TabOrder = 1 | 
 
 
 
 
 | 84 | object image_bmppreview: TImage | 
 
 
 
 
 | 85 | Left = 2 | 
 
 
 
 
 | 86 | Top = 45 | 
 
 
 
 
 | 87 | Width = 182 | 
 
 
 
 
 | 88 | Height = 302 | 
 
 
 
 
 | 89 | Align = alClient | 
 
 
 
 
 | 90 | end | 
 
 
 
 
 | 91 | object panel_load: TPanel | 
 
 
 
 
 | 92 | Left = 2 | 
 
 
 
 
 | 93 | Top = 15 | 
 
 
 
 
 | 94 | Width = 182 | 
 
 
 
 
 | 95 | Height = 30 | 
 
 
 
 
 | 96 | Align = alTop | 
 
 
 
 
 | 97 | BevelOuter = bvNone | 
 
 
 
 
 | 98 | TabOrder = 0 | 
 
 
 
 
 | 99 | object btn_load: TButton | 
 
 
 
 
 | 100 | Left = 2 | 
 
 
 
 
 | 101 | Top = 2 | 
 
 
 
 
 | 102 | Width = 121 | 
 
 
 
 
 | 103 | Height = 25 | 
 
 
 
 
 | 104 | Caption = 'Load BMP ...' | 
 
 
 
 
 | 105 | TabOrder = 0 | 
 
 
 
 
 | 106 | OnClick = btn_loadClick | 
 
 
 
 
 | 107 | end | 
 
 
 
 
 | 108 | end | 
 
 
 
 
 | 109 | end | 
 
 
 
 
 | 110 | end | 
 
 
 
 
 | 111 | object group_options: TGroupBox | 
 
 
 
 
 | 112 | Left = 0 | 
 
 
 
 
 | 113 | Top = 349 | 
 
 
 
 
 | 114 | Width = 394 | 
 
 
 
 
 | 115 | Height = 79 | 
 
 
 
 
 | 116 | Align = alBottom | 
 
 
 
 
 | 117 | Caption = '3. Options && Replace' | 
 
 
 
 
 | 118 | Enabled = False | 
 
 
 
 
 | 119 | TabOrder = 1 | 
 
 
 
 
 | 120 | object btn_replace: TButton | 
 
 
 
 
 | 121 | Left = 4 | 
 
 
 
 
 | 122 | Top = 50 | 
 
 
 
 
 | 123 | Width = 157 | 
 
 
 
 
 | 124 | Height = 25 | 
 
 
 
 
 | 125 | Caption = 'Replace' | 
 
 
 
 
 | 126 | TabOrder = 0 | 
 
 
 
 
 | 127 | OnClick = btn_replaceClick | 
 
 
 
 
 | 128 | end | 
 
 
 
 
 | 129 | object check_transparency: TCheckBox | 
 
 
 
 
 | 130 | Left = 8 | 
 
 
 
 
 | 131 | Top = 16 | 
 
 
 
 
 | 132 | Width = 105 | 
 
 
 
 
 | 133 | Height = 17 | 
 
 
 
 
 | 134 | Caption = 'Transparency' | 
 
 
 
 
 | 135 | TabOrder = 1 | 
 
 
 
 
 | 136 | end | 
 
 
 
 
 | 137 | object check_fading: TCheckBox | 
 
 
 
 
 | 138 | Left = 8 | 
 
 
 
 
 | 139 | Top = 32 | 
 
 
 
 
 | 140 | Width = 105 | 
 
 
 
 
 | 141 | Height = 17 | 
 
 
 
 
 | 142 | Caption = 'Fading' | 
 
 
 
 
 | 143 | TabOrder = 2 | 
 
 
 
 
 | 144 | end | 
 
 
 
 
 | 145 | object check_32bit: TCheckBox | 
 
 
 
 
 | 146 | Left = 112 | 
 
 
 
 
 | 147 | Top = 16 | 
 
 
 
 
 | 148 | Width = 105 | 
 
 
 
 
 | 149 | Height = 17 | 
 
 
 
 
 | 150 | Hint = 'Import bitmap as 32bit image (to prevent from quality loss)' | 
 
 
 
 
 | 151 | Caption = '32bit' | 
 
 
 
 
 | 152 | ParentShowHint = False | 
 
 
 
 
 | 153 | ShowHint = True | 
 
 
 
 
 | 154 | TabOrder = 3 | 
 
 
 
 
 | 155 | end | 
 
 
 
 
 | 156 | end | 
 
 
 
 
 | 157 | object opend: TOpenDialog | 
 
 
 
 
 | 158 | Filter = '24bit Bitmap (*.bmp)|*.bmp' | 
 
 
 
 
 | 159 | Options = [ofPathMustExist, ofFileMustExist, ofEnableSizing] | 
 
 
 
 
 | 160 | Left = 352 | 
 
 
 
 
 | 161 | Top = 16 | 
 
 
 
 
 | 162 | end | 
 
 
 
 
 | 163 | end |