object DiapoForm: TDiapoForm
  Left = 294
  Top = 171
  BorderStyle = bsDialog
  Caption = 'Diapositive'
  ClientHeight = 321
  ClientWidth = 282
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  FormStyle = fsStayOnTop
  KeyPreview = True
  OldCreateOrder = False
  Position = poMainFormCenter
  OnCreate = FormCreate
  OnHide = FormHide
  OnKeyPress = FormKeyPress
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  object Label1: TLabel
    Left = 16
    Top = 16
    Width = 42
    Height = 13
    Caption = 'Largeur :'
  end
  object Label2: TLabel
    Left = 120
    Top = 16
    Width = 42
    Height = 13
    Caption = 'Couleur :'
  end
  object LblPct: TLabel
    Left = 16
    Top = 72
    Width = 37
    Height = 13
    Caption = 'Opacit'#233
  end
  object BAnnuler: TButton
    Left = 192
    Top = 280
    Width = 75
    Height = 25
    Caption = 'Annuler'
    TabOrder = 0
    OnClick = BAnnulerClick
  end
  object BOk: TButton
    Left = 112
    Top = 280
    Width = 75
    Height = 25
    Caption = 'Ok'
    TabOrder = 1
    OnClick = BOkClick
  end
  object TBPct: TTrackBar
    Left = 8
    Top = 88
    Width = 265
    Height = 25
    Max = 100
    Min = 10
    Orientation = trHorizontal
    PageSize = 5
    Frequency = 5
    Position = 100
    SelEnd = 0
    SelStart = 0
    TabOrder = 2
    ThumbLength = 15
    TickMarks = tmBottomRight
    TickStyle = tsAuto
    OnChange = TBPctChange
  end
  object BApercu: TButton
    Left = 16
    Top = 280
    Width = 75
    Height = 25
    Caption = 'Aper'#231'u'
    TabOrder = 3
    OnClick = BApercuClick
  end
  object SELargeur: TSpinEdit2
    Left = 16
    Top = 32
    Width = 89
    Height = 21
    MaxLength = 3
    MaxValue = 500
    MinValue = 3
    ShowUpDown = True
    TabOrder = 4
    Value = 10
    OnChange = OptionChange
  end
  object ColorEdit: TColorEdit
    Left = 120
    Top = 32
    Width = 89
    Height = 21
    BorderStyle = bsSingle
    Color = clBlack
    CustomText = 'Autres couleurs...'
    ColorDialog = MainForm.GlobalColorDialog
    ReadOnly = False
    OnChange = OptionChange
  end
  object RGFlou: TRadioGroup
    Left = 16
    Top = 124
    Width = 251
    Height = 65
    Caption = ' Flou '
    ItemIndex = 0
    Items.Strings = (
      'L'#233'ger'
      'Elev'#233)
    TabOrder = 6
    OnClick = OptionChange
  end
  object RGRound: TRadioGroup
    Left = 16
    Top = 198
    Width = 251
    Height = 65
    Caption = ' Arrondi '
    ItemIndex = 0
    Items.Strings = (
      'L'#233'ger'
      'Elev'#233)
    TabOrder = 7
    OnClick = OptionChange
  end
end