object FSChemin: TFSChemin Left = 40 Top = 445 Width = 435 Height = 171 BorderIcons = [] Caption = 'R�pertoire de sauvegarde des param�tres et des records' Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OnClose = FormClose OnShow = FormShow PixelsPerInch = 96 TextHeight = 13 object Button1: TButton Left = 392 Top = 15 Width = 25 Height = 25 Caption = '...' TabOrder = 0 OnClick = Button1Click end object EdChemin: TEdit Left = 16 Top = 16 Width = 369 Height = 21 TabOrder = 1 Text = 'c:\temp' end object OK: TButton Left = 126 Top = 104 Width = 75 Height = 25 Caption = 'OK' Default = True ModalResult = 1 TabOrder = 2 OnClick = OKClick end object Button2: TButton Left = 208 Top = 104 Width = 75 Height = 25 Cancel = True Caption = 'Annuler' ModalResult = 2 TabOrder = 3 end object RGOption: TRadioGroup Left = 16 Top = 48 Width = 401 Height = 41 Caption = ' option ' Columns = 2 ItemIndex = 0 Items.Strings = ( '&essayer r�pertoire courant d'#39'abord' '&toujours utiliser le r�pertoire saisi') TabOrder = 4 end end