object saisiereseau: Tsaisiereseau
  Left = 581
  Height = 642
  Top = 211
  Width = 681
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Ajout d''un réseau'
  ClientHeight = 642
  ClientWidth = 681
  Color = clAqua
  OnCreate = FormCreate
  OnShow = FormShow
  LCLVersion = '1.6.0.4'
  object Image1: TImage
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = Owner
    Left = 10
    Height = 100
    Top = 10
    Width = 100
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    Picture.Data = {
[encoded data, 11786 characters]
      FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF0000
    }
  end
  object GroupBox1: TGroupBox
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = GroupBox4
    AnchorSideTop.Side = asrBottom
    Left = 10
    Height = 129
    Top = 117
    Width = 129
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    Caption = 'Couleur à l''écran'
    ClientHeight = 107
    ClientWidth = 125
    TabOrder = 0
    object Colorgrid1: TColorBox
      AnchorSideLeft.Control = GroupBox1
      AnchorSideLeft.Side = asrCenter
      AnchorSideTop.Control = GroupBox1
      AnchorSideTop.Side = asrCenter
      Left = 20
      Height = 22
      Top = 42
      Width = 85
      ItemHeight = 16
      TabOrder = 0
    end
  end
  object GroupBox2: TGroupBox
    AnchorSideLeft.Control = GroupBox1
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = GroupBox3
    AnchorSideTop.Side = asrBottom
    Left = 149
    Height = 57
    Top = 192
    Width = 273
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    Caption = 'Aspect'
    ClientHeight = 35
    ClientWidth = 269
    TabOrder = 1
    object cochehachures: TCheckBox
      Left = 16
      Height = 21
      Top = 4
      Width = 211
      Caption = 'Hachures si réseau en réflexion'
      Checked = True
      State = cbChecked
      TabOrder = 0
    end
  end
  object GroupBox3: TGroupBox
    AnchorSideLeft.Control = GroupBox1
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = GroupBox4
    AnchorSideTop.Side = asrBottom
    Left = 149
    Height = 65
    Top = 117
    Width = 193
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    Caption = 'Epaisseur trait à l''écran'
    ClientHeight = 43
    ClientWidth = 189
    TabOrder = 2
    object editepaisseur: TSpinEdit
      AnchorSideLeft.Control = GroupBox3
      AnchorSideLeft.Side = asrCenter
      AnchorSideTop.Control = GroupBox3
      AnchorSideTop.Side = asrCenter
      Left = 70
      Height = 25
      Top = 9
      Width = 49
      MaxValue = 20
      MinValue = 1
      TabOrder = 0
      Value = 1
    end
  end
  object GroupBox4: TGroupBox
    AnchorSideLeft.Control = Image1
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = Owner
    Left = 120
    Height = 97
    Top = 10
    Width = 185
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    Caption = 'Point 1'
    ClientHeight = 75
    ClientWidth = 181
    TabOrder = 3
    object StaticText1: TLabel
      Left = 8
      Height = 17
      Top = 12
      Width = 18
      Caption = 'x='
      ParentColor = False
    end
    object StaticText2: TLabel
      Left = 8
      Height = 17
      Top = 48
      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 = 12
      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 = 48
      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 = 8
      Width = 97
      TabOrder = 1
    end
    object edity1: TEdit
      AnchorSideLeft.Control = StaticText2
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = StaticText2
      AnchorSideTop.Side = asrCenter
      Left = 26
      Height = 25
      Top = 44
      Width = 97
      TabOrder = 0
    end
  end
  object GroupBox5: TGroupBox
    AnchorSideLeft.Control = GroupBox4
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = Owner
    Left = 315
    Height = 97
    Top = 10
    Width = 185
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    Caption = 'Point 2'
    ClientHeight = 75
    ClientWidth = 181
    TabOrder = 4
    object StaticText3: TLabel
      Left = 8
      Height = 17
      Top = 12
      Width = 18
      Caption = 'x='
      ParentColor = False
    end
    object StaticText4: TLabel
      Left = 8
      Height = 17
      Top = 52
      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 = 12
      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 = 52
      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 = 8
      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 = 48
      Width = 97
      TabOrder = 1
    end
  end
  object boutonsup: TBitBtn
    Left = 272
    Height = 41
    Top = 439
    Width = 201
    Caption = 'Supprimer ce réseau'
    Enabled = False
    Glyph.Data = {
      DE010000424DDE01000000000000760000002800000024000000120000000100
      0400000000006801000000000000000000001000000010000000000000000000
      80000080000000808000800000008000800080800000C0C0C000808080000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
      F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
      000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
      338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
      45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
      3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
      F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
      000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
      338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
      4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
      8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
      333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
      0000
    }
    ModalResult = 7
    NumGlyphs = 2
    OnClick = boutonsupClick
    TabOrder = 5
  end
  object BitBtn1: TBitBtn
    Left = 512
    Height = 464
    Top = 10
    Width = 152
    Caption = '&OK'
    Default = True
    Kind = bkOK
    ModalResult = 1
    OnClick = BitBtn1Click
    TabOrder = 6
  end
  object BitBtn2: TBitBtn
    Left = 352
    Height = 56
    Top = 117
    Width = 144
    Cancel = True
    Caption = 'Annuler'
    Kind = bkCancel
    ModalResult = 2
    TabOrder = 7
  end
  object RadioGroup1: TRadioGroup
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = GroupBox1
    AnchorSideTop.Side = asrBottom
    Left = 10
    Height = 105
    Top = 256
    Width = 181
    AutoFill = True
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    Caption = 'Type de réseau'
    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 = 83
    ClientWidth = 177
    ItemIndex = 0
    Items.Strings = (
      'En transmission'
      'En réflexion'
    )
    TabOrder = 8
  end
  object GroupBox6: TGroupBox
    AnchorSideLeft.Control = RadioGroup1
    AnchorSideLeft.Side = asrBottom
    AnchorSideTop.Control = GroupBox2
    AnchorSideTop.Side = asrBottom
    Left = 201
    Height = 105
    Top = 259
    Width = 211
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    Caption = 'Nombre de trait par mm'
    ClientHeight = 83
    ClientWidth = 207
    TabOrder = 9
    object FloatSpinEdit1: TFloatSpinEdit
      AnchorSideLeft.Control = GroupBox6
      AnchorSideLeft.Side = asrCenter
      AnchorSideTop.Control = GroupBox6
      AnchorSideTop.Side = asrCenter
      Left = 20
      Height = 25
      Top = 29
      Width = 166
      Increment = 1
      MaxValue = 100000
      MinValue = 1
      TabOrder = 0
      Value = 100
    end
  end
  object GroupBox7: TGroupBox
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = RadioGroup1
    AnchorSideTop.Side = asrBottom
    Left = 10
    Height = 127
    Top = 371
    Width = 247
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    Caption = 'Ordres à prendre en compte'
    ClientHeight = 105
    ClientWidth = 243
    TabOrder = 10
    object SpinEdit_ordre_min: TSpinEdit
      Left = 164
      Height = 25
      Top = 11
      Width = 71
      MaxValue = 10000
      MinValue = -10000
      TabOrder = 0
      Value = -1
    end
    object StaticText5: TStaticText
      Left = 19
      Height = 27
      Top = 12
      Width = 109
      Caption = 'Ordre minimum'
      TabOrder = 1
    end
    object StaticText6: TStaticText
      Left = 19
      Height = 24
      Top = 59
      Width = 118
      Caption = 'Ordre maximum'
      TabOrder = 2
    end
    object SpinEdit_ordre_max: TSpinEdit
      Left = 164
      Height = 25
      Top = 54
      Width = 68
      MaxValue = 10000
      MinValue = -10000
      TabOrder = 3
      Value = 1
    end
  end
  object StaticText7: TStaticText
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = GroupBox7
    AnchorSideTop.Side = asrBottom
    Left = 10
    Height = 68
    Top = 508
    Width = 635
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    Caption = 'Remarque importante: ce réseau diffractant doit être éclairé par une onde plane.'#13#10'Un rayon unique sera diffracté selon la loi des réseaux sin i=+-sin i0+k.lambda/a'#13#10'mais cela n''a pas de sens pour un rayon unique.'
    TabOrder = 11
  end
  object StaticText8: TStaticText
    AnchorSideLeft.Control = Owner
    AnchorSideTop.Control = StaticText7
    AnchorSideTop.Side = asrBottom
    Left = 10
    Height = 46
    Top = 586
    Width = 638
    BorderSpacing.Left = 10
    BorderSpacing.Top = 10
    Caption = 'Les longueurs d''onde peuvent être modifiées dans le menu options, indices du milieu'#13#10'ambian et longueurs d''onde.'
    TabOrder = 12
  end
end
