object MaskCoulForm: TMaskCoulForm Left = 349 Top = 198 BorderStyle = bsDialog Caption = 'Masque de transparence' ClientHeight = 297 ClientWidth = 284 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsStayOnTop KeyPreview = True OldCreateOrder = False Position = poMainFormCenter OnCreate = FormCreate OnHide = FormHide OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Label2: TLabel Left = 16 Top = 16 Width = 42 Height = 13 Caption = 'Couleur :' end object LblN: TLabel Left = 16 Top = 68 Width = 48 Height = 13 Caption = 'Tol'#233'rence' end object BAnnuler: TButton Left = 192 Top = 256 Width = 75 Height = 25 Caption = 'Annuler' TabOrder = 5 OnClick = BAnnulerClick end object BOk: TButton Left = 112 Top = 256 Width = 75 Height = 25 Caption = 'Ok' TabOrder = 4 OnClick = BOkClick end object TBN: TTrackBar Left = 12 Top = 84 Width = 261 Height = 25 Max = 100 PageSize = 5 Frequency = 5 Position = 30 TabOrder = 1 ThumbLength = 15 OnChange = TBNChange end object ColorEdit: TColorEdit Left = 16 Top = 32 Width = 89 Height = 21 BorderStyle = bsSingle Color = clWhite CustomText = 'Autres couleurs...' ColorDialog = MainForm.GlobalColorDialog ReadOnly = False TabOrder = 0 TabStop = True OnChange = OptionChange end object BApercu: TButton Left = 16 Top = 256 Width = 75 Height = 25 Caption = 'Aper'#231'u' TabOrder = 3 OnClick = BApercuClick end object RGEffet: TRadioGroup Left = 17 Top = 120 Width = 251 Height = 121 Caption = ' Effet ' ItemIndex = 0 Items.Strings = ( 'Aucun' 'Lissage' 'Flou' 'Contour progressif' 'Diffusion') TabOrder = 2 OnClick = OptionChange end end