object MainForm: TMainForm
  Left = 615
  Top = 0
  Caption = 'ChromaKey Demo - www.ImageEn.com'
  ClientHeight = 775
  ClientWidth = 854
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poScreenCenter
  WindowState = wsMaximized
  OnCreate = FormCreate
  OnDestroy = FormDestroy
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 313
    Height = 662
    Align = alLeft
    ParentShowHint = False
    ShowHint = True
    TabOrder = 0
    object lblBackgrounds: TLabel
      Left = 9
      Top = 8
      Width = 66
      Height = 13
      Caption = 'Backgrounds:'
    end
    object lblForegrounds: TLabel
      Left = 9
      Top = 151
      Width = 62
      Height = 13
      Caption = 'Foregrounds:'
    end
    object lblTolerance: TLabel
      Left = 9
      Top = 503
      Width = 51
      Height = 13
      Caption = 'Tolerance:'
    end
    object lblSaturation: TLabel
      Left = 9
      Top = 537
      Width = 51
      Height = 13
      Caption = 'Saturation:'
    end
    object lblEdgeFeather: TLabel
      Left = 9
      Top = 574
      Width = 81
      Height = 13
      Caption = 'Edge Feathering:'
    end
    object lblBackground: TLabel
      Left = 9
      Top = 475
      Width = 61
      Height = 13
      Caption = 'Background:'
    end
    object lblHueReduction: TLabel
      Left = 9
      Top = 603
      Width = 75
      Height = 13
      Caption = 'Hue Reduction:'
    end
    object lbxBackgrounds: TListBox
      Left = 9
      Top = 24
      Width = 294
      Height = 113
      ItemHeight = 13
      Sorted = True
      TabOrder = 0
      OnClick = lbxBackgroundsClick
    end
    object lbxForegrounds: TListBox
      Left = 9
      Top = 167
      Width = 294
      Height = 152
      ItemHeight = 13
      Sorted = True
      TabOrder = 1
      OnClick = lbxForegroundsClick
    end
    object trkTolerance: TTrackBar
      Left = 88
      Top = 498
      Width = 219
      Height = 29
      Hint = 'How closely colors similar to the background color are removed'
      Max = 1000
      Min = 1
      PageSize = 10
      Frequency = 10
      Position = 800
      TabOrder = 4
      TickStyle = tsManual
      OnChange = trkToleranceChange
    end
    object ProgressBar1: TProgressBar
      Left = 7
      Top = 696
      Width = 195
      Height = 17
      TabOrder = 11
      Visible = False
    end
    object chkRemoveNoise: TCheckBox
      Left = 9
      Top = 627
      Width = 106
      Height = 17
      Hint = 'Remove isolated pixels'
      Caption = 'Remove Noise'
      TabOrder = 9
      OnClick = ControlChange
    end
    object trkSaturation: TTrackBar
      Left = 88
      Top = 533
      Width = 219
      Height = 26
      Hint = 
        'Limit the removal of background to pixels of a similar saturatio' +
        'n '
      Max = 99
      Frequency = 5
      Position = 50
      TabOrder = 5
      OnChange = ControlChange
    end
    object pnlKeyColor: TPanel
      Left = 95
      Top = 470
      Width = 26
      Height = 23
      Hint = 'The "Green-Screen" (background) color'
      ParentBackground = False
      TabOrder = 3
    end
    object btnReset: TButton
      Left = 227
      Top = 631
      Width = 75
      Height = 25
      Hint = 'Return to default settings'
      Caption = 'Reset'
      TabOrder = 10
      OnClick = btnResetClick
    end
    object edtEdgeFeather: TEdit
      Left = 98
      Top = 570
      Width = 33
      Height = 21
      Hint = 'Soften the edges of the subject'
      TabStop = False
      ReadOnly = True
      TabOrder = 6
      Text = '0'
      OnChange = ControlChange
    end
    object updEdgeFeather: TUpDown
      Left = 131
      Top = 570
      Width = 16
      Height = 21
      Associate = edtEdgeFeather
      Max = 8
      TabOrder = 7
    end
    object memInfo: TMemo
      Left = 9
      Top = 341
      Width = 294
      Height = 79
      TabStop = False
      BevelInner = bvNone
      BevelOuter = bvNone
      BorderStyle = bsNone
      Color = clBtnFace
      Ctl3D = True
      Lines.Strings = (
        'METHOD:'
        '1. Select background color'
        '2. Adjust tolerance until foreground is fully visible'
        '3. Adjust saturation to remove any remaining background'
        '4. If necessary, remove hue, noise and adjust feathering')
      ParentCtl3D = False
      ReadOnly = True
      TabOrder = 2
    end
    object cmbHueReduction: TComboBox
      Left = 98
      Top = 599
      Width = 84
      Height = 21
      Hint = 'Reduce the amount of background hue within the image'
      Style = csDropDownList
      TabOrder = 8
      OnChange = ControlChange
      Items.Strings = (
        'None'
        '1 (Min)'
        '2'
        '3'
        '4'
        '5 (Max)')
    end
    object rdbSetBackground: TRadioButton
      Left = 9
      Top = 418
      Width = 128
      Height = 17
      Caption = 'Set background color:'
      Checked = True
      TabOrder = 12
      TabStop = True
      OnClick = CursorControlChange
    end
    object rdbMoveForeground: TRadioButton
      Left = 9
      Top = 443
      Width = 158
      Height = 17
      Caption = 'Move Foreground (subject)'
      TabOrder = 13
      OnClick = CursorControlChange
    end
    object cmbSetBackground: TComboBox
      Left = 136
      Top = 416
      Width = 166
      Height = 21
      Style = csDropDownList
      TabOrder = 14
      OnChange = CursorControlChange
      Items.Strings = (
        'Click on Background'
        'Select Region of Background'
        'Select Foreground (subject)')
    end
  end
  object ImageEnView1: TImageEnView
    Left = 313
    Top = 0
    Width = 541
    Height = 662
    Background = clBtnFace
    Ctl3D = False
    ParentCtl3D = False
    BorderStyle = bsNone
    SelectionOptions = [iesoAnimated, iesoSizeable, iesoMoveable, iesoCanScroll, iesoRightButtonTerminatePolySelect]
    OnSelectionChange = ImageEnView1SelectionChange
    OnProgress = ImageEnView1Progress
    EnableInteractionHints = True
    Align = alClient
    TabOrder = 1
    OnMouseDown = ImageEnView1MouseDown
    OnMouseMove = ImageEnView1MouseMove
  end
  object Panel2: TPanel
    Left = 0
    Top = 662
    Width = 854
    Height = 113
    Align = alBottom
    TabOrder = 2
    DesignSize = (
      854
      113)
    object lblDetail: TLabel
      Left = 8
      Top = 8
      Width = 37
      Height = 13
      Caption = 'lblDetail'
    end
    object trkZoom: TTrackBar
      Left = 624
      Top = 48
      Width = 217
      Height = 30
      Anchors = [akTop, akRight]
      Max = 1000
      Frequency = 100
      Position = 100
      TabOrder = 0
      OnChange = trkZoomChange
    end
    object btnFit: TButton
      Left = 565
      Top = 48
      Width = 49
      Height = 25
      Anchors = [akTop, akRight]
      Caption = 'Fit'
      TabOrder = 1
      OnClick = btnFitClick
    end
    object HistogramBox1: THistogramBox
      Left = 8
      Top = 25
      Width = 529
      Height = 81
      HistogramKind = [hkHue]
    end
  end
  object tmrUpdateChromaKey: TTimer
    Enabled = False
    Interval = 125
    OnTimer = tmrUpdateChromaKeyTimer
    Left = 248
    Top = 552
  end
end