object Convert: TConvert Left = 302 Top = 212 BorderIcons = [biSystemMenu] BorderStyle = bsSingle Caption = 'Conversion' ClientHeight = 382 ClientWidth = 469 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] Icon.Data = {} OldCreateOrder = False Position = poMainFormCenter OnActivate = FormActivate OnCreate = FormCreate OnDeactivate = FormDeactivate PixelsPerInch = 96 TextHeight = 13 object parametres: TGroupBox Left = 5 Top = 144 Width = 460 Height = 81 Caption = 'PARAMETRES DE CONVERSION' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Comic Sans MS' Font.Style = [fsBold] ParentFont = False TabOrder = 0 object label_nombre_msa: TLabel Left = 15 Top = 34 Width = 100 Height = 13 Alignment = taCenter Caption = 'Nb de fichiers (MSA):' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False end object compresser: TCheckBox Left = 176 Top = 32 Width = 113 Height = 17 Caption = 'Compresser (ZIP)' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 0 end object ecraser_sans_confirm: TCheckBox Left = 296 Top = 32 Width = 153 Height = 17 Caption = 'Ecraser sans confirmation' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ParentFont = False TabOrder = 1 end object ProgressBar1: TProgressBar Left = 8 Top = 56 Width = 441 Height = 17 Min = 0 Max = 100 TabOrder = 2 end object choix_nombre_msa: TComboBox Left = 120 Top = 29 Width = 33 Height = 21 Style = csDropDownList Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] ItemHeight = 13 ItemIndex = 0 ParentFont = False TabOrder = 3 Text = '1' Items.Strings = ( '1' '2') end end object source: TGroupBox Left = 5 Top = 0 Width = 460 Height = 137 Caption = 'FICHIERS SOURCE' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Comic Sans MS' Font.Style = [fsBold] ParentFont = False TabOrder = 1 object liste_fichiers: TTreeView Left = 8 Top = 24 Width = 417 Height = 105 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Microsoft Sans Serif' Font.Style = [] HideSelection = False Indent = 19 MultiSelectStyle = [msControlSelect, msShiftSelect] ParentFont = False PopupMenu = menu_liste ReadOnly = True TabOrder = 0 OnClick = liste_fichiersClick OnKeyDown = liste_fichiersKeyDown end object cmd_ajout_source: TBitBtn Left = 429 Top = 28 Width = 25 Height = 25 Hint = 'Ajouter des fichiers' ParentShowHint = False ShowHint = True TabOrder = 1 OnClick = cmd_ajout_sourceClick Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000C40E0000C40E00001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDA22 2DDDDDDDDDDDDAAA2DDDDDDDDDDDDAAA2DDD0000002222AA22220FFFFFAAAAAA AAA20F8888AAAAAAAAA20FFFFFAAAAAA2AAA0F8888888AAA2DDD0FFFFFFFFAAA 2DDD0F8888888AAAADDD0FFFFFFFFF0DDDDD0F8888888F0DDDDD0FFFFFF0000D DDDD0F888880F0DDDDDD0FFFFFF00DDDDDDD00000000DDDDDDDD} end object cmd_suppression_source: TBitBtn Left = 429 Top = 64 Width = 25 Height = 25 Hint = 'Supprimer le fichier s'#233'lectionn'#233 ParentShowHint = False ShowHint = True TabOrder = 2 OnClick = cmd_suppression_sourceClick Glyph.Data = { DE000000424DDE0000000000000076000000280000000F0000000D0000000100 04000000000068000000C40E0000C40E00001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00D99000000000 00D0D999FFFFFFFFF090DD9998888888F9D0DDD999FFFFFF99D0DDD099988889 90D0DDD0F999F999F0D0DDD0F8999998F0D0DDD0FF9999FFF0D0DDD999999998 F0D0D99999FFFF9900D09999F88888099DD0D9D0FFFFFF0099D0DDD00000000D DD90} end object cmd_ajouter_msa: TBitBtn Left = 429 Top = 100 Width = 25 Height = 25 Hint = 'Ajouter la deuxi'#232'me partie d'#39'un MSA '#224' reconstituer' ParentShowHint = False ShowHint = True TabOrder = 3 OnClick = cmd_ajouter_msaClick Glyph.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000C40E0000C40E00001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDA22 2DDDDDDDDDDDDAAA2DDDDDDDDDDDDAAA2DDD8888882222AA22228FFFFFAAAAAA AAA28F8888AAAAAAAAA28FFFFFAAAAAA2AAA8F8888888AAA2DDD8FFFFFFFFAAA 2DDD8F8888888AAAADDD8FFFFFFFFF8DDDDD0F880800008D0DD00FFF0FF8880D 0DD00F08088000DD000000F00F088DDD0DD008880880000DD00D} end end object Group_compte_rendu: TGroupBox Left = 5 Top = 264 Width = 460 Height = 113 Caption = 'COMPTE RENDU' Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = 'Comic Sans MS' Font.Style = [fsBold] ParentFont = False TabOrder = 2 object compte_rendu: TMemo Left = 8 Top = 20 Width = 441 Height = 85 Font.Charset = ANSI_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'Microsoft Sans Serif' Font.Style = [] ParentFont = False ReadOnly = True ScrollBars = ssVertical TabOrder = 0 end end object cmd_conversion_st: TBitBtn Left = 96 Top = 232 Width = 105 Height = 25 TabOrder = 3 OnClick = cmd_conversion_stClick Glyph.Data = { 76020000424D760200000000000076000000280000003C000000100000000100 04000000000000020000C40E0000C40E00001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD0000DDDD00000000 000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD0000DDDD0FFFFFFF FF0DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD000000000F888800 000000000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD00000FFF0FFFFF0F FFFFFFFF0DDDDDDDDDDDDDDDDDDDDDDD000DDDD00DDDDDDD00000F880F88880F 8888888F0DDDDDDDDDDD9DDDDDDDDDD00000DDD00DDDDDDD00000FFF0FFFFF0F FFFFFFFF0DDDDDDDDDDD99DDDDDDDDD00D00DDD00DDDDDDD00000F880F88880F 8888888F0DDDDD999999999DDDDDDDDDD000DDD00DDDDDDD00000FFF0FFFFF0F FFFFFFFF0DDDDD9999999999DDDDDDDD00DDDDD00DDDDDDD00000F880F88880F 8888888F0DDDDD999999999DDDDDDDD00D0DDDD00DDDDDDD00000FFF0FFFFF0F FFFFFFFF0DDDDDDDDDDD99DDDDDDDDD00000D000000DDDDD00000F880F88880F 8888888F0DDDDDDDDDDD9DDDDDDDDDDD000DD000000DDDDD00000FFF0FFFFF0F FFFFF0000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD00000F880000000F 888880F0DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD00000FFFFFF00D0F FFFFF00DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD000000000000DD00 000000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD0000} end object cmd_conversion_msa: TBitBtn Left = 264 Top = 232 Width = 105 Height = 25 TabOrder = 4 OnClick = cmd_conversion_msaClick Glyph.Data = { 76020000424D760200000000000076000000280000003C000000100000000100 04000000000000020000C40E0000C40E00001000000000000000000000000000 8000008000000080800080000000800080008080000080808000C0C0C0000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD0000DDDD00000000 000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD0000DDDD0FFFFFFF FF0DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD000000000F888800 000000000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD00000FFF0FFFFF0F FFFFFFFF0DDDDDDDDDDDDDDDDDD00D0D00DD000DD00DD00D00000F880F88880F 8888888F0DDDDDDDDDDD9DDDDDD00D0D00D00000D000000D00000FFF0FFFFF0F FFFFFFFF0DDDDDDDDDDD99DDDDD00D0D00D00D00DD0000DD00000F880F88880F 8888888F0DDDDD999999999DDDD0000000DDD000DD0D00DD00000FFF0FFFFF0F FFFFFFFF0DDDDD9999999999DDD0000000DD00DDDD0000DD00000F880F88880F 8888888F0DDDDD999999999DDDD000D000D00D0DDD0000DD00000FFF0FFFFF0F FFFFFFFF0DDDDDDDDDDD99DDDDD000D000D00000DD0000DD00000F880F88880F 8888888F0DDDDDDDDDDD9DDDDDD000D000DD000DDDD00DDD00000FFF0FFFFF0F FFFFF0000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD00000F880000000F 888880F0DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD00000FFFFFF00D0F FFFFF00DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD000000000000DD00 000000DDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDDD0000} end object menu_liste: TPopupMenu Left = 72 Top = 56 object raz_liste: TMenuItem Caption = 'RAZ' OnClick = raz_listeClick end end end