object OmbreExtForm: TOmbreExtForm Left = 353 Top = 135 ActiveControl = BOk BorderStyle = bsDialog Caption = 'Ombre ext'#233'rieure' ClientHeight = 390 ClientWidth = 297 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 OnKeyPress = FormKeyPress OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object LblEpaisseur: TLabel Left = 136 Top = 16 Width = 42 Height = 13 Caption = 'Largeur :' end object Label1: TLabel Left = 16 Top = 252 Width = 30 Height = 13 Caption = 'Fond :' end object Label3: TLabel Left = 16 Top = 16 Width = 42 Height = 13 Caption = 'Couleur :' end object LblPct: TLabel Left = 16 Top = 64 Width = 43 Height = 13 Caption = 'Opacit'#233' :' end object SB1: TSpeedButton Left = 106 Top = 267 Width = 23 Height = 22 GroupIndex = 1 Flat = True end object SB2: TSpeedButton Left = 102 Top = 32 Width = 23 Height = 22 GroupIndex = 1 Down = True Flat = True end object SBMotif: TSpeedButton Left = 258 Top = 316 Width = 23 Height = 21 Flat = True OnClick = SBMotifClick end object Label2: TLabel Left = 136 Top = 64 Width = 36 Height = 13 Caption = 'Marge :' end object BAnnuler: TButton Left = 208 Top = 352 Width = 75 Height = 25 Cancel = True Caption = 'Annuler' TabOrder = 10 OnClick = BAnnulerClick end object BOk: TButton Left = 128 Top = 352 Width = 75 Height = 25 Caption = 'Ok' Default = True TabOrder = 9 OnClick = BOkClick end object ColorEdit1: TColorEdit Left = 16 Top = 268 Width = 89 Height = 21 BorderStyle = bsSingle Color = clWhite CustomText = 'Autres couleurs...' ColorDialog = MainForm.GlobalColorDialog ReadOnly = False TabOrder = 6 TabStop = True end object ColorEdit2: TColorEdit Left = 16 Top = 32 Width = 85 Height = 21 BorderStyle = bsSingle Color = clBlack CustomText = 'Autres couleurs...' ColorDialog = MainForm.GlobalColorDialog ReadOnly = False TabOrder = 0 TabStop = True end object RGPos: TRadioGroup Left = 16 Top = 112 Width = 265 Height = 60 Caption = ' Position ' Columns = 2 ItemIndex = 3 Items.Strings = ( 'Haut / Gauche' 'Bas / Gauche' 'Haut / Droite' 'Bas / Droite') TabOrder = 4 end object SE2: TSpinEdit2 Tag = 80 Left = 16 Top = 80 Width = 85 Height = 21 MaxValue = 100 MinValue = 10 ShowUpDown = True TabOrder = 2 Value = 80 end object SE1: TSpinEdit2 Tag = 14 Left = 136 Top = 32 Width = 85 Height = 21 MaxValue = 50 MinValue = 3 ShowUpDown = True TabOrder = 1 Value = 14 end object RGStyle: TRadioGroup Left = 16 Top = 181 Width = 265 Height = 60 Caption = ' Style ' ItemIndex = 1 Items.Strings = ( 'Plat' 'Contour progressif') TabOrder = 5 end object CBMotif: TCheckBox Left = 16 Top = 296 Width = 241 Height = 17 Caption = 'Motif de fond :' TabOrder = 7 OnClick = CBMotifClick end object SE3: TSpinEdit2 Left = 136 Top = 80 Width = 85 Height = 21 MaxValue = 500 MinValue = 0 ShowUpDown = True TabOrder = 3 Value = 0 end object EdiMotif: TSpecialEdit Left = 16 Top = 316 Width = 241 Height = 21 BorderStyle = bsSingle ButtonStyle = stDown DisabledColor = clBtnFace ItemIndex = -1 MinimizeText = True NumGlyphs = 1 ParentColor = False ReadOnly = False ShowButton = False TabOrder = 8 TabStop = True OnClick = SBMotifClick end end