| 7 | 
   | 
   TextHeight = 13 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 8 | 
   | 
   inherited Splitter1: TSplitter | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 9 | 
   | 
     Height = 344 | 
 
 
 
 
 
 
 
 
 | 10 | 
 + | 
     OnMoved = Splitter1Moved | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 11 | 
   | 
     ExplicitHeight = 344 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 12 | 
   | 
   end | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 13 | 
   | 
   inherited panel_files: TPanel | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 83 | 
   | 
       Enabled = False | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 84 | 
   | 
       TabOrder = 0 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 85 | 
   | 
       object image_bmppreview: TImage | 
 
 
 
 
 
 
 
 
 
 
 
 | 86 | 
 < | 
         Left = 2 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 87 | 
 < | 
         Top = 45 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 88 | 
 < | 
         Width = 279 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 89 | 
 < | 
         Height = 297 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 86 | 
 > | 
         AlignWithMargins = True | 
 
 
 
 
 
 | 87 | 
 > | 
         Left = 5 | 
 
 
 
 
 
 | 88 | 
 > | 
         Top = 48 | 
 
 
 
 
 
 | 89 | 
 > | 
         Width = 273 | 
 
 
 
 
 
 | 90 | 
 > | 
         Height = 291 | 
 
 
 
 
 
 
 
 
 
 
 
 | 91 | 
   | 
         Align = alClient | 
 
 
 
 
 
 
 
 
 | 92 | 
 + | 
         ExplicitLeft = 2 | 
 
 
 
 
 
 
 
 
 | 93 | 
 + | 
         ExplicitTop = 45 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 94 | 
   | 
         ExplicitWidth = 182 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 95 | 
   | 
         ExplicitHeight = 302 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 96 | 
   | 
       end | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 107 | 
   | 
           Top = 2 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 108 | 
   | 
           Width = 121 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 109 | 
   | 
           Height = 25 | 
 
 
 
 
 
 
 
 
 
 
 
 | 110 | 
 < | 
           Caption = 'Load BMP ...' | 
 
 
 
 
 
 
 
 
 
 | 110 | 
 > | 
           Caption = 'Load image...' | 
 
 
 
 
 
 
 
 
 
 
 
 | 111 | 
   | 
           TabOrder = 0 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 112 | 
   | 
           OnClick = btn_loadClick | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 113 | 
   | 
         end | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 138 | 
   | 
       Width = 105 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 139 | 
   | 
       Height = 17 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 140 | 
   | 
       Caption = 'Transparency' | 
 
 
 
 
 
 
 
 
 | 141 | 
 + | 
       Enabled = False | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 142 | 
   | 
       TabOrder = 1 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 143 | 
   | 
     end | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 144 | 
   | 
     object check_fading: TCheckBox | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 158 | 
   | 
   object saved: TSaveDialog [5] | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 159 | 
   | 
     DefaultExt = 'bmp' | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 160 | 
   | 
     Filter =  | 
 
 
 
 
 
 
 
 
 
 
 
 | 161 | 
 < | 
       'All supported files (*.bmp, *.dds)|*.bmp;*.dds|Windows Bitmap (*' + | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 162 | 
 < | 
       '.bmp)|*.bmp|DirectDraw Surface (*.dds)|*.dds|Targa (*.tga)|*.tga' + | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 163 | 
 < | 
       '|JPEG (*.jpg, *.jpeg)|*.jpg;*.jpeg|All files (*.*)|*' | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 161 | 
 > | 
       'All supported files (*.bmp, *.dds, *.tga, *.jpg, *.jpeg, *.png)|' + | 
 
 
 
 
 
 | 162 | 
 > | 
       '*.bmp;*.dds;*.tga;*.jpg;*.jpeg;*.png|Windows Bitmap (*.bmp)|*.bm' + | 
 
 
 
 
 
 | 163 | 
 > | 
       'p|DirectDraw Surface (*.dds)|*.dds|Targa (*.tga)|*.tga|JPEG (*.j' + | 
 
 
 
 
 
 | 164 | 
 > | 
       'pg, *.jpeg)|*.jpg;*.jpeg|PNG (*.png)|*.png|All files (*.*)|*' | 
 
 
 
 
 
 
 
 
 
 
 
 | 165 | 
   | 
     Options = [ofOverwritePrompt, ofHideReadOnly, ofPathMustExist, ofEnableSizing] | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 166 | 
   | 
     Left = 104 | 
 
 
 
 
 
 
 
 
 
 
 
 
 
 | 167 | 
   | 
     Top = 320 |