object SelParamsForm: TSelParamsForm Left = 305 Top = 153 ActiveControl = BOk BorderStyle = bsDialog Caption = 'Param'#233'trage manuel' ClientHeight = 434 ClientWidth = 304 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 OnKeyPress = FormKeyPress OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object BAnnuler: TButton Left = 214 Top = 394 Width = 75 Height = 25 Cancel = True Caption = 'Annuler' ModalResult = 2 TabOrder = 0 end object BOk: TButton Left = 130 Top = 394 Width = 75 Height = 25 Caption = 'Ok' Default = True TabOrder = 1 OnClick = BOkClick end object GroupBox1: TGroupBox Left = 16 Top = 14 Width = 273 Height = 129 Caption = ' Position ' TabOrder = 2 object LblX: TLabel Left = 18 Top = 44 Width = 16 Height = 13 Caption = 'X : ' end object LblY: TLabel Left = 18 Top = 75 Width = 16 Height = 13 Caption = 'Y : ' end object RBPos1: TRadioButton Left = 16 Top = 20 Width = 105 Height = 17 Caption = 'Manuelle' Checked = True TabOrder = 0 TabStop = True OnClick = RBPosClick end object EdiX: TSpinEdit2 Left = 38 Top = 41 Width = 65 Height = 21 MaxValue = 0 MinValue = 0 ShowUpDown = True TabOrder = 1 Value = 0 end object EdiY: TSpinEdit2 Left = 38 Top = 72 Width = 65 Height = 21 MaxValue = 0 MinValue = 0 ShowUpDown = True TabOrder = 2 Value = 0 end object RBPos2: TRadioButton Left = 168 Top = 20 Width = 97 Height = 17 Caption = 'Automatique' TabOrder = 3 OnClick = RBPosClick end object ToolBar: TToolBar Left = 165 Top = 40 Width = 87 Height = 82 Align = alNone ButtonHeight = 26 ButtonWidth = 27 Caption = 'ToolBar' EdgeBorders = [] Flat = True Images = MainForm.ImageList TabOrder = 4 Transparent = True Wrapable = False object TB0: TToolButton Left = 0 Top = 0 Caption = 'TB0' ImageIndex = 40 OnClick = TBClick end object TB1: TToolButton Tag = 1 Left = 27 Top = 0 Caption = 'TB1' ImageIndex = 40 OnClick = TBClick end object TB2: TToolButton Tag = 2 Left = 54 Top = 0 Caption = 'TB2' ImageIndex = 40 Wrap = True OnClick = TBClick end object TB3: TToolButton Tag = 3 Left = 0 Top = 26 Caption = 'TB3' ImageIndex = 40 OnClick = TBClick end object TB4: TToolButton Tag = 4 Left = 27 Top = 26 Caption = 'TB4' ImageIndex = 40 OnClick = TBClick end object TB5: TToolButton Tag = 5 Left = 54 Top = 26 Caption = 'TB5' ImageIndex = 40 Wrap = True OnClick = TBClick end object TB6: TToolButton Tag = 6 Left = 0 Top = 52 Caption = 'TB6' ImageIndex = 40 OnClick = TBClick end object TB7: TToolButton Tag = 7 Left = 27 Top = 52 Caption = 'TB7' ImageIndex = 40 OnClick = TBClick end object TB8: TToolButton Tag = 8 Left = 54 Top = 52 Caption = 'TB8' ImageIndex = 40 OnClick = TBClick end end end object GroupBox2: TGroupBox Left = 16 Top = 148 Width = 273 Height = 146 Caption = ' Taille ' TabOrder = 3 object Label1: TLabel Left = 18 Top = 20 Width = 42 Height = 13 Caption = 'Largeur :' end object Label4: TLabel Left = 16 Top = 68 Width = 44 Height = 13 Caption = 'Hauteur :' end object Image1: TImage Left = 102 Top = 44 Width = 16 Height = 55 AutoSize = True Picture.Data = {} Transparent = True end object CmbUnit: TComboBox Left = 123 Top = 61 Width = 94 Height = 21 Style = csDropDownList ItemHeight = 13 ItemIndex = 0 TabOrder = 0 Text = 'pixels' OnChange = CmbUnitChange Items.Strings = ( 'pixels' '% / image') end object EdiL: TFloatSpinEdit Left = 16 Top = 36 Width = 81 Height = 21 Format = '0' Increment = 1 MaxValue = 10000 MinValue = 1 ShowUpDown = True TabOrder = 1 Value = 1 OnChange = EdiLChange end object EdiH: TFloatSpinEdit Left = 16 Top = 84 Width = 81 Height = 21 Format = '0' Increment = 1 MaxValue = 10000 MinValue = 1 ShowUpDown = True TabOrder = 2 Value = 1 OnChange = EdiHChange end object CBProportions: TCheckBox Left = 16 Top = 117 Width = 193 Height = 17 Caption = 'Conserver les proportions' TabOrder = 3 end end object GroupBox3: TGroupBox Left = 16 Top = 301 Width = 273 Height = 81 Caption = ' Forme ' TabOrder = 4 object CBInverser: TCheckBox Left = 18 Top = 52 Width = 105 Height = 17 Caption = 'Inverser' TabOrder = 0 end object EdiForme: TSpecialEdit Left = 18 Top = 24 Width = 233 Height = 21 BorderStyle = bsSingle ButtonStyle = stDown DisabledColor = clNone DropDownMenu = PopForme ItemIndex = -1 MinimizeText = False NumGlyphs = 1 ParentColor = False ReadOnly = False ShowButton = True end end object PopForme: TPopupMenu OnPopup = PopFormePopup Left = 152 Top = 320 object PopRectangle: TMenuItem Caption = 'Rectangle' end object PopEllipse: TMenuItem Caption = 'Ellipse' end object PopRoundRect: TMenuItem Caption = 'Coins arrondis' end object PopLosange: TMenuItem Caption = 'Losange' end object N1: TMenuItem Caption = '-' end object PopTriangle1: TMenuItem Caption = 'Triangle base en bas' end object PopTriangle2: TMenuItem Caption = 'Triangle base '#224' gauche' end object PopTriangle3: TMenuItem Caption = 'Triangle base en haut' end object PopTriangle4: TMenuItem Caption = 'Triangle bas '#224' droite' end object N2: TMenuItem Caption = '-' end object PopLasso: TMenuItem Caption = 'Lasso' end object PopPolygone: TMenuItem Caption = 'Polygone' end object PopSep: TMenuItem Caption = '-' end object PopBitmap: TMenuItem Caption = 'Bitmap' end end end