object MainForm: TMainForm Left = 160 Top = 112 Width = 565 Height = 386 Caption = 'Ams Commande' Color = clAppWorkSpace Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -14 Font.Name = 'MS Sans Serif' Font.Style = [] FormStyle = fsMDIForm Icon.Data = {} Menu = MainMenu1 Position = poDefault Scaled = False OnClose = FormClose OnCloseQuery = FormCloseQuery OnCreate = FormCreate OnDestroy = FormDestroy OnResize = FormResize OnShow = FormShow PixelsPerInch = 120 TextHeight = 16 object SpeedPanel: TPanel Left = 0 Top = 0 Width = 557 Height = 33 Align = alTop ParentShowHint = False ShowHint = True TabOrder = 0 object OpenBtn: TSpeedButton Left = 33 Top = 4 Width = 25 Height = 25 Hint = 'Ouvrir' Flat = True Glyph.Data = { 36020000424D3602000000000000360000002800000010000000100000000100 1000000000000002000000000000000000000000000000000000FF7FFF7FFF7F FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F000000000000 00000000000000000000000000000000FF7FFF7FFF7FFF7FFF7F00000000E03D E03DE03DE03DE03DE03DE03DE03DE03D0000FF7FFF7FFF7FFF7F0000E07F0000 E03DE03DE03DE03DE03DE03DE03DE03DE03D0000FF7FFF7FFF7F0000FF7FE07F 0000E03DE03DE03DE03DE03DE03DE03DE03DE03D0000FF7FFF7F0000E07FFF7F E07F0000E03DE03DE03DE03DE03DE03DE03DE03DE03D0000FF7F0000FF7FE07F FF7FE07F000000000000000000000000000000000000000000000000E07FFF7F E07FFF7FE07FFF7FE07FFF7FE07F0000FF7FFF7FFF7FFF7FFF7F0000FF7FE07F FF7FE07FFF7FE07FFF7FE07FFF7F0000FF7FFF7FFF7FFF7FFF7F0000E07FFF7F E07F0000000000000000000000000000FF7FFF7FFF7FFF7FFF7FFF7F00000000 0000FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F000000000000FF7FFF7FFF7FFF7F FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F00000000FF7FFF7FFF7FFF7F FF7FFF7FFF7FFF7FFF7F0000FF7FFF7FFF7F0000FF7F0000FF7FFF7FFF7FFF7F FF7FFF7FFF7FFF7FFF7FFF7F000000000000FF7FFF7FFF7FFF7FFF7FFF7FFF7F FF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F} OnClick = FileOpenItemClick end object SaveBtn: TSpeedButton Left = 58 Top = 4 Width = 25 Height = 25 Hint = 'Enregistrer|' Enabled = False Flat = True Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333FFFFFFFFFFFFFF3333380000000000008333 333888F8FF888F888F333330CC08CCF770CC0333333888F8FF888F888F333330 CC08CCF770CC0333333888F888888F888F333330CC07887770CC03333338888F FFFFF8888F333330CC60000006CC033333388888888888888F333330CCCCCCCC CCCC033333388888888888888F333330C6000000006C03333338888888888888 8F333330C0FFFFFFFF0C0333333888FFFFFFFF888F333330C0FFFFFFFF0C0333 333888FFFFFFFF888F333330C0FFFFFFFF0C0333333888FFFFFFFF888F333330 C0FFFFFFFF0C0333333888FFFFFFFF888F33333000FFFFFFFF000333333888FF FFFFFF888F333330C0FFFFFFFF0C0333333888FFFFFFFF888F33333800000000 0000833333388888888888888333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 33333333333333333333} NumGlyphs = 2 OnClick = FileSaveItemClick end object CopyBtn: TSpeedButton Left = 91 Top = 4 Width = 25 Height = 25 Hint = 'Copier' Enabled = False Flat = True Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333FFFFFFFFFF33333333300000000003333333333888888888 8F3333333330FFFFFFFF033333333338F33333338F3333333330BFBFBFBF0333 33333338F3FFFFFF8F3333333330F888888F033333333338F88888838F333333 3330BFBFBFBF0333333FFFF8F3FFFFFF8F3333000000F888888F033333888888 F88888838F33330FFFF0BFBFBFBF0333338F3338F3FFFFFF8F33330FFFF0F888 888F0333338F3338F88888838F33330F7770BFBFBFBF0333338F3338F333333F 8F33330FFFF0FFFFFF000333338F3338F33333888333330F7770BFBFBF003333 338F3338FFFFFF883333330FFFF0000000033333338F3338888888833333330F 777777F033333333338F33333338F3333333330FFFFFFFF033333333338F3333 33F8F3333333330FFFFFF00033333333338F3333388833333333330FFFFFF003 33333333338FFFFFF88333333333330000000033333333333388888888333333 3333333333333333333333333333333333333333333333333333333333333333 33333333333333333333} NumGlyphs = 2 OnClick = CopyItemClick end object PasteBtn: TSpeedButton Left = 115 Top = 4 Width = 25 Height = 25 Hint = 'Coller' Enabled = False Flat = True Glyph.Data = { 06020000424D0602000000000000760000002800000028000000140000000100 0400000000009001000000000000000000001000000010000000000000000000 80000080000000808000800000008000800080800000C0C0C000808080000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333FFFFFFFFF333333333300000000033333333333888888 888F33333333330BFBFBFB03333FFFFFFF8F3FFFFF8F33000000000F88888F03 33888888888F8888838F307F7F7F7F0BFBFBFB0338F33333338F333FFF8F30F7 F7F7F70F77888F0338F33333338FFF88838F307F7F7F74444BFBFB0338F33333 38888F3FFF8F30F7F7F7F7C447888F0338F3333333888F88838F307F7F7F744C 4BFBFB0338F3333338888F333F8F30F7F7F7444F4FFF880338F33333888F8333 8883307F7F74440BFBFB803338F33338888FFFFF883330F7F744470000000333 38F33388838888888333307F7F747F7F0333333338F3333833338F33333330F7 F7F7F7F70333333338F3333333338F333333307F7F7F7F7F0333333338F33FFF FFF38F33333330F7444444F703333333383F888888FF833333333300ECCCC400 33333333338838888888333333333333ECCCC433333333333333388888333333 333333333EEEE333333333333333333333333333333333333333333333333333 33333333333333333333} NumGlyphs = 2 OnClick = PasteItemClick end object SpeedButton1: TSpeedButton Left = 174 Top = 4 Width = 25 Height = 25 Hint = 'Premier' Enabled = False Flat = True Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000010000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333333333FF3333333333333744333333333333F773333333333337 44473333333333F777F3333333333744444333333333F7733733333333374444 4433333333F77333733333333744444447333333F7733337F333333744444444 433333F77333333733333744444444443333377FFFFFFF7FFFFF999999999999 9999733777777777777333CCCCCCCCCC33333773FF333373F3333333CCCCCCCC C333333773FF3337F333333333CCCCCCC33333333773FF373F3333333333CCCC CC333333333773FF73F33333333333CCCCC3333333333773F7F3333333333333 CCC333333333333777FF33333333333333CC3333333333333773} NumGlyphs = 2 OnClick = Premier1Click end object SpeedButton2: TSpeedButton Left = 198 Top = 4 Width = 25 Height = 25 Hint = 'Pr�c�dent' Enabled = False Flat = True Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000010000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333FF3333333333333003333333333333F77F33333333333009033 333333333F7737F333333333009990333333333F773337FFFFFF330099999000 00003F773333377777770099999999999990773FF33333FFFFF7330099999000 000033773FF33777777733330099903333333333773FF7F33333333333009033 33333333337737F3333333333333003333333333333377333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333} NumGlyphs = 2 OnClick = Prcdent1Click end object SpeedButton3: TSpeedButton Left = 222 Top = 4 Width = 25 Height = 25 Hint = 'Suivant' Enabled = False Flat = True Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000010000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333FF3333333333333003333 3333333333773FF3333333333309003333333333337F773FF333333333099900 33333FFFFF7F33773FF30000000999990033777777733333773F099999999999 99007FFFFFFF33333F7700000009999900337777777F333F7733333333099900 33333333337F3F77333333333309003333333333337F77333333333333003333 3333333333773333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333} NumGlyphs = 2 OnClick = Suivant1Click end object SpeedButton4: TSpeedButton Left = 246 Top = 4 Width = 25 Height = 25 Hint = 'Dernier' Enabled = False Flat = True Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000010000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 33333FF3333333333333447333333333333377FFF33333333333744473333333 333337773FF3333333333444447333333333373F773FF3333333334444447333 33333373F3773FF3333333744444447333333337F333773FF333333444444444 733333373F3333773FF333334444444444733FFF7FFFFFFF77FF999999999999 999977777777777733773333CCCCCCCCCC3333337333333F7733333CCCCCCCCC 33333337F3333F773333333CCCCCCC3333333337333F7733333333CCCCCC3333 333333733F77333333333CCCCC333333333337FF7733333333333CCC33333333 33333777333333333333CC333333333333337733333333333333} NumGlyphs = 2 OnClick = Dernier1Click end object SpeedButton5: TSpeedButton Left = 291 Top = 4 Width = 25 Height = 25 Hint = 'Nouvelle commande' Flat = True Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000010000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000 000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F 00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B 0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F 0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF 00333377737FFFFF773333303300000003333337337777777333} NumGlyphs = 2 OnClick = Ajouter1Click end object SpeedButton7: TSpeedButton Left = 333 Top = 4 Width = 25 Height = 25 Hint = 'Calculer' Enabled = False Flat = True Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 0400000000000001000000000000000000001000000010000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337000000000 73333337777777773F3333088888888800000000B738377F7F33330808080000 00000000000077737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3F3F3F3F7F33330808080808 0333337F737373737F333308888888880333337F3FFFFFFF7F33330800000008 0333337F7777777F7F333308000E0E080333337F7FFFFF7F7F33330800000008 0333337F777777737F333308888888880333337F333333337F33330888888888 03333373FFFFFFFF733333700000000073333337777777773333} NumGlyphs = 2 OnClick = SpeedButton7Click end object SpeedButton8: TSpeedButton Left = 371 Top = 4 Width = 25 Height = 25 Hint = 'Imprimer commande' Enabled = False Flat = True Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000 0003377777777777777308888888888888807F33333333333337088888888888 88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F 8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F 8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF 03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF 03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0 33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033 33333337FFFF7733333333300000033333333337777773333333} NumGlyphs = 2 OnClick = SpeedButton8Click end object SpeedButton9: TSpeedButton Left = 141 Top = 4 Width = 25 Height = 25 Hint = 'Chercher' Enabled = False Flat = True Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 333333333333333333FF33333333333330003FF3FFFFF3333777003000003333 300077F777773F333777E00BFBFB033333337773333F7F33333FE0BFBF000333 330077F3337773F33377E0FBFBFBF033330077F3333FF7FFF377E0BFBF000000 333377F3337777773F3FE0FBFBFBFBFB039977F33FFFFFFF7377E0BF00000000 339977FF777777773377000BFB03333333337773FF733333333F333000333333 3300333777333333337733333333333333003333333333333377333333333333 333333333333333333FF33333333333330003333333333333777333333333333 3000333333333333377733333333333333333333333333333333} NumGlyphs = 2 OnClick = Chercher2Click end object SpeedButton10: TSpeedButton Left = 403 Top = 4 Width = 25 Height = 25 Hint = 'Enveloppes' Enabled = False Flat = True Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000120B0000120B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333333333333333333333333333333FFFFFFFFFFFFFFF000000000000 000077777777777777770FFFFFFFFFFFFFF07F3333FFF33333370FFFF777FFFF FFF07F333777333333370FFFFFFFFFFFFFF07F3333FFFFFF33370FFFF777777F FFF07F33377777733FF70FFFFFFFFFFF99907F3FFF33333377770F777FFFFFFF 9CA07F77733333337F370FFFFFFFFFFF9A907FFFFFFFFFFF7FF7000000000000 0000777777777777777733333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333333333333333 3333333333333333333333333333333333333333333333333333} NumGlyphs = 2 OnClick = SpeedButton10Click end object SpeedButton11: TSpeedButton Left = 8 Top = 4 Width = 25 Height = 25 Hint = 'Nouveau fichier' Flat = True Glyph.Data = { 76010000424D7601000000000000760000002800000020000000100000000100 04000000000000010000130B0000130B00001000000000000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333 333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000 0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF 07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF 0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0 33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333 3BB33773333773333773B333333B3333333B7333333733333337} NumGlyphs = 2 OnClick = FileNewItemClick end object Bevel1: TBevel Left = 85 Top = 1 Width = 1 Height = 31 Shape = bsRightLine end object Bevel2: TBevel Left = 170 Top = 1 Width = 1 Height = 31 Shape = bsRightLine end object Bevel3: TBevel Left = 364 Top = 1 Width = 1 Height = 31 Shape = bsRightLine end end object StatusBar: TStatusBar Left = 0 Top = 307 Width = 557 Height = 23 Font.Charset = DEFAULT_CHARSET Font.Color = clBlack Font.Height = -15 Font.Name = 'MS Sans Serif' Font.Style = [] Panels = < item Width = 50 end item Width = 50 end> ParentFont = False SimplePanel = False end object MainMenu1: TMainMenu Left = 36 Top = 200 object Imprimer1: TMenuItem Caption = '&Fichier' HelpContext = 3 Hint = 'Commandes li�es aux menus' object FileNewItem: TMenuItem Caption = '&Nouveau' Hint = 'Cr�er un nouveau fichier' OnClick = FileNewItemClick end object FileOpenItem: TMenuItem Caption = '&Ouvrir...' Hint = 'Ouvrir un fichier existant' ShortCut = 16463 OnClick = FileOpenItemClick end object FileCloseItem: TMenuItem Caption = '-' Hint = 'Fermer fichier en cours' end object FileSaveItem: TMenuItem Caption = '&Enregistrer' Enabled = False Hint = 'Enregistrer le fichier en cours' ShortCut = 16467 OnClick = FileSaveItemClick end object FileSaveAsItem: TMenuItem Caption = 'Enregistrer &sous...' Enabled = False Hint = 'Enregistrer le fichier en cours sous...' OnClick = FileSaveAsItemClick end object N1: TMenuItem Caption = '-' end object Miseenpage1: TMenuItem Caption = '&Mise en page...' Hint = 'Mettre en page' OnClick = Miseenpage1Click end object Imprimer2: TMenuItem Caption = '&Imprimer...' Enabled = False Hint = 'Imprimer le bon de commande' OnClick = Imprimer2Click end object Configurationdelimprimante1: TMenuItem Caption = '&Configurer l'#39'imprimante...' Hint = 'Configuration de l'#39'imprimante' OnClick = Configurationdelimprimante1Click end object N4: TMenuItem Caption = '-' end object FileExitItem: TMenuItem Caption = '&Quitter' Hint = 'Quitter l'#39'application' OnClick = FileExitItemClick end end object Edit1: TMenuItem Caption = '&Edition' HelpContext = 4 object CopyItem: TMenuItem Caption = 'Co&pier' Enabled = False Hint = 'Copier dans le Presse-papiers' ShortCut = 16451 OnClick = CopyItemClick end object PasteItem: TMenuItem Caption = 'C&oller' Enabled = False Hint = 'Coller depuis le Presse-papiers' ShortCut = 16470 OnClick = PasteItemClick end object N6: TMenuItem Caption = '-' end object Chercher2: TMenuItem Caption = 'C&hercher...' Enabled = False Hint = 'Chercher un document' OnClick = Chercher2Click end end object Gestion1: TMenuItem Caption = '&Document' HelpContext = 5 object Prcdent1: TMenuItem Caption = '&Pr�c�dent PgUp' Enabled = False Hint = 'Commande pr�c�dente' OnClick = Prcdent1Click end object Suivant1: TMenuItem Caption = '&Suivant PgDn' Enabled = False Hint = 'Commande suivant' OnClick = Suivant1Click end object Premier1: TMenuItem Caption = 'P&remier' Enabled = False Hint = 'Premier bon de commande' OnClick = Premier1Click end object Dernier1: TMenuItem Caption = '&Dernier' Enabled = False Hint = 'Dernier bon de commande' OnClick = Dernier1Click end object N2: TMenuItem Caption = '-' end object Ajouter1: TMenuItem Caption = '&Nouvelle commande' Hint = 'Ajouter commande' OnClick = Ajouter1Click end object Supprimer1: TMenuItem Caption = 'S&upprimer commande' Enabled = False Hint = 'Supprimer commande' OnClick = SpeedButton6Click end object N3: TMenuItem Caption = '-' end object Effacerligne1: TMenuItem Caption = '&Effacer ligne' Enabled = False Hint = 'Supprimer ligne de commande' OnClick = Effacerligne1Click end object Calculer1: TMenuItem Caption = '&Calculer' Enabled = False Hint = 'Calculer' ShortCut = 120 OnClick = SpeedButton7Click end object Liste1: TMenuItem Caption = '&Liste des commande' Enabled = False Hint = 'Liste des commandes' ShortCut = 113 OnClick = Liste1Click end end object Paramtres1: TMenuItem Caption = '&Param�tres' HelpContext = 6 object Socit1: TMenuItem Caption = '&Soci�t�' Hint = 'Description de la soci�t�' OnClick = Socit1Click end object Facture1: TMenuItem Caption = '&Commande' Hint = 'Param�tres de commande' OnClick = Facture1Click end object Clients1: TMenuItem Caption = '&Fournisseurs' Hint = 'Gestion des fournisseurs' OnClick = Clients1Click end object N7: TMenuItem Caption = '-' end object Ouvrira: TMenuItem Caption = '&Ouvrir automatiquement' Hint = 'Ouvrir le carnet au d�arrage' OnClick = OuvriraClick end end object Utilitaires1: TMenuItem Caption = '&Utilitaires' HelpContext = 7 object Calendrier1: TMenuItem Caption = '&Calendrier' Hint = 'Calendrier perp�tuel' OnClick = Calendrier1Click end object Calculatrice1: TMenuItem Caption = 'C&alculatrice' Hint = 'Calculatrice' OnClick = Calculatrice1Click end object Horloge1: TMenuItem Caption = '&Horloge' Hint = 'Horloge' OnClick = Horloge1Click end object EuroConversion1: TMenuItem Caption = '&Euro-conversion' Hint = 'Convetisseur Euro' OnClick = EuroConversion1Click end end object Help1: TMenuItem Caption = '&Aide' HelpContext = 8 Hint = 'Rubriques d'#39'aide' object Index1: TMenuItem Caption = '&Index' Hint = 'Sommaire de l'#39'aide' OnClick = HContents end object chercher1: TMenuItem Caption = '&Chercher' Hint = 'Rechercher par mots-cl�' OnClick = HSearch end object Utiliserlaide1: TMenuItem Caption = '&Utiliser l'#39'aide' Hint = 'Comment utilser l'#39'aide' OnClick = HowToUse end object N5: TMenuItem Caption = '-' end object HelpAboutItem: TMenuItem Caption = '&A propos' Hint = 'Informations sur la logiciel' OnClick = HelpAboutItemClick end end end object OpenDialog: TOpenDialog Filter = 'Commandes (*.cmd)|*.cmd' Left = 4 Top = 196 end object Timer1: TTimer OnTimer = Timer1Timer Left = 296 Top = 200 end object SaveDialog1: TSaveDialog Left = 72 Top = 192 end object PrintDialog1: TPrintDialog Left = 32 Top = 248 end object PrinterSetupDialog1: TPrinterSetupDialog Left = 72 Top = 248 end end