object TSForm: TTSForm
  Left = 238
  Top = 214
  ActiveControl = BOk
  BorderStyle = bsDialog
  Caption = 'Teinte / Saturation'
  ClientHeight = 266
  ClientWidth = 314
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  OldCreateOrder = False
  Position = poMainFormCenter
  OnCreate = FormCreate
  OnHide = FormHide
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object LblTeinte: TLabel
    Left = 16
    Top = 16
    Width = 30
    Height = 13
    Caption = 'Teinte'
  end
  object LblSaturation: TLabel
    Left = 16
    Top = 96
    Width = 48
    Height = 13
    Caption = 'Saturation'
  end
  object Label1: TLabel
    Left = 16
    Top = 152
    Width = 43
    Height = 13
    Caption = 'Couche :'
  end
  object Bevel1: TBevel
    Left = 16
    Top = 80
    Width = 281
    Height = 9
    Shape = bsTopLine
  end
  object TBTeinte: TTrackBar
    Left = 8
    Top = 32
    Width = 297
    Height = 25
    Max = 180
    Min = -180
    Orientation = trHorizontal
    PageSize = 10
    Frequency = 20
    Position = 0
    SelEnd = 0
    SelStart = 0
    TabOrder = 0
    ThumbLength = 15
    TickMarks = tmBottomRight
    TickStyle = tsAuto
    OnChange = TBTeinteChange
  end
  object BAnnuler: TButton
    Left = 224
    Top = 224
    Width = 75
    Height = 25
    Cancel = True
    Caption = 'Annuler'
    TabOrder = 1
    OnClick = BAnnulerClick
  end
  object BOk: TButton
    Left = 144
    Top = 224
    Width = 75
    Height = 25
    Caption = 'Ok'
    Default = True
    TabOrder = 2
    OnClick = BOkClick
  end
  object BApercu: TButton
    Left = 16
    Top = 224
    Width = 75
    Height = 25
    Caption = 'Aper'#231'u'
    TabOrder = 3
    OnClick = BApercuClick
  end
  object TBSaturation: TTrackBar
    Left = 8
    Top = 112
    Width = 297
    Height = 25
    Max = 100
    Min = -100
    Orientation = trHorizontal
    PageSize = 10
    Frequency = 10
    Position = 0
    SelEnd = 0
    SelStart = 0
    TabOrder = 4
    ThumbLength = 15
    TickMarks = tmBottomRight
    TickStyle = tsAuto
    OnChange = TBSaturationChange
  end
  object CBCouche: TComboBox
    Left = 16
    Top = 168
    Width = 113
    Height = 21
    Style = csDropDownList
    ItemHeight = 13
    ItemIndex = 0
    TabOrder = 5
    Text = '<Toutes>'
    OnChange = CBCoucheChange
    Items.Strings = (
      '<Toutes>'
      'Rouge'
      'Vert'
      'Bleu'
      'Cyan'
      'Magenta'
      'Jaune')
  end
end