object frmGestionCommande: TfrmGestionCommande Left = 81 Top = 99 HelpContext = 6010 BorderStyle = bsDialog Caption = '$$$GESTION COMMANDE$$$' ClientHeight = 155 ClientWidth = 502 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Position = poScreenCenter OnActivate = FormActivate OnCreate = FormCreate PixelsPerInch = 96 TextHeight = 13 object Label1: TLabel Left = 40 Top = 16 Width = 83 Height = 13 Alignment = taRightJustify Caption = '$$$DESTIN REP' FocusControl = txtDir end object btnParcourir: TSpeedButton Left = 456 Top = 16 Width = 25 Height = 20 Glyph.Data = { 36050000424D3605000000000000360400002800000010000000100000000100 0800000000000001000000000000000000000001000000000000000000000000 80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA A600000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 0000000000000000000000000000000000000000000000000000000000000000 000000000000000000000000000000000000F0FBFF00A4A0A000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00070707070707 0707070707070707070707070707070707070707070707070707070707070707 0707070707070707070707070707070707070707070707070707070707070707 0707070707070707070707070707070707070707070707070707070707070707 0707070707070707070707070700000707000007070000070707070707000007 0700000707000007070707070707070707070707070707070707070707070707 0707070707070707070707070707070707070707070707070707070707070707 0707070707070707070707070707070707070707070707070707070707070707 0707070707070707070707070707070707070707070707070707} OnClick = btnParcourirClick end object txtDir: TEdit Left = 136 Top = 16 Width = 321 Height = 21 MaxLength = 80 TabOrder = 0 Text = 'txtDir' end object btnOK: TBitBtn Left = 80 Top = 120 Width = 80 Height = 27 Caption = '&OK' TabOrder = 2 OnClick = btnOKClick Kind = bkOK end object btnAnnuler: TBitBtn Left = 192 Top = 120 Width = 80 Height = 27 Caption = '$$$ANNUL' TabOrder = 3 Kind = bkCancel end object GroupBox1: TGroupBox Left = 16 Top = 48 Width = 473 Height = 57 Caption = '$$$OPT' TabOrder = 1 object chkIncludeSubDir: TCheckBox Left = 8 Top = 24 Width = 193 Height = 17 Caption = '$$$SAVE SUB-DIR$$$' TabOrder = 0 end object chkArcOnly: TCheckBox Left = 208 Top = 24 Width = 241 Height = 17 Caption = '$$$Fich MOD SEULEMENT' TabOrder = 1 end end object btnAide: TBitBtn Left = 304 Top = 120 Width = 80 Height = 27 Caption = '$$$AID' TabOrder = 4 OnClick = btnAideClick Kind = bkHelp end object BrowseFolder1: TBrowseFolder Flags = [bfFileSysDirsOnly, bfStatusText] ShowPathInStatusArea = True SyncCustomButton = False Left = 456 Top = 120 end end