object saisiefleche: Tsaisiefleche
  Left = 200
  Height = 380
  Top = 108
  Width = 917
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Propriétés de ce trait'
  ClientHeight = 380
  ClientWidth = 917
  Color = clAqua
  OnCreate = FormCreate
  OnShow = FormShow
  LCLVersion = '1.6.0.4'
  object radioext1: TRadioGroup
    Left = 8
    Height = 225
    Top = 8
    Width = 249
    AutoFill = True
    Caption = 'Forme de la première extrémité'
    ChildSizing.LeftRightSpacing = 6
    ChildSizing.TopBottomSpacing = 6
    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
    ChildSizing.EnlargeVertical = crsHomogenousChildResize
    ChildSizing.ShrinkHorizontal = crsScaleChilds
    ChildSizing.ShrinkVertical = crsScaleChilds
    ChildSizing.Layout = cclLeftToRightThenTopToBottom
    ChildSizing.ControlsPerLine = 1
    ClientHeight = 203
    ClientWidth = 245
    ItemIndex = 0
    Items.Strings = (
      'Normale'
      'Fléche'
      'Trait perpendiculaire'
      'Cercle'
      'Croix +'
      'Croix x'
      'Disque'
    )
    TabOrder = 0
  end
  object radioext2: TRadioGroup
    Left = 272
    Height = 225
    Top = 8
    Width = 231
    AutoFill = True
    Caption = 'Forme de la seconde extrémité'
    ChildSizing.LeftRightSpacing = 6
    ChildSizing.TopBottomSpacing = 6
    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
    ChildSizing.EnlargeVertical = crsHomogenousChildResize
    ChildSizing.ShrinkHorizontal = crsScaleChilds
    ChildSizing.ShrinkVertical = crsScaleChilds
    ChildSizing.Layout = cclLeftToRightThenTopToBottom
    ChildSizing.ControlsPerLine = 1
    ClientHeight = 203
    ClientWidth = 227
    ItemIndex = 0
    Items.Strings = (
      'Normale'
      'Fléche'
      'Trait perpendiculaire'
      'Cercle'
      'Croix +'
      'Croix x'
      'Disque'
    )
    TabOrder = 1
  end
  object GroupBox1: TGroupBox
    Left = 8
    Height = 129
    Top = 240
    Width = 249
    Caption = 'Taille de la première extrémité'
    ClientHeight = 107
    ClientWidth = 245
    TabOrder = 2
    object StaticText1: TLabel
      AnchorSideLeft.Control = GroupBox1
      AnchorSideLeft.Side = asrCenter
      Left = 44
      Height = 17
      Top = 56
      Width = 157
      Caption = 'en 1/1000 de la diagonale'
      ParentColor = False
    end
    object StaticText3: TLabel
      AnchorSideLeft.Control = GroupBox1
      AnchorSideLeft.Side = asrCenter
      Left = 60
      Height = 17
      Top = 80
      Width = 125
      Caption = 'de l''espace de travail'
      ParentColor = False
    end
    object spintaille1: TSpinEdit
      AnchorSideLeft.Control = GroupBox1
      AnchorSideLeft.Side = asrCenter
      Left = 94
      Height = 25
      Top = 24
      Width = 57
      MaxValue = 1000
      MinValue = 1
      TabOrder = 0
      Value = 10
    end
  end
  object GroupBox2: TGroupBox
    Left = 272
    Height = 129
    Top = 240
    Width = 233
    Caption = 'Taille de la seconde extrémité'
    ClientHeight = 107
    ClientWidth = 229
    TabOrder = 3
    object StaticText2: TLabel
      AnchorSideLeft.Control = GroupBox2
      AnchorSideLeft.Side = asrCenter
      Left = 36
      Height = 17
      Top = 56
      Width = 157
      Caption = 'en 1/1000 de la diagonale'
      ParentColor = False
    end
    object StaticText4: TLabel
      AnchorSideLeft.Control = GroupBox2
      AnchorSideLeft.Side = asrCenter
      Left = 52
      Height = 17
      Top = 80
      Width = 125
      Caption = 'de l''espace de travail'
      ParentColor = False
    end
    object spintaille2: TSpinEdit
      AnchorSideLeft.Control = GroupBox2
      AnchorSideLeft.Side = asrCenter
      Left = 86
      Height = 25
      Top = 24
      Width = 57
      MaxValue = 1000
      MinValue = 1
      TabOrder = 0
      Value = 10
    end
  end
  object GroupBox3: TGroupBox
    Left = 576
    Height = 65
    Top = 8
    Width = 201
    Caption = 'Epaisseur du trait'
    ClientHeight = 43
    ClientWidth = 197
    TabOrder = 4
    object spinepaisseur: TSpinEdit
      AnchorSideLeft.Control = GroupBox3
      AnchorSideLeft.Side = asrCenter
      AnchorSideTop.Control = GroupBox3
      AnchorSideTop.Side = asrCenter
      Left = 74
      Height = 25
      Top = 9
      Width = 49
      MaxValue = 10
      MinValue = 1
      TabOrder = 0
      Value = 1
    end
  end
  object radiostyletrait: TRadioGroup
    Left = 512
    Height = 153
    Top = 80
    Width = 265
    AutoFill = True
    Caption = 'Style du trait (valable si épaisseur=1)'
    ChildSizing.LeftRightSpacing = 6
    ChildSizing.TopBottomSpacing = 6
    ChildSizing.EnlargeHorizontal = crsHomogenousChildResize
    ChildSizing.EnlargeVertical = crsHomogenousChildResize
    ChildSizing.ShrinkHorizontal = crsScaleChilds
    ChildSizing.ShrinkVertical = crsScaleChilds
    ChildSizing.Layout = cclLeftToRightThenTopToBottom
    ChildSizing.ControlsPerLine = 1
    ClientHeight = 131
    ClientWidth = 261
    ItemIndex = 0
    Items.Strings = (
      'Plein'
      'Pointillés'
      'Tirés'
      'Tirés - Points'
      'Tirés - Points - Points'
    )
    OnClick = radiostyletraitClick
    TabOrder = 5
  end
  object GroupBox4: TGroupBox
    Left = 592
    Height = 129
    Top = 240
    Width = 185
    Caption = 'Couleur du trait'
    ClientHeight = 107
    ClientWidth = 181
    TabOrder = 6
    object Colorgrid1: TColorBox
      AnchorSideLeft.Control = GroupBox4
      AnchorSideLeft.Side = asrCenter
      AnchorSideTop.Control = GroupBox4
      AnchorSideTop.Side = asrCenter
      Left = 29
      Height = 22
      Top = 42
      Width = 122
      ItemHeight = 16
      TabOrder = 0
    end
  end
  object BitBtn1: TBitBtn
    Left = 792
    Height = 361
    Top = 8
    Width = 112
    Caption = '&OK'
    Default = True
    Kind = bkOK
    ModalResult = 1
    OnClick = BitBtn1Click
    TabOrder = 7
  end
end
