object saisiemiroirscere: Tsaisiemiroirscere
  Left = 304
  Height = 490
  Top = 135
  Width = 501
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Ajout d''un miroir sphérique convexe réel'
  ClientHeight = 490
  ClientWidth = 501
  Color = clAqua
  OnCreate = FormCreate
  OnShow = FormShow
  LCLVersion = '1.6.0.4'
  object Image1: TImage
    Left = 0
    Height = 100
    Top = 0
    Width = 100
    Picture.Data = {
[encoded data, 11786 characters]
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
    }
  end
  object GroupBox1: TGroupBox
    Left = 104
    Height = 129
    Top = 0
    Width = 169
    Caption = 'Point 1'
    ClientHeight = 107
    ClientWidth = 165
    TabOrder = 0
    object StaticText1: TLabel
      Left = 8
      Height = 17
      Top = 24
      Width = 18
      Caption = 'x='
      ParentColor = False
    end
    object StaticText2: TLabel
      Left = 8
      Height = 17
      Top = 64
      Width = 18
      Caption = 'y='
      ParentColor = False
    end
    object log1: TLabel
      AnchorSideLeft.Control = editx1
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = editx1
      AnchorSideTop.Side = asrCenter
      Left = 123
      Height = 17
      Top = 24
      Width = 26
      Caption = 'log1'
      ParentColor = False
    end
    object log2: TLabel
      AnchorSideLeft.Control = edity1
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = edity1
      AnchorSideTop.Side = asrCenter
      Left = 123
      Height = 17
      Top = 64
      Width = 26
      Caption = 'log2'
      ParentColor = False
    end
    object editx1: TEdit
      AnchorSideLeft.Control = StaticText1
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText1
      AnchorSideTop.Side = asrCenter
      Left = 26
      Height = 25
      Top = 20
      Width = 97
      TabOrder = 0
    end
    object edity1: TEdit
      AnchorSideLeft.Control = StaticText2
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText2
      AnchorSideTop.Side = asrCenter
      Left = 26
      Height = 25
      Top = 60
      Width = 97
      TabOrder = 1
    end
  end
  object GroupBox2: TGroupBox
    Left = 280
    Height = 112
    Top = 0
    Width = 161
    Caption = 'Point 2'
    ClientHeight = 90
    ClientWidth = 157
    TabOrder = 1
    object StaticText3: TLabel
      Left = 8
      Height = 17
      Top = 16
      Width = 18
      Caption = 'x='
      ParentColor = False
    end
    object StaticText4: TLabel
      Left = 8
      Height = 17
      Top = 64
      Width = 18
      Caption = 'y='
      ParentColor = False
    end
    object log3: TLabel
      AnchorSideLeft.Control = editx2
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = editx2
      AnchorSideTop.Side = asrCenter
      Left = 123
      Height = 17
      Top = 16
      Width = 26
      Caption = 'log3'
      ParentColor = False
    end
    object log4: TLabel
      AnchorSideLeft.Control = edity2
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = edity2
      AnchorSideTop.Side = asrCenter
      Left = 123
      Height = 17
      Top = 64
      Width = 26
      Caption = 'log4'
      ParentColor = False
    end
    object editx2: TEdit
      AnchorSideLeft.Control = StaticText3
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText3
      AnchorSideTop.Side = asrCenter
      Left = 26
      Height = 25
      Top = 12
      Width = 97
      TabOrder = 0
    end
    object edity2: TEdit
      AnchorSideLeft.Control = StaticText4
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText4
      AnchorSideTop.Side = asrCenter
      Left = 26
      Height = 25
      Top = 60
      Width = 97
      TabOrder = 1
    end
  end
  object GroupBox3: TGroupBox
    Left = 8
    Height = 97
    Top = 136
    Width = 129
    Caption = 'Couleur du miroir'
    ClientHeight = 75
    ClientWidth = 125
    TabOrder = 2
    object Colorgrid1: TColorBox
      AnchorSideLeft.Control = GroupBox3
      AnchorSideLeft.Side = asrCenter
      AnchorSideTop.Control = GroupBox3
      AnchorSideTop.Side = asrCenter
      Left = 20
      Height = 22
      Top = 26
      Width = 84
      ItemHeight = 16
      TabOrder = 0
    end
  end
  object GroupBox4: TGroupBox
    Left = 8
    Height = 80
    Top = 240
    Width = 184
    Caption = 'Epaisseur trait à l''écran'
    ClientHeight = 58
    ClientWidth = 180
    TabOrder = 3
    object editepaisseur: TSpinEdit
      AnchorSideLeft.Control = GroupBox4
      AnchorSideLeft.Side = asrCenter
      AnchorSideTop.Control = GroupBox4
      AnchorSideTop.Side = asrCenter
      Left = 70
      Height = 25
      Top = 17
      Width = 41
      MaxValue = 20
      MinValue = 1
      TabOrder = 0
      Value = 1
    end
  end
  object GroupBox5: TGroupBox
    Left = 200
    Height = 95
    Top = 240
    Width = 177
    Caption = 'Aspect'
    ClientHeight = 73
    ClientWidth = 173
    TabOrder = 4
    object cochehachures: TCheckBox
      Left = 16
      Height = 21
      Top = 16
      Width = 81
      Caption = 'Hachures'
      Checked = True
      State = cbChecked
      TabOrder = 0
    end
    object cocheaxe: TCheckBox
      Left = 16
      Height = 21
      Top = 40
      Width = 122
      Caption = 'Axe de symétrie'
      Checked = True
      State = cbChecked
      TabOrder = 1
    end
  end
  object GroupBox6: TGroupBox
    Left = 280
    Height = 65
    Top = 112
    Width = 163
    Caption = 'Rayon de courbure'
    ClientHeight = 43
    ClientWidth = 159
    TabOrder = 5
    object StaticText5: TLabel
      Left = 8
      Height = 17
      Top = 16
      Width = 19
      Caption = 'R='
      ParentColor = False
    end
    object log5: TLabel
      AnchorSideLeft.Control = editrayoncourbure
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = editrayoncourbure
      AnchorSideTop.Side = asrCenter
      Left = 116
      Height = 17
      Top = 16
      Width = 26
      Caption = 'log5'
      ParentColor = False
    end
    object editrayoncourbure: TEdit
      AnchorSideLeft.Control = StaticText5
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText5
      AnchorSideTop.Side = asrCenter
      Left = 27
      Height = 25
      Top = 12
      Width = 89
      TabOrder = 0
    end
  end
  object GroupBox7: TGroupBox
    Left = 144
    Height = 97
    Top = 136
    Width = 129
    Caption = 'Couleur de l''axe'
    ClientHeight = 75
    ClientWidth = 125
    TabOrder = 6
    object gridaxe: TColorBox
      AnchorSideLeft.Control = GroupBox7
      AnchorSideLeft.Side = asrCenter
      AnchorSideTop.Control = GroupBox7
      AnchorSideTop.Side = asrCenter
      Left = 11
      Height = 22
      Top = 26
      Width = 102
      ItemHeight = 16
      TabOrder = 0
    end
  end
  object GroupBox8: TGroupBox
    Left = 280
    Height = 56
    Top = 176
    Width = 162
    Caption = 'Angle d''ouverture'
    ClientHeight = 34
    ClientWidth = 158
    TabOrder = 7
    object Checkobtu: TCheckBox
      AnchorSideLeft.Control = GroupBox8
      AnchorSideLeft.Side = asrCenter
      AnchorSideTop.Control = GroupBox8
      AnchorSideTop.Side = asrCenter
      Left = 52
      Height = 21
      Top = 7
      Width = 55
      Caption = 'Obtu'
      TabOrder = 0
    end
  end
  object boutonsup: TBitBtn
    AnchorSideLeft.Control = Owner
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = Owner
    AnchorSideBottom.Side = asrBottom
    Left = 10
    Height = 41
    Top = 439
    Width = 481
    Anchors = [akLeft, akRight, akBottom]
    BorderSpacing.Left = 10
    BorderSpacing.Right = 10
    BorderSpacing.Bottom = 10
    Caption = 'Supprimer ce miroir'
    Enabled = False
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
      F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
      000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
      338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
      45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
      3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
      F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
      000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
      338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
      4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
      8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
      333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
      0000
    }
    ModalResult = 7
    NumGlyphs = 2
    TabOrder = 8
  end
  object GroupBox9: TGroupBox
    AnchorSideLeft.Control = boutonsup
    AnchorSideRight.Control = Owner
    AnchorSideRight.Side = asrBottom
    AnchorSideBottom.Control = boutonsup
    Left = 10
    Height = 93
    Top = 336
    Width = 481
    Anchors = [akLeft, akRight, akBottom]
    BorderSpacing.Right = 10
    BorderSpacing.Bottom = 10
    Caption = 'Trouer le miroir en son centre'
    ClientHeight = 71
    ClientWidth = 477
    TabOrder = 9
    object StaticText6: TLabel
      AnchorSideLeft.Control = cochetrou
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = GroupBox9
      Left = 85
      Height = 17
      Top = 10
      Width = 168
      BorderSpacing.Left = 10
      BorderSpacing.Top = 10
      Caption = 'Diamètre angulaire du trou:'
      ParentColor = False
    end
    object StaticText7: TLabel
      AnchorSideLeft.Control = cochetrou
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText6
      AnchorSideTop.Side = asrBottom
      Left = 85
      Height = 17
      Top = 37
      Width = 138
      BorderSpacing.Left = 10
      BorderSpacing.Top = 10
      Caption = '(vu depuis le centre C)'
      ParentColor = False
    end
    object StaticText8: TLabel
      AnchorSideLeft.Control = editdiametretrou
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = GroupBox9
      AnchorSideTop.Side = asrCenter
      Left = 432
      Height = 17
      Top = 27
      Width = 20
      Caption = 'rad'
      ParentColor = False
    end
    object cochetrou: TCheckBox
      AnchorSideLeft.Control = GroupBox9
      AnchorSideTop.Control = GroupBox9
      AnchorSideTop.Side = asrCenter
      Left = 10
      Height = 21
      Top = 25
      Width = 65
      BorderSpacing.Left = 10
      Caption = 'Trouer'
      TabOrder = 0
    end
    object editdiametretrou: TEdit
      AnchorSideLeft.Control = StaticText6
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = GroupBox9
      AnchorSideTop.Side = asrCenter
      Left = 263
      Height = 25
      Top = 23
      Width = 169
      BorderSpacing.Left = 10
      TabOrder = 1
    end
  end
  object BitBtn2: TBitBtn
    Left = 398
    Height = 31
    Top = 304
    Width = 93
    Cancel = True
    Caption = 'Annuler'
    Kind = bkCancel
    ModalResult = 2
    TabOrder = 10
  end
  object BitBtn1: TBitBtn
    Left = 392
    Height = 57
    Top = 232
    Width = 97
    Caption = '&OK'
    Default = True
    Kind = bkOK
    ModalResult = 1
    OnClick = BitBtn1Click
    TabOrder = 11
  end
end
