object LensForm: TLensForm Left = 388 Top = 189 ActiveControl = BOk BorderStyle = bsDialog Caption = 'Sph'#233'risation / Lentille' ClientHeight = 185 ClientWidth = 426 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop OldCreateOrder = False Position = poMainFormCenter OnCreate = FormCreate OnHide = FormHide OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 16 Top = 72 Width = 30 Height = 13 Caption = 'Fond :' end object Label2: TLabel Left = 16 Top = 18 Width = 57 Height = 13 Caption = 'D'#233'formation' end object ImgApercu: TImage Left = 258 Top = 16 Width = 153 Height = 153 end object BAnnuler: TButton Left = 96 Top = 144 Width = 75 Height = 25 Cancel = True Caption = 'Annuler' TabOrder = 3 OnClick = BAnnulerClick end object BOk: TButton Left = 16 Top = 144 Width = 75 Height = 25 Caption = 'Ok' Default = True TabOrder = 2 OnClick = BOkClick end object TBN: TTrackBar Left = 10 Top = 34 Width = 237 Height = 31 Max = 20 Min = 1 Position = 5 TabOrder = 1 ThumbLength = 15 OnChange = TBNChange end object ColorEdit: TColorEdit Left = 16 Top = 88 Width = 89 Height = 21 BorderStyle = bsSingle Color = clWhite CustomText = 'Autres couleurs...' ColorDialog = MainForm.GlobalColorDialog ReadOnly = False TabOrder = 0 TabStop = True OnChange = ColorEditChange end end