object BichromieForm: TBichromieForm Left = 372 Top = 158 BorderStyle = bsDialog Caption = 'Bichromie' ClientHeight = 185 ClientWidth = 281 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 = 16 Width = 51 Height = 13 Caption = 'Couleur 1 :' end object LblPct: TLabel Left = 16 Top = 80 Width = 23 Height = 13 Caption = 'Seuil' end object Label2: TLabel Left = 120 Top = 16 Width = 51 Height = 13 Caption = 'Couleur 2 :' end object BAnnuler: TButton Left = 192 Top = 144 Width = 75 Height = 25 Cancel = True Caption = 'Annuler' TabOrder = 0 OnClick = BAnnulerClick end object BOk: TButton Left = 112 Top = 144 Width = 75 Height = 25 Caption = 'Ok' Default = True TabOrder = 1 OnClick = BOkClick end object BApercu: TButton Left = 16 Top = 144 Width = 75 Height = 25 Caption = 'Aper'#231'u' TabOrder = 3 OnClick = BApercuClick end object TBSeuil: TTrackBar Left = 8 Top = 96 Width = 264 Height = 33 Max = 254 Min = 1 Orientation = trHorizontal PageSize = 16 Frequency = 16 Position = 128 SelEnd = 0 SelStart = 0 TabOrder = 2 ThumbLength = 15 TickMarks = tmBottomRight TickStyle = tsAuto OnChange = TBSeuilChange end object ColorEdit2: TColorEdit Left = 120 Top = 32 Width = 89 Height = 22 BorderStyle = bsSingle Color = clWhite CustomText = 'Autres couleurs...' ColorDialog = MainForm.GlobalColorDialog ReadOnly = False OnChange = ColorEditChange end object ColorEdit1: TColorEdit Left = 16 Top = 32 Width = 89 Height = 22 BorderStyle = bsSingle Color = clBlack CustomText = 'Autres couleurs...' ColorDialog = MainForm.GlobalColorDialog ReadOnly = False OnChange = ColorEditChange end end