object saisiediametre: Tsaisiediametre
  Left = 200
  Height = 106
  Top = 108
  Width = 328
  BorderIcons = []
  BorderStyle = bsDialog
  Caption = 'Saissez le diamètre de la lentille'
  ClientHeight = 106
  ClientWidth = 328
  Color = clAqua
  OnCreate = FormCreate
  OnShow = FormShow
  LCLVersion = '1.6.0.4'
  object GroupBox1: TGroupBox
    Left = 8
    Height = 89
    Top = 8
    Width = 209
    Caption = 'Saisissez'
    ClientHeight = 67
    ClientWidth = 205
    TabOrder = 0
    object StaticText1: TLabel
      AnchorSideTop.Control = GroupBox1
      AnchorSideTop.Side = asrCenter
      Left = 8
      Height = 17
      Top = 25
      Width = 65
      Caption = 'Diamètre='
      ParentColor = False
    end
    object log1: TLabel
      AnchorSideLeft.Control = editdia
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = GroupBox1
      AnchorSideTop.Side = asrCenter
      Left = 162
      Height = 17
      Top = 25
      Width = 26
      Caption = 'log1'
      ParentColor = False
    end
    object editdia: TEdit
      AnchorSideLeft.Control = StaticText1
      AnchorSideLeft.Side = asrBottom
      AnchorSideTop.Control = GroupBox1
      AnchorSideTop.Side = asrCenter
      Left = 73
      Height = 25
      Top = 21
      Width = 89
      TabOrder = 0
    end
  end
  object BitBtn1: TBitBtn
    Left = 224
    Height = 83
    Top = 16
    Width = 97
    Caption = '&OK'
    Default = True
    Kind = bkOK
    ModalResult = 1
    OnClick = BitBtn1Click
    TabOrder = 1
  end
end
