source: oup/releases/0.12a/src/Unit7_txmpreplace.dfm@ 22

object Form7: TForm7
  Left = 0
  Top = 0
  Width = 400
  Height = 350
  BorderStyle = bsSizeToolWin
  Caption = 'TXMP Replacer'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'Tahoma'
  Font.Style = []
  OldCreateOrder = False
  OnCloseQuery = FormCloseQuery
  OnResize = FormResize
  PixelsPerInch = 96
  TextHeight = 13
  object panel_12: TPanel
    Left = 0
    Top = 0
    Width = 392
    Height = 298
    Align = alClient
    BevelOuter = bvNone
    TabOrder = 0
    object Splitter1: TSplitter
      Left = 200
      Top = 0
      Width = 8
      Height = 298
      AutoSnap = False
      Beveled = True
      MinSize = 150
    end
    object group_txmpselect: TGroupBox
      Left = 0
      Top = 0
      Width = 200
      Height = 298
      Align = alLeft
      Caption = '1. Select TXMP to replace'
      TabOrder = 0
      object splitter_txmp: TSplitter
        Left = 2
        Top = 190
        Width = 196
        Height = 8
        Cursor = crVSplit
        Align = alTop
        AutoSnap = False
        Beveled = True
        MinSize = 60
      end
      object image_txmppreview: TImage
        Left = 2
        Top = 198
        Width = 196
        Height = 98
        Align = alClient
      end
      object list_txmp: TListBox
        Left = 2
        Top = 15
        Width = 196
        Height = 175
        Align = alTop
        ItemHeight = 13
        TabOrder = 0
        OnClick = list_txmpClick
      end
    end
    object group_bmpselect: TGroupBox
      Left = 208
      Top = 0
      Width = 184
      Height = 298
      Align = alClient
      Caption = '2. Open BMP to replace with'
      Enabled = False
      TabOrder = 1
      object image_bmppreview: TImage
        Left = 2
        Top = 45
        Width = 180
        Height = 251
        Align = alClient
      end
      object panel_load: TPanel
        Left = 2
        Top = 15
        Width = 180
        Height = 30
        Align = alTop
        BevelOuter = bvNone
        TabOrder = 0
        object btn_load: TButton
          Left = 2
          Top = 2
          Width = 121
          Height = 25
          Caption = 'Load BMP ...'
          TabOrder = 0
          OnClick = btn_loadClick
        end
      end
    end
  end
  object panel_main: TPanel
    Left = 0
    Top = 298
    Width = 392
    Height = 28
    Align = alBottom
    BevelOuter = bvNone
    Enabled = False
    TabOrder = 1
    object btn_replace: TButton
      Left = 2
      Top = 2
      Width = 185
      Height = 25
      Caption = 'Replace'
      TabOrder = 0
      OnClick = btn_replaceClick
    end
  end
  object opend: TOpenDialog
    Filter = '24bit Bitmap (*.bmp)|*.bmp'
    Options = [ofPathMustExist, ofFileMustExist, ofEnableSizing]
    Left = 352
    Top = 16
  end
end