object AddForm: TAddForm Left = 2706 Height = 118 Top = 511 Width = 270 BorderIcons = [biSystemMenu] BorderStyle = bsDialog Caption = 'Ajouter' ClientHeight = 118 ClientWidth = 270 DesignTimePPI = 108 Font.Height = -12 Font.Name = 'MS Sans Serif' OnCreate = FormCreate Position = poScreenCenter LCLVersion = '1.9.0.0' object Label1: TLabel Left = 4 Height = 15 Top = 4 Width = 181 Caption = 'Adding the following element:' Font.Height = -12 Font.Name = 'MS Sans Serif' ParentColor = False ParentFont = False end object Label2: TLabel Left = 4 Height = 15 Top = 22 Width = 25 Caption = '(...)' Font.Height = -12 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] ParentColor = False ParentFont = False end object Label3: TLabel Left = 4 Height = 15 Top = 50 Width = 55 Caption = 'Quantity:' Font.Height = -12 Font.Name = 'MS Sans Serif' ParentColor = False ParentFont = False end object Label4: TLabel Left = 45 Height = 15 Top = 22 Width = 21 Caption = '(...)' Font.Height = -12 Font.Name = 'MS Sans Serif' ParentColor = False ParentFont = False end object Edit: TSpinEdit Left = 81 Height = 29 Top = 45 Width = 180 Font.Height = -12 Font.Name = 'MS Sans Serif' OnChange = EditChange OnKeyPress = EditKeyPress ParentFont = False TabOrder = 0 end object btnCancel: TBitBtn Tag = 23 Left = 45 Height = 34 Top = 78 Width = 106 Anchors = [akRight, akBottom] Caption = '&Cancel' Font.Height = -12 Font.Name = 'MS Sans Serif' ModalResult = 2 ParentFont = False TabOrder = 1 end object btnOk: TBitBtn Tag = 22 Left = 155 Height = 34 Top = 78 Width = 106 Anchors = [akRight, akBottom] Caption = 'OK' Default = True Font.Height = -12 Font.Name = 'MS Sans Serif' ModalResult = 1 ParentFont = False TabOrder = 2 end end