object saisielentille: Tsaisielentille
  Left = 337
  Height = 546
  Top = 80
  Width = 615
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Ajout d''une lentille épaisse'
  ClientHeight = 546
  ClientWidth = 615
  Color = clAqua
  OnCreate = FormCreate
  OnShow = FormShow
  LCLVersion = '1.6.0.4'
  object Image1: TImage
    Left = 8
    Height = 100
    Top = 0
    Width = 100
    AutoSize = True
    Picture.Data = {
[encoded data, 11786 characters]
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
    }
  end
  object GroupBox1: TGroupBox
    Left = 8
    Height = 177
    Top = 136
    Width = 273
    Caption = 'Coordonnées des sommets des faces'
    ClientHeight = 155
    ClientWidth = 269
    TabOrder = 0
    object StaticText1: TLabel
      Left = 8
      Height = 17
      Top = 36
      Width = 72
      Caption = 'Sommet S1'
      ParentColor = False
    end
    object StaticText2: TLabel
      Left = 8
      Height = 17
      Top = 108
      Width = 72
      Caption = 'Sommet S2'
      ParentColor = False
    end
    object StaticText3: TLabel
      AnchorSideLeft.Control = StaticText1
      AnchorSideLeft.Side = asrBottom
      Left = 90
      Height = 17
      Top = 20
      Width = 18
      BorderSpacing.Left = 10
      Caption = 'x='
      ParentColor = False
    end
    object StaticText4: TLabel
      AnchorSideLeft.Control = StaticText1
      AnchorSideLeft.Side = asrBottom
      Left = 90
      Height = 17
      Top = 56
      Width = 18
      BorderSpacing.Left = 10
      Caption = 'y='
      ParentColor = False
    end
    object StaticText5: TLabel
      AnchorSideLeft.Control = StaticText2
      AnchorSideLeft.Side = asrBottom
      Left = 90
      Height = 17
      Top = 92
      Width = 18
      BorderSpacing.Left = 10
      Caption = 'x='
      ParentColor = False
    end
    object StaticText6: TLabel
      AnchorSideLeft.Control = StaticText2
      AnchorSideLeft.Side = asrBottom
      Left = 90
      Height = 17
      Top = 128
      Width = 18
      BorderSpacing.Left = 10
      Caption = 'y='
      ParentColor = False
    end
    object log1: TLabel
      AnchorSideLeft.Control = edits1x
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText3
      AnchorSideTop.Side = asrCenter
      Left = 189
      Height = 17
      Top = 20
      Width = 26
      Caption = 'log1'
      ParentColor = False
    end
    object log2: TLabel
      AnchorSideLeft.Control = edits1y
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText4
      AnchorSideTop.Side = asrCenter
      Left = 189
      Height = 17
      Top = 56
      Width = 26
      Caption = 'log2'
      ParentColor = False
    end
    object log3: TLabel
      AnchorSideLeft.Control = edits2x
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText5
      AnchorSideTop.Side = asrCenter
      Left = 189
      Height = 17
      Top = 92
      Width = 26
      Caption = 'log3'
      ParentColor = False
    end
    object log4: TLabel
      AnchorSideLeft.Control = edits2y
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = edits2y
      AnchorSideTop.Side = asrCenter
      Left = 189
      Height = 17
      Top = 128
      Width = 26
      Caption = 'log4'
      ParentColor = False
    end
    object edits1x: TEdit
      AnchorSideLeft.Control = StaticText3
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText3
      AnchorSideTop.Side = asrCenter
      Left = 108
      Height = 25
      Top = 16
      Width = 81
      TabOrder = 0
    end
    object edits1y: TEdit
      AnchorSideLeft.Control = StaticText4
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText4
      AnchorSideTop.Side = asrCenter
      Left = 108
      Height = 25
      Top = 52
      Width = 81
      TabOrder = 1
    end
    object edits2x: TEdit
      AnchorSideLeft.Control = StaticText5
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText5
      AnchorSideTop.Side = asrCenter
      Left = 108
      Height = 25
      Top = 88
      Width = 81
      TabOrder = 2
    end
    object edits2y: TEdit
      AnchorSideLeft.Control = StaticText6
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText6
      AnchorSideTop.Side = asrCenter
      Left = 108
      Height = 25
      Top = 124
      Width = 81
      TabOrder = 3
    end
  end
  object GroupBox2: TGroupBox
    Left = 8
    Height = 153
    Top = 320
    Width = 346
    Caption = 'Rayons de courbure des faces'
    ClientHeight = 131
    ClientWidth = 342
    TabOrder = 1
    object StaticText7: TLabel
      Left = 8
      Height = 17
      Top = 8
      Width = 289
      Caption = 'Signe + si centre de courbure Ci à gauche de Si'
      ParentColor = False
    end
    object StaticText8: TLabel
      Left = 8
      Height = 17
      Top = 32
      Width = 273
      Caption = 'sur l''axe orienté de S1 vers S2, signe - sinon.'
      ParentColor = False
    end
    object StaticText9: TLabel
      Left = 40
      Height = 17
      Top = 63
      Width = 27
      Caption = 'R1='
      ParentColor = False
    end
    object StaticText10: TLabel
      Left = 40
      Height = 17
      Top = 96
      Width = 27
      Caption = 'R2='
      ParentColor = False
    end
    object log6: TLabel
      Left = 168
      Height = 17
      Top = 56
      Width = 26
      Caption = 'log6'
      ParentColor = False
    end
    object log7: TLabel
      Left = 168
      Height = 17
      Top = 96
      Width = 26
      Caption = 'log7'
      ParentColor = False
    end
    object editr1: TEdit
      Left = 72
      Height = 25
      Top = 56
      Width = 89
      TabOrder = 0
    end
    object editr2: TEdit
      Left = 72
      Height = 25
      Top = 88
      Width = 89
      TabOrder = 1
    end
  end
  object GroupBox3: TGroupBox
    Left = 8
    Height = 65
    Top = 472
    Width = 344
    Caption = 'Diamètre'
    ClientHeight = 43
    ClientWidth = 340
    TabOrder = 2
    object StaticText11: TLabel
      AnchorSideTop.Control = GroupBox3
      AnchorSideTop.Side = asrCenter
      Left = 40
      Height = 17
      Top = 13
      Width = 20
      Caption = 'D='
      ParentColor = False
    end
    object log5: TLabel
      AnchorSideLeft.Control = editdiametre
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = GroupBox3
      AnchorSideTop.Side = asrCenter
      Left = 143
      Height = 17
      Top = 13
      Width = 26
      Caption = 'log5'
      ParentColor = False
    end
    object editdiametre: TEdit
      AnchorSideLeft.Control = StaticText11
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = GroupBox3
      AnchorSideTop.Side = asrCenter
      Left = 70
      Height = 25
      Top = 9
      Width = 73
      BorderSpacing.Left = 10
      TabOrder = 0
    end
  end
  object GroupBox4: TGroupBox
    Left = 296
    Height = 177
    Top = 136
    Width = 305
    Caption = 'Indice de réfraction du verre'
    ClientHeight = 155
    ClientWidth = 301
    TabOrder = 3
    object StaticText12: TLabel
      Left = 16
      Height = 17
      Top = 32
      Width = 87
      Caption = 'Pour le rouge:'
      ParentColor = False
    end
    object StaticText13: TLabel
      Left = 24
      Height = 17
      Top = 64
      Width = 76
      Caption = 'Pour le vert:'
      ParentColor = False
    end
    object StaticText14: TLabel
      Left = 24
      Height = 17
      Top = 96
      Width = 76
      Caption = 'Pour le bleu:'
      ParentColor = False
    end
    object StaticText15: TLabel
      Left = 8
      Height = 17
      Top = 128
      Width = 56
      Caption = 'Matériau:'
      ParentColor = False
    end
    object editnrouge: TEdit
      AnchorSideLeft.Control = StaticText12
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText12
      AnchorSideTop.Side = asrCenter
      Left = 113
      Height = 25
      Top = 28
      Width = 81
      BorderSpacing.Left = 10
      TabOrder = 3
      Text = '1,5'
    end
    object editnvert: TEdit
      AnchorSideLeft.Control = StaticText13
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText13
      AnchorSideTop.Side = asrCenter
      Left = 110
      Height = 25
      Top = 60
      Width = 81
      BorderSpacing.Left = 10
      TabOrder = 0
      Text = '1,6'
    end
    object editnbleu: TEdit
      AnchorSideLeft.Control = StaticText14
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText14
      AnchorSideTop.Side = asrCenter
      Left = 110
      Height = 25
      Top = 92
      Width = 81
      BorderSpacing.Left = 10
      TabOrder = 1
      Text = '1,7'
    end
    object combomateriaux: TComboBox
      AnchorSideLeft.Control = StaticText15
      AnchorSideLeft.Side = asrBottom
      Left = 74
      Height = 25
      Top = 120
      Width = 177
      BorderSpacing.Left = 10
      ItemHeight = 17
      OnChange = combomateriauxChange
      Style = csDropDownList
      TabOrder = 2
    end
  end
  object boutonsup: TBitBtn
    Left = 112
    Height = 25
    Top = 104
    Width = 489
    Caption = 'Supprimer cette lentille'
    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 = 4
  end
  object GroupBox5: TGroupBox
    Left = 368
    Height = 201
    Top = 320
    Width = 233
    Caption = 'Couleur à l''écran'
    ClientHeight = 179
    ClientWidth = 229
    TabOrder = 5
    object Colorgrid1: TColorBox
      Left = 38
      Height = 22
      Top = 72
      Width = 117
      ItemHeight = 16
      TabOrder = 0
    end
  end
  object BitBtn1: TBitBtn
    Left = 117
    Height = 47
    Top = 6
    Width = 483
    Caption = '&OK'
    Default = True
    Kind = bkOK
    ModalResult = 1
    OnClick = BitBtn1Click
    TabOrder = 6
  end
  object BitBtn2: TBitBtn
    Left = 115
    Height = 34
    Top = 61
    Width = 485
    Cancel = True
    Caption = 'Annuler'
    Kind = bkCancel
    ModalResult = 2
    TabOrder = 7
  end
end
