Etienne BAUDOUX

Vous souhaitez réagir à ce message ? Créez un compte en quelques clics ou connectez-vous pour continuer.
Etienne BAUDOUX

Forum sur les projets de Etienne BAUDOUX

Le Deal du moment : -20%
-20% sur le Lot de 2 écrans PC GIGABYTE ...
Voir le deal
429 €

3 participants

    Erreur de génération indéterminée [ RESOLU ]

    lereparateurdepc
    lereparateurdepc



    Masculin Nombre de messages : 5621
    Age : 31
    Localisation : Calvados
    Emploi/loisirs : Electrotechnicien / électricité, HAUTE TENSION, électronique, informatique, automatisme , Arduino, bref le BRICOLAGE , ...
    Humeur : toujours cool
    Date d'inscription : 31/01/2010

    Erreur de génération indéterminée [ RESOLU ] Empty Erreur de génération indéterminée

    Message par lereparateurdepc Dim 19 Déc 2010 - 9:20

    Bonjour ,

    Je poste car ça fait maintenent 30 minutes que je cherche l'action qui plante !
    Sur ma KryptonForm , il y avait un MenuStrip avec des contrôles , mais j'ai changé d'avis et j'ai supprimé ce MenuStrip ;
    j'ai bien évidement supprimé toutes les actions mais erreur de génération ! :

    Code:
    Project : TestAV_V3
    Last build the dimanche 19 décembre 2010 at 10:12

    Building failed : errors number: 2
    File code : C:\Program Files\Veler Software\SoftwareZator 2011\Temp\Code.vb

    Project setting :
    Type : ApplicationWindows
    Debug : Classique
    FormStart : WindowsForm1.szw
    SplashScreen :
    Optimize : True
    ----------------------------------------------------------------
        4 - Line 0, Column 0, Error BC2007 : option 'win32manifest:"D:\Mes documents\Programmation\Mes Projets SoftwareZator_2011\TestAV_V3\Bin\TestAV_V3.manifest"'; non reconnue ignorée
        5 - Line 497, Column 0, Error BC30506 : La clause Handles requiert une variable WithEvents définie dans le type conteneur ou l'un de ses types de base.
    ----------------------------------------------------------------

    Après vérifications , reverifications et rerererevérifications de TOUTES les actions du projet je ne trouve PAS l'erreur ! Sad

    Le rapport global est :
    Code:
    Project : TestAV_V3
    Last build the dimanche 19 décembre 2010 at 10:12

    Building failed : errors number: 2
    File code : C:\Program Files\Veler Software\SoftwareZator 2011\Temp\Code.vb

    Project setting :
    Type : ApplicationWindows
    Debug : Classique
    FormStart : WindowsForm1.szw
    SplashScreen :
    Optimize : True
    ----------------------------------------------------------------
        4 - Line 0, Column 0, Error BC2007 : option 'win32manifest:"D:\Mes documents\Programmation\Mes Projets SoftwareZator_2011\TestAV_V3\Bin\TestAV_V3.manifest"'; non reconnue ignorée
        5 - Line 497, Column 0, Error BC30506 : La clause Handles requiert une variable WithEvents définie dans le type conteneur ou l'un de ses types de base.
    ----------------------------------------------------------------

    ' NOTE :
    ' TOUTES MODIFICATIONS APPORTEES A CE FICHIER CODE NE SERONT PAS PRISES EN COMPTE LORS DE LA REGENERATION DU PROJET.

    '------------------------------------------------------------------------------
    ' <auto-generated>
    '    Ce code a été généré par un outil.
    '    Version du runtime :2.0.50727.4952
    '
    '    Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
    '    le code est régénéré.
    ' </auto-generated>
    '------------------------------------------------------------------------------

    Option Strict Off
    Option Explicit On

    Imports System

    Imports System.ComponentModel

    Imports System.Windows.Forms

    <Assembly: Reflection.AssemblyTitle("TestAV V3")>
    <Assembly: Reflection.AssemblyDescription("Permet de testet la fiabilité de son antivirus .")>
    <Assembly: Reflection.AssemblyCompany("François Production")>
    <Assembly: Reflection.AssemblyProduct("TestAV V3.exe")>
    <Assembly: Reflection.AssemblyCopyright("Copyright ©️ 2010 François Production , tous droits réservés .")>
    <Assembly: Reflection.AssemblyTrademark("FP")>
    <Assembly: Reflection.AssemblyVersion("3.0.0.0")>
    <Assembly: Reflection.AssemblyFileVersion("3.0.0.0")>
    <Assembly: Runtime.InteropServices.ComVisible(True)>


    'Ce Namespace a été généré par SoftwareZator 2011 Edition Professionnel (2.0.0.1)
    Namespace TestAV_V3
       
        Public Class AeroForm1_f
            Inherits VelerSoftware.WizardLib.AeroForm
           
            Public WithEvents kryptonButton1 As ComponentFactory.Krypton.Toolkit.KryptonButton
           
            Public WithEvents kryptonButton2 As ComponentFactory.Krypton.Toolkit.KryptonButton
           
            Public WithEvents components As System.ComponentModel.IContainer
           
            Public Sub New()
                MyBase.New
                Me.InitializeComponent
            End Sub
           
            Private Sub InitializeComponent()
                Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(AeroForm1_f))
                Me.kryptonButton1 = New ComponentFactory.Krypton.Toolkit.KryptonButton
                Me.kryptonButton2 = New ComponentFactory.Krypton.Toolkit.KryptonButton
                Me.HostPanel.SuspendLayout
                Me.kryptonButton1.SuspendLayout
                Me.SuspendLayout
                '
                'HostPanel
                '
                Me.HostPanel.Controls.Add(Me.kryptonButton1)
                Me.HostPanel.Size = New System.Drawing.Size(523, 393)
                '
                'kryptonButton1
                '
                Me.kryptonButton1.Controls.Add(Me.kryptonButton2)
                Me.kryptonButton1.Enabled = false
                Me.kryptonButton1.Location = New System.Drawing.Point(193, 175)
                Me.kryptonButton1.Name = "kryptonButton1"
                Me.kryptonButton1.PaletteMode = ComponentFactory.Krypton.Toolkit.PaletteMode.SparkleBlue
                Me.kryptonButton1.Size = New System.Drawing.Size(136, 42)
                Me.kryptonButton1.StateCommon.Back.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StateCommon.Back.Color2 = System.Drawing.Color.Blue
                Me.kryptonButton1.StateCommon.Border.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StateCommon.Border.Color2 = System.Drawing.Color.Blue
                Me.kryptonButton1.StateCommon.Border.DrawBorders = CType((((ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Top Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Bottom)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Left)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Right),ComponentFactory.Krypton.Toolkit.PaletteDrawBorders)
                Me.kryptonButton1.StateCommon.Content.ShortText.Font = New System.Drawing.Font("Tahoma", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte))
                Me.kryptonButton1.StateDisabled.Back.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StateDisabled.Back.Color2 = System.Drawing.Color.Blue
                Me.kryptonButton1.StateDisabled.Border.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StateDisabled.Border.Color2 = System.Drawing.Color.Blue
                Me.kryptonButton1.StateDisabled.Border.DrawBorders = CType((((ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Top Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Bottom)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Left)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Right),ComponentFactory.Krypton.Toolkit.PaletteDrawBorders)
                Me.kryptonButton1.StateDisabled.Content.ShortText.Font = New System.Drawing.Font("Tahoma", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte))
                Me.kryptonButton1.StateNormal.Back.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StateNormal.Back.Color2 = System.Drawing.Color.Blue
                Me.kryptonButton1.StateNormal.Border.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StateNormal.Border.Color2 = System.Drawing.Color.Blue
                Me.kryptonButton1.StateNormal.Border.DrawBorders = CType((((ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Top Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Bottom)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Left)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Right),ComponentFactory.Krypton.Toolkit.PaletteDrawBorders)
                Me.kryptonButton1.StateNormal.Content.ShortText.Color1 = System.Drawing.Color.White
                Me.kryptonButton1.StateNormal.Content.ShortText.Font = New System.Drawing.Font("Tahoma", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte))
                Me.kryptonButton1.StatePressed.Back.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StatePressed.Back.Color2 = System.Drawing.Color.Orange
                Me.kryptonButton1.StatePressed.Border.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StatePressed.Border.Color2 = System.Drawing.Color.Orange
                Me.kryptonButton1.StatePressed.Border.DrawBorders = CType((((ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Top Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Bottom)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Left)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Right),ComponentFactory.Krypton.Toolkit.PaletteDrawBorders)
                Me.kryptonButton1.StatePressed.Content.ShortText.Color1 = System.Drawing.Color.Red
                Me.kryptonButton1.StatePressed.Content.ShortText.Font = New System.Drawing.Font("Tahoma", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte))
                Me.kryptonButton1.StateTracking.Back.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StateTracking.Back.Color2 = System.Drawing.Color.Blue
                Me.kryptonButton1.StateTracking.Border.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StateTracking.Border.Color2 = System.Drawing.Color.Blue
                Me.kryptonButton1.StateTracking.Border.DrawBorders = CType((((ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Top Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Bottom)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Left)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Right),ComponentFactory.Krypton.Toolkit.PaletteDrawBorders)
                Me.kryptonButton1.StateTracking.Content.ShortText.Font = New System.Drawing.Font("Tahoma", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte))
                Me.kryptonButton1.TabIndex = 3
                Me.kryptonButton1.Values.Text = "Lancer le test"
                '
                'kryptonButton2
                '
                Me.kryptonButton2.Location = New System.Drawing.Point(260, 200)
                Me.kryptonButton2.Name = "kryptonButton2"
                Me.kryptonButton2.Size = New System.Drawing.Size(90, 25)
                Me.kryptonButton2.TabIndex = 0
                '
                'AeroForm1
                '
                Me.AutoScaleDimensions = New System.Drawing.SizeF(6!, 13!)
                Me.ClientSize = New System.Drawing.Size(590, 452)
                Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.Fixed3D
                Me.Icon = CType(resources.GetObject("$this.Icon"),System.Drawing.Icon)
                Me.Name = "AeroForm1"
                Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
                Me.Text = "AeroForm1"
                Me.HostPanel.ResumeLayout(false)
                Me.kryptonButton1.ResumeLayout(false)
                Me.ResumeLayout(false)
            End Sub
        End Class
       
        Public Class KryptonForm1_f
            Inherits ComponentFactory.Krypton.Toolkit.KryptonForm
           
            Public WithEvents buttonSpecHeaderGroup1 As ComponentFactory.Krypton.Toolkit.ButtonSpecHeaderGroup
           
            Public WithEvents kryptonButton1 As ComponentFactory.Krypton.Toolkit.KryptonButton
           
            Public WithEvents kryptonButton2 As ComponentFactory.Krypton.Toolkit.KryptonButton
           
            Public WithEvents richTextBox1 As System.Windows.Forms.RichTextBox
           
            Public WithEvents kryptonCheckBox1 As ComponentFactory.Krypton.Toolkit.KryptonCheckBox
           
            Public WithEvents kryptonCheckBox2 As ComponentFactory.Krypton.Toolkit.KryptonCheckBox
           
            Public WithEvents components As System.ComponentModel.IContainer
           
            Public Sub New()
                MyBase.New
                Me.InitializeComponent
            End Sub
           
            Private Sub InitializeComponent()
                Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(KryptonForm1_f))
                Me.buttonSpecHeaderGroup1 = New ComponentFactory.Krypton.Toolkit.ButtonSpecHeaderGroup
                Me.kryptonButton1 = New ComponentFactory.Krypton.Toolkit.KryptonButton
                Me.kryptonButton2 = New ComponentFactory.Krypton.Toolkit.KryptonButton
                Me.richTextBox1 = New System.Windows.Forms.RichTextBox
                Me.kryptonCheckBox1 = New ComponentFactory.Krypton.Toolkit.KryptonCheckBox
                Me.kryptonCheckBox2 = New ComponentFactory.Krypton.Toolkit.KryptonCheckBox
                Me.kryptonButton1.SuspendLayout
                Me.kryptonCheckBox1.SuspendLayout
                Me.SuspendLayout
                '
                'buttonSpecHeaderGroup1
                '
                Me.buttonSpecHeaderGroup1.UniqueName = "46526432F7EC4B6DEB80CF52368AD6D0"
                '
                'kryptonButton1
                '
                Me.kryptonButton1.Controls.Add(Me.kryptonButton2)
                Me.kryptonButton1.Enabled = false
                Me.kryptonButton1.Location = New System.Drawing.Point(216, 353)
                Me.kryptonButton1.Name = "kryptonButton1"
                Me.kryptonButton1.PaletteMode = ComponentFactory.Krypton.Toolkit.PaletteMode.SparkleBlue
                Me.kryptonButton1.Size = New System.Drawing.Size(136, 42)
                Me.kryptonButton1.StateCommon.Back.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StateCommon.Back.Color2 = System.Drawing.Color.Blue
                Me.kryptonButton1.StateCommon.Border.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StateCommon.Border.Color2 = System.Drawing.Color.Blue
                Me.kryptonButton1.StateCommon.Border.DrawBorders = CType((((ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Top Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Bottom)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Left)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Right),ComponentFactory.Krypton.Toolkit.PaletteDrawBorders)
                Me.kryptonButton1.StateCommon.Content.ShortText.Font = New System.Drawing.Font("Tahoma", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte))
                Me.kryptonButton1.StateDisabled.Back.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StateDisabled.Back.Color2 = System.Drawing.Color.Blue
                Me.kryptonButton1.StateDisabled.Border.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StateDisabled.Border.Color2 = System.Drawing.Color.Blue
                Me.kryptonButton1.StateDisabled.Border.DrawBorders = CType((((ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Top Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Bottom)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Left)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Right),ComponentFactory.Krypton.Toolkit.PaletteDrawBorders)
                Me.kryptonButton1.StateDisabled.Content.ShortText.Font = New System.Drawing.Font("Tahoma", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte))
                Me.kryptonButton1.StateNormal.Back.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StateNormal.Back.Color2 = System.Drawing.Color.Blue
                Me.kryptonButton1.StateNormal.Border.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StateNormal.Border.Color2 = System.Drawing.Color.Blue
                Me.kryptonButton1.StateNormal.Border.DrawBorders = CType((((ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Top Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Bottom)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Left)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Right),ComponentFactory.Krypton.Toolkit.PaletteDrawBorders)
                Me.kryptonButton1.StateNormal.Content.ShortText.Color1 = System.Drawing.Color.White
                Me.kryptonButton1.StateNormal.Content.ShortText.Font = New System.Drawing.Font("Tahoma", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte))
                Me.kryptonButton1.StatePressed.Back.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StatePressed.Back.Color2 = System.Drawing.Color.Orange
                Me.kryptonButton1.StatePressed.Border.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StatePressed.Border.Color2 = System.Drawing.Color.Orange
                Me.kryptonButton1.StatePressed.Border.DrawBorders = CType((((ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Top Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Bottom)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Left)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Right),ComponentFactory.Krypton.Toolkit.PaletteDrawBorders)
                Me.kryptonButton1.StatePressed.Content.ShortText.Color1 = System.Drawing.Color.Red
                Me.kryptonButton1.StatePressed.Content.ShortText.Font = New System.Drawing.Font("Tahoma", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte))
                Me.kryptonButton1.StateTracking.Back.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StateTracking.Back.Color2 = System.Drawing.Color.Blue
                Me.kryptonButton1.StateTracking.Border.Color1 = System.Drawing.Color.Black
                Me.kryptonButton1.StateTracking.Border.Color2 = System.Drawing.Color.Blue
                Me.kryptonButton1.StateTracking.Border.DrawBorders = CType((((ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Top Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Bottom)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Left)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Right),ComponentFactory.Krypton.Toolkit.PaletteDrawBorders)
                Me.kryptonButton1.StateTracking.Content.ShortText.Font = New System.Drawing.Font("Tahoma", 11.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte))
                Me.kryptonButton1.TabIndex = 0
                Me.kryptonButton1.Values.Text = "Valider"
                '
                'kryptonButton2
                '
                Me.kryptonButton2.Location = New System.Drawing.Point(260, 200)
                Me.kryptonButton2.Name = "kryptonButton2"
                Me.kryptonButton2.Size = New System.Drawing.Size(90, 25)
                Me.kryptonButton2.TabIndex = 0
                '
                'richTextBox1
                '
                Me.richTextBox1.BackColor = System.Drawing.Color.White
                Me.richTextBox1.Location = New System.Drawing.Point(0, 12)
                Me.richTextBox1.Name = "richTextBox1"
                Me.richTextBox1.ReadOnly = true
                Me.richTextBox1.Size = New System.Drawing.Size(601, 291)
                Me.richTextBox1.TabIndex = 4
                Me.richTextBox1.Text = resources.GetString("richTextBox1.Text")
                '
                'kryptonCheckBox1
                '
                Me.kryptonCheckBox1.Controls.Add(Me.kryptonCheckBox2)
                Me.kryptonCheckBox1.Location = New System.Drawing.Point(21, 323)
                Me.kryptonCheckBox1.Name = "kryptonCheckBox1"
                Me.kryptonCheckBox1.PaletteMode = ComponentFactory.Krypton.Toolkit.PaletteMode.SparkleBlue
                Me.kryptonCheckBox1.Size = New System.Drawing.Size(244, 17)
                Me.kryptonCheckBox1.StateNormal.ShortText.Color1 = System.Drawing.Color.Black
                Me.kryptonCheckBox1.StateNormal.ShortText.Font = New System.Drawing.Font("Tahoma", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte))
                Me.kryptonCheckBox1.TabIndex = 5
                Me.kryptonCheckBox1.Values.Text = "Je confirme avoir lu cette information ."
                '
                'kryptonCheckBox2
                '
                Me.kryptonCheckBox2.Location = New System.Drawing.Point(44, 359)
                Me.kryptonCheckBox2.Name = "kryptonCheckBox2"
                Me.kryptonCheckBox2.Size = New System.Drawing.Size(52, 20)
                Me.kryptonCheckBox2.TabIndex = 0
                '
                'KryptonForm1
                '
                Me.AllowButtonSpecToolTips = true
                Me.ClientSize = New System.Drawing.Size(601, 407)
                Me.Controls.Add(Me.kryptonCheckBox1)
                Me.Controls.Add(Me.richTextBox1)
                Me.Controls.Add(Me.kryptonButton1)
                Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.Fixed3D
                Me.Icon = CType(resources.GetObject("$this.Icon"),System.Drawing.Icon)
                Me.MaximizeBox = false
                Me.Name = "KryptonForm1"
                Me.PaletteMode = ComponentFactory.Krypton.Toolkit.PaletteMode.SparkleBlue
                Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
                Me.StateCommon.Back.Color1 = System.Drawing.Color.Black
                Me.StateCommon.Back.Color2 = System.Drawing.Color.Blue
                Me.StateCommon.Border.Color1 = System.Drawing.Color.Blue
                Me.StateCommon.Border.Color2 = System.Drawing.Color.Blue
                Me.StateCommon.Border.DrawBorders = CType((((ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Top Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Bottom)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Left)  _
                            Or ComponentFactory.Krypton.Toolkit.PaletteDrawBorders.Right),ComponentFactory.Krypton.Toolkit.PaletteDrawBorders)
                Me.StateCommon.Header.Back.Color1 = System.Drawing.Color.Black
                Me.StateCommon.Header.Back.Color2 = System.Drawing.Color.Blue
                Me.StateCommon.Header.Content.ShortText.Color1 = System.Drawing.Color.White
                Me.StateCommon.Header.Content.ShortText.Color2 = System.Drawing.Color.White
                Me.Text = "TestAV Informations"
                Me.TextExtra = "Version 3"
                Me.kryptonButton1.ResumeLayout(false)
                Me.kryptonCheckBox1.ResumeLayout(false)
                Me.kryptonCheckBox1.PerformLayout
                Me.ResumeLayout(false)
                Me.PerformLayout
            End Sub
        End Class
       
        Public Class WindowsForm1_f
            Inherits System.Windows.Forms.Form
           
            Public WithEvents contextMenuStrip1 As System.Windows.Forms.ContextMenuStrip
           
            Public WithEvents ouvrirToolStripMenuItem As System.Windows.Forms.ToolStripMenuItem
           
            Public WithEvents notifyIcon1 As System.Windows.Forms.NotifyIcon
           
            Public WithEvents components As System.ComponentModel.IContainer
           
            Public Sub New()
                MyBase.New
                Me.InitializeComponent
            End Sub
           
            Private Sub InitializeComponent()
                Me.components = New System.ComponentModel.Container
                Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(WindowsForm1_f))
                Me.contextMenuStrip1 = New System.Windows.Forms.ContextMenuStrip(Me.components)
                Me.ouvrirToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem
                Me.notifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components)
                Me.contextMenuStrip1.SuspendLayout
                Me.SuspendLayout
                '
                'contextMenuStrip1
                '
                Me.contextMenuStrip1.Font = New System.Drawing.Font("Segoe UI", 9!)
                Me.contextMenuStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.ouvrirToolStripMenuItem})
                Me.contextMenuStrip1.Name = "contextMenuStrip1"
                Me.contextMenuStrip1.Size = New System.Drawing.Size(153, 48)
                '
                'ouvrirToolStripMenuItem
                '
                Me.ouvrirToolStripMenuItem.Image = CType(resources.GetObject("ouvrirToolStripMenuItem.Image"),System.Drawing.Image)
                Me.ouvrirToolStripMenuItem.Name = "ouvrirToolStripMenuItem"
                Me.ouvrirToolStripMenuItem.Size = New System.Drawing.Size(152, 22)
                Me.ouvrirToolStripMenuItem.Text = "Ouvrir"
                '
                'notifyIcon1
                '
                Me.notifyIcon1.BalloonTipIcon = System.Windows.Forms.ToolTipIcon.Info
                Me.notifyIcon1.BalloonTipText = "TestAV V3 est accessible depuis cet icône ."
                Me.notifyIcon1.BalloonTipTitle = "TestAV V3"
                Me.notifyIcon1.ContextMenuStrip = Me.contextMenuStrip1
                Me.notifyIcon1.Icon = CType(resources.GetObject("notifyIcon1.Icon"),System.Drawing.Icon)
                Me.notifyIcon1.Text = "TestAV V3"
                Me.notifyIcon1.Visible = true
                '
                'WindowsForm1
                '
                Me.ClientSize = New System.Drawing.Size(204, 183)
                Me.ControlBox = false
                Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.None
                Me.Icon = CType(resources.GetObject("$this.Icon"),System.Drawing.Icon)
                Me.MaximizeBox = false
                Me.MinimizeBox = false
                Me.Name = "WindowsForm1"
                Me.Opacity = 0
                Me.ShowIcon = false
                Me.ShowInTaskbar = false
                Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen
                Me.Text = "support"
                Me.contextMenuStrip1.ResumeLayout(false)
                Me.ResumeLayout(false)
            End Sub
           
            <System.STAThreadAttribute()>  _
            Public Shared Sub Main()
                System.Windows.Forms.Application.EnableVisualStyles()
    Dim OKOKOK As Boolean
    For Each a As System.Diagnostics.Process In System.Diagnostics.Process.GetProcesses()
    If a.ProcessName = "TestAV_V3" Then
    If OKOKOK Then
    System.Diagnostics.Process.GetCurrentProcess.Kill
    Else
    OKOKOK = True
    End If
    End If
    Next
    If My.Computer.Registry.GetValue("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\NET Framework Setup\NDP\v3.5", "Version", Nothing) Is Nothing Then
    System.Windows.Forms.MessageBox.Show("The .Net Framework 3.5 was not found. TestAV_V3 can't start without it. Please install the .Net Framework 3.5 and try again.", "TestAV V3", MessageBoxButtons.OK, MessageBoxIcon.Error)
    System.Diagnostics.Process.Start("http://www.microsoft.com/downloads/details.aspx?FamilyId=333325FD-AE52-4E35-B531-508D977D32A6&displaylang=fr")
    End
    End If
    My.Resources.Culture = Globalization.CultureInfo.InvariantCulture : My.Resources.Culture = My.Resources.Culture
    System.Windows.Forms.Application.SetCompatibleTextRenderingDefault(False)
    For Each arg As String In System.Environment.GetCommandLineArgs
    If Not arg = System.Windows.Forms.Application.ExecutablePath Then
    Redim Preserve ALL_ARGUMENTS_APPLICATIONS(ALL_ARGUMENTS_APPLICATIONS.Length) : ALL_ARGUMENTS_APPLICATIONS(ALL_ARGUMENTS_APPLICATIONS.Length - 1) = arg
    End If
    Next
    System.Windows.Forms.Application.Run(New WindowsForm1_f)
            End Sub
        End Class

        Public Module VARIABLES_AZERTY_ABCDE_ALPHA_BETA_DELTA_SOFTWAREZATOR_VARIABLES
            Public VARIABLES_SOFTWAREZATOR_CURRENT_PLUGIN_VARIABLES As String
            Public file_licence_exist As Object '
            Public file_licence_valide As Object '
            Public file_read As Object '
            Public msg_confirm_exit As Object '
            Public var_accept_therms As Object '
            Public var_app_version As Object '
            Public var_test_en_cour As Object '
            Public Cancel As System.Drawing.Image = My.Resources.Cancel ' Ressource Cancel
            Public Create As System.Drawing.Image = My.Resources.Create ' Ressource Create
            Public Equipment As System.Drawing.Image = My.Resources.Equipment ' Ressource Equipment
            Public Help_symbol As System.Drawing.Image = My.Resources.Help_symbol ' Ressource Help_symbol
            Public Home As System.Drawing.Image = My.Resources.Home ' Ressource Home
            Public Key As System.Drawing.Image = My.Resources.Key ' Ressource Key
            Public Mail As System.Drawing.Image = My.Resources.Mail ' Ressource Mail
            Public Play As System.Drawing.Image = My.Resources.Play ' Ressource Play
            Public Quit As System.Drawing.Image = My.Resources.Quit ' Ressource Quit
            Public Earth As System.Drawing.Image = My.Resources.Earth ' Ressource Earth
            Public Earth_no2 As System.Drawing.Image = My.Resources.Earth_no2 ' Ressource Earth_no2
            Public ALL_ARGUMENTS_APPLICATIONS() As Object = New Object(-1){}
            Public ALLUSERPROFILE As Object = CStr(Environment.GetEnvironmentVariable("ALLUSERPROFILE"))
            Public APPDATA As Object = CStr(Environment.GetEnvironmentVariable("APPDATA"))
            Public CLASSPATH As Object = CStr(Environment.GetEnvironmentVariable("CLASSPATH"))
            Public CommonProgramFiles As Object = CStr(Environment.GetEnvironmentVariable("CommonProgramFiles"))
            Public COMPUTERNAME As Object = CStr(Environment.GetEnvironmentVariable("COMPUTERNAME"))
            Public ComSpec As Object = CStr(Environment.GetEnvironmentVariable("ComSpec"))
            Public FP_NO_HOST_CHECK As Object = CStr(Environment.GetEnvironmentVariable("FP_NO_HOST_CHECK"))
            Public HOMEDRIVE As Object = CStr(Environment.GetEnvironmentVariable("HOMEDRIVE"))
            Public HOMEPATH As Object = CStr(Environment.GetEnvironmentVariable("HOMEPATH"))
            Public LOCALAPPDATA As Object = CStr(Environment.GetEnvironmentVariable("LOCALAPPDATA"))
            Public LOGONSERVER As Object = CStr(Environment.GetEnvironmentVariable("LOGONSERVER"))
            Public NUMBER_OF_PROCESSORS As Object = CStr(Environment.GetEnvironmentVariable("NUMBER_OF_PROCESSORS"))
            Public OS As Object = CStr(Environment.GetEnvironmentVariable("OS"))
            Public PATH As Object = CStr(Environment.GetEnvironmentVariable("PATH"))
            Public PATHEXT As Object = CStr(Environment.GetEnvironmentVariable("PATHEXT"))
            Public PROCESSOR_ARCHITECTURE As Object = CStr(Environment.GetEnvironmentVariable("PROCESSOR_ARCHITECTURE"))
            Public PROCESSOR_IDENTIFIER As Object = CStr(Environment.GetEnvironmentVariable("PROCESSOR_IDENTIFIER"))
            Public PROCESSOR_LEVEL As Object = CStr(Environment.GetEnvironmentVariable("PROCESSOR_LEVEL"))
            Public PROCESSOR_REVISION As Object = CStr(Environment.GetEnvironmentVariable("PROCESSOR_REVISION"))
            Public ProgramData As Object = CStr(Environment.GetEnvironmentVariable("ProgramData"))
            Public ProgramFiles As Object = CStr(Environment.GetEnvironmentVariable("ProgramFiles"))
            Public [PUBLIC] As Object = CStr(Environment.GetEnvironmentVariable("PUBLIC"))
            Public SESSIONNAME As Object = CStr(Environment.GetEnvironmentVariable("SESSIONNAME"))
            Public SystemDrive As Object = CStr(Environment.GetEnvironmentVariable("SystemDrive"))
            Public SystemRoot As Object = CStr(Environment.GetEnvironmentVariable("SystemRoot"))
            Public TEMP As Object = CStr(Environment.GetEnvironmentVariable("TEMP"))
            Public TMP As Object = CStr(Environment.GetEnvironmentVariable("TMP"))
            Public USERDOMAIN As Object = CStr(Environment.GetEnvironmentVariable("USERDOMAIN"))
            Public USERNAME As Object = CStr(Environment.GetEnvironmentVariable("USERNAME"))
            Public USERPROFILE As Object = CStr(Environment.GetEnvironmentVariable("USERPROFILES"))
            Public windir As Object = CStr(Environment.GetEnvironmentVariable("windir"))
        End Module

        Public Module VARIABLES_AZERTY_ABCDE_ALPHA_BETA_DELTA_FORMS_SOFTWAREZATOR_VARIABLES
    Private _AeroForm1 As AeroForm1_f = New AeroForm1_f
    Public Property AeroForm1 As AeroForm1_f
    Get
    Return _AeroForm1
    End Get
    Set(ByVal value As AeroForm1_f)
    _AeroForm1 = value
    End Set
    End Property
    Private _KryptonForm1 As KryptonForm1_f = New KryptonForm1_f
    Public Property KryptonForm1 As KryptonForm1_f
    Get
    Return _KryptonForm1
    End Get
    Set(ByVal value As KryptonForm1_f)
    _KryptonForm1 = value
    End Set
    End Property
    Private _WindowsForm1 As WindowsForm1_f = New WindowsForm1_f
    Public Property WindowsForm1 As WindowsForm1_f
    Get
    Return _WindowsForm1
    End Get
    Set(ByVal value As WindowsForm1_f)
    _WindowsForm1 = value
    End Set
    End Property
        End Module



        Partial Public Class AeroForm1_f

        End Class

        Partial Public Class KryptonForm1_f

     Public Sub app_load(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles MyBase.Load
    Try
    var_app_version = My.Application.Info.Version.ToString
    Me.TextExtra = "Version : " & var_app_version & ""
    Catch err As Exception
    System.Windows.Forms.MessageBox.Show(Err.Message, "TestAV_V3", MessageBoxButtons.OK, MessageBoxIcon.Error)
    End Try
    End Sub

     Public Sub but_quit(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles quitterToolStripMenuItem.Click
    Try
    Application.Exit()
    Catch err As Exception
    System.Windows.Forms.MessageBox.Show(Err.Message, "TestAV_V3", MessageBoxButtons.OK, MessageBoxIcon.Error)
    End Try
    End Sub

     Public Sub checked_confirm_therms(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles kryptonCheckBox1.CheckedChanged
    Try
    var_accept_therms = Me.kryptonCheckBox1.Checked
    If var_accept_therms = "True" Then
    Me.kryptonButton1.Enabled = "True"
    Else
    Me.kryptonButton1.Enabled = "False"
    End If
    Catch err As Exception
    System.Windows.Forms.MessageBox.Show(Err.Message, "TestAV_V3", MessageBoxButtons.OK, MessageBoxIcon.Error)
    End Try
    End Sub

     Public Sub but_valid(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles kryptonButton1.Click
    Try
    If "Dialog" <> "Dialog" Then AeroForm1 = New AeroForm1_f
     AeroForm1.ShowDialog()
    Me.Visible = "False"
    Catch err As Exception
    System.Windows.Forms.MessageBox.Show(Err.Message, "TestAV_V3", MessageBoxButtons.OK, MessageBoxIcon.Error)
    End Try
    End Sub

        End Class

        Partial Public Class WindowsForm1_f

     Public Sub app_load(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles MyBase.Load
    Try
    file_licence_exist = My.Computer.FileSystem.FileExists("" & Application.StartupPath & "\licence.html")
    If file_licence_exist <> "True" Then
     VelerSoftware_VistaMessageBox.Show(Me, "TestAV V3", "Fichier de licence introuvable !", "Le fichier de licence est introuvable !" & System.Environment.NewLine & "" & System.Environment.NewLine & "Merci de réinstaller TestAV V3 ; si le problème persiste" & System.Environment.NewLine & "après un autre téléchargement du programme d'installation ," & System.Environment.NewLine & "contactez son éditeur : francoisproduction@gmail.com", VelerSoftware.VistaMessageBoxLib.VistaMessageBoxIcon.Warning, "Le programme va quitter car le fichier de licence est introuvable .", True, "", False, New VelerSoftware.VistaMessageBoxLib.VistaMessageBoxButton() {New VelerSoftware.VistaMessageBoxLib.VistaMessageBoxButton(VelerSoftware.VistaMessageBoxLib.VistaMessageBoxResult.OK)}, VelerSoftware.VistaMessageBoxLib.VistaMessageBoxIcon.SecurityWarning, False)
    Me.notifyIcon1.Visible = "False"
    Application.Exit()
    Else
    file_licence_valide = VelerSoftware_GeneralPlugin_Recuperer_Taill_Fichier.GetSize("" & Application.StartupPath & "\licence.html")
    If file_licence_valide <> "10 Ko" Then
     VelerSoftware_VistaMessageBox.Show(Me, "TestAV V3", "Fichier de licence invalide !", "Le fichier de licence est invalide !" & System.Environment.NewLine & "" & System.Environment.NewLine & "ATTENTION , vous avez peut-être été victime d'un programme piraté !" & System.Environment.NewLine & "Vérifiez la source du téléchargement et réinstallez-le !" & System.Environment.NewLine & "" & System.Environment.NewLine & "Si le problème persiste après un autre téléchargement " & System.Environment.NewLine & "du programme d'installation ,contactez son éditeur : " & System.Environment.NewLine & "francoisproduction@gmail.com", VelerSoftware.VistaMessageBoxLib.VistaMessageBoxIcon.Error, "Le programme va quitter car le fichier de licence est invalide .", True, "", False, New VelerSoftware.VistaMessageBoxLib.VistaMessageBoxButton() {New VelerSoftware.VistaMessageBoxLib.VistaMessageBoxButton(VelerSoftware.VistaMessageBoxLib.VistaMessageBoxResult.OK)}, VelerSoftware.VistaMessageBoxLib.VistaMessageBoxIcon.SecurityError, False)
    Me.notifyIcon1.Visible = "False"
    Application.Exit()
    Else
    Me.notifyIcon1.Visible = "False"
    Me.ouvrirToolStripMenuItem.Image = Create
    Me.notifyIcon1.ShowBalloonTip(CInt(1000))
    If "" <> "Dialog" Then KryptonForm1 = New KryptonForm1_f
     KryptonForm1.Show()
    End If
    End If
    Catch err As Exception
    System.Windows.Forms.MessageBox.Show(Err.Message, "TestAV_V3", MessageBoxButtons.OK, MessageBoxIcon.Error)
    End Try
    End Sub

     Public Sub but_open(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles ouvrirToolStripMenuItem.Click
    Try
    If "" <> "Dialog" Then KryptonForm1 = New KryptonForm1_f
     KryptonForm1.Show()
    Catch err As Exception
    System.Windows.Forms.MessageBox.Show(Err.Message, "TestAV_V3", MessageBoxButtons.OK, MessageBoxIcon.Error)
    End Try
    End Sub

     Public Sub double_click_icone(ByVal sender As System.Object, ByVal e As System.EventArgs)Handles notifyIcon1.DoubleClick
    Try
    Me.but_open(Nothing, Nothing)
    Catch err As Exception
    System.Windows.Forms.MessageBox.Show(Err.Message, "TestAV_V3", MessageBoxButtons.OK, MessageBoxIcon.Error)
    End Try
    End Sub

        End Class


    Public Class VelerSoftware_VistaMessageBox

       Shared Function Show(ByVal Owner As System.Windows.Forms.IWin32Window, ByVal WindowTitle As String, ByVal MainInstruction As String, ByVal Content As String, ByVal FooterIcon As VelerSoftware.VistaMessageBoxLib.VistaMessageBoxIcon, ByVal FooterText As String, ByVal ExpandFooterArea As Boolean, ByVal ExpandedInformation As String, ByVal ExpandedByDefault As Boolean, ByVal Buttons() As VelerSoftware.VistaMessageBoxLib.VistaMessageBoxButton, ByVal MainIcon As VelerSoftware.VistaMessageBoxLib.VistaMessageBoxIcon, ByVal LockSystem As Boolean) As String
          Dim resultat As VelerSoftware.VistaMessageBoxLib.VistaMessageBoxResult
          Dim vd As New VelerSoftware.VistaMessageBoxLib.VistaMessageBox()
          With vd
             .Owner = Owner
             .WindowTitle = WindowTitle
             .MainInstruction = MainInstruction
             .Content = Content
             .FooterIcon = FooterIcon
             .FooterText = FooterText
             .ExpandedInformation = ExpandedInformation
             .ExpandFooterArea = ExpandFooterArea
             .ExpandedByDefault = ExpandedByDefault
             .MainIcon = MainIcon
             .Buttons = Buttons
             .LockSystem = LockSystem
          End With
          resultat = vd.Show()
          Return resultat.ToString()
       End Function

    End Class


    Public Class VelerSoftware_GeneralPlugin_Recuperer_Taill_Fichier

        Shared Function GetSize(ByVal Filz As String) As String
            Dim RESULTAT As String

            If Microsoft.VisualBasic.FileLen(Filz) > 1024 Then
                RESULTAT = String.Format(Microsoft.VisualBasic.FileLen(Filz) / 1024, "#,#").Split(",")(0) & " Ko"
            Else
                RESULTAT = String.Format(Microsoft.VisualBasic.FileLen(Filz), "##0") & " Bytes"
            End If

            Return RESULTAT
        End Function

    End Class

    End Namespace

    Namespace My.Resources

        'Cette classe a été générée automatiquement par la classe StronglyTypedResourceBuilder.
        '''<summary>
        '''  Une classe de ressource fortement typée destinée, entre autres, à la consultation des chaînes localisées.
        '''</summary>
        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "2.0.0.0"), _
        Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
        Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
        Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
        Public Module Resources

            Private resourceMan As Global.System.Resources.ResourceManager

            Private resourceCulture As Global.System.Globalization.CultureInfo

            '''<summary>
            '''  Retourne l'instance ResourceManager mise en cache utilisée par cette classe.
            '''</summary>
            <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
            Public ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
                Get
                    If Object.ReferenceEquals(resourceMan, Nothing) Then
                        Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("TestAV_V3.Resources", GetType(Resources).Assembly)
                        resourceMan = temp
                    End If
                    Return resourceMan
                End Get
            End Property

            '''<summary>
            '''  Remplace la propriété CurrentUICulture du thread actuel pour toutes
            '''  les recherches de ressources à l'aide de cette classe de ressource fortement typée.
            '''</summary>
            <Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
            Public Property Culture() As Global.System.Globalization.CultureInfo
                Get
                    Return resourceCulture
                End Get
                Set(ByVal value As Global.System.Globalization.CultureInfo)
                    resourceCulture = value
                End Set
            End Property

    Public ReadOnly Property Cancel() As System.Drawing.Bitmap
    Get
    Dim obj As Object = ResourceManager.GetObject("Cancel", resourceCulture)
    Return CType(obj,System.Drawing.Bitmap)
    End Get
    End Property

    Public ReadOnly Property Create() As System.Drawing.Bitmap
    Get
    Dim obj As Object = ResourceManager.GetObject("Create", resourceCulture)
    Return CType(obj,System.Drawing.Bitmap)
    End Get
    End Property

    Public ReadOnly Property Equipment() As System.Drawing.Bitmap
    Get
    Dim obj As Object = ResourceManager.GetObject("Equipment", resourceCulture)
    Return CType(obj,System.Drawing.Bitmap)
    End Get
    End Property

    Public ReadOnly Property Help_symbol() As System.Drawing.Bitmap
    Get
    Dim obj As Object = ResourceManager.GetObject("Help_symbol", resourceCulture)
    Return CType(obj,System.Drawing.Bitmap)
    End Get
    End Property

    Public ReadOnly Property Home() As System.Drawing.Bitmap
    Get
    Dim obj As Object = ResourceManager.GetObject("Home", resourceCulture)
    Return CType(obj,System.Drawing.Bitmap)
    End Get
    End Property

    Public ReadOnly Property Key() As System.Drawing.Bitmap
    Get
    Dim obj As Object = ResourceManager.GetObject("Key", resourceCulture)
    Return CType(obj,System.Drawing.Bitmap)
    End Get
    End Property

    Public ReadOnly Property Mail() As System.Drawing.Bitmap
    Get
    Dim obj As Object = ResourceManager.GetObject("Mail", resourceCulture)
    Return CType(obj,System.Drawing.Bitmap)
    End Get
    End Property

    Public ReadOnly Property Play() As System.Drawing.Bitmap
    Get
    Dim obj As Object = ResourceManager.GetObject("Play", resourceCulture)
    Return CType(obj,System.Drawing.Bitmap)
    End Get
    End Property

    Public ReadOnly Property Quit() As System.Drawing.Bitmap
    Get
    Dim obj As Object = ResourceManager.GetObject("Quit", resourceCulture)
    Return CType(obj,System.Drawing.Bitmap)
    End Get
    End Property

    Public ReadOnly Property Earth() As System.Drawing.Bitmap
    Get
    Dim obj As Object = ResourceManager.GetObject("Earth", resourceCulture)
    Return CType(obj,System.Drawing.Bitmap)
    End Get
    End Property

    Public ReadOnly Property Earth_no2() As System.Drawing.Bitmap
    Get
    Dim obj As Object = ResourceManager.GetObject("Earth_no2", resourceCulture)
    Return CType(obj,System.Drawing.Bitmap)
    End Get
    End Property


    End Module
    End Namespace

    Merci de votre AIDE !

    Cordialement ,
    Le réparateur de PC
    Admin
    Admin
    Administrateur
    Administrateur


    Masculin Nombre de messages : 1882
    Age : 31
    Localisation : Boulogne Billancourt(92100)(France)
    Emploi/loisirs : Software Development Engineer
    Date d'inscription : 24/01/2008

    Erreur de génération indéterminée [ RESOLU ] Empty Re: Erreur de génération indéterminée [ RESOLU ]

    Message par Admin Dim 19 Déc 2010 - 14:55

    Bonjour,

    Je ne suis pas sur mais :
    Peut-être que tu as supprimé toute les actions, mais as-tu supprimé les fonctions liés aux évènements du contrôle qui n'existe plus?
    lereparateurdepc
    lereparateurdepc



    Masculin Nombre de messages : 5621
    Age : 31
    Localisation : Calvados
    Emploi/loisirs : Electrotechnicien / électricité, HAUTE TENSION, électronique, informatique, automatisme , Arduino, bref le BRICOLAGE , ...
    Humeur : toujours cool
    Date d'inscription : 31/01/2010

    Erreur de génération indéterminée [ RESOLU ] Empty Re: Erreur de génération indéterminée [ RESOLU ]

    Message par lereparateurdepc Dim 19 Déc 2010 - 17:24

    re ,

    OUI ! mais une rerere.....vérification peut-être ... Smile

    Merci !

    Cordialement ,
    Le réparateur de PC
    lereparateurdepc
    lereparateurdepc



    Masculin Nombre de messages : 5621
    Age : 31
    Localisation : Calvados
    Emploi/loisirs : Electrotechnicien / électricité, HAUTE TENSION, électronique, informatique, automatisme , Arduino, bref le BRICOLAGE , ...
    Humeur : toujours cool
    Date d'inscription : 31/01/2010

    Erreur de génération indéterminée [ RESOLU ] Empty Re: Erreur de génération indéterminée [ RESOLU ]

    Message par lereparateurdepc Dim 19 Déc 2010 - 17:31

    re ,

    Merci Admin , j'avais oublié un évènement !! Smile comme quoi , il une rererere.....vérification peut etre utile .

    Merci :)et désolé de ce sujet que sers a rien ! Sad

    Sujet résolu ! Smile

    Cordialement ,
    Le réparateur de PC
    Admin
    Admin
    Administrateur
    Administrateur


    Masculin Nombre de messages : 1882
    Age : 31
    Localisation : Boulogne Billancourt(92100)(France)
    Emploi/loisirs : Software Development Engineer
    Date d'inscription : 24/01/2008

    Erreur de génération indéterminée [ RESOLU ] Empty Re: Erreur de génération indéterminée [ RESOLU ]

    Message par Admin Dim 19 Déc 2010 - 17:43

    Comment ça il ne sert à rien? Si, il a résolu ton problème et peut être celui de quelqu'un d'autre Wink
    lereparateurdepc
    lereparateurdepc



    Masculin Nombre de messages : 5621
    Age : 31
    Localisation : Calvados
    Emploi/loisirs : Electrotechnicien / électricité, HAUTE TENSION, électronique, informatique, automatisme , Arduino, bref le BRICOLAGE , ...
    Humeur : toujours cool
    Date d'inscription : 31/01/2010

    Erreur de génération indéterminée [ RESOLU ] Empty Re: Erreur de génération indéterminée [ RESOLU ]

    Message par lereparateurdepc Dim 19 Déc 2010 - 17:57

    re ,

    Désolé ......

    Merci !

    Cordialement ,
    Le réparateur de PC
    Tinei
    Tinei
    On s'intègre
    On s'intègre


    Masculin Nombre de messages : 209
    Age : 25
    Localisation : Sur la terre....Où peut être sur une autre planète XD
    Emploi/loisirs : Réfléchissez un peu, et vous trouverez
    Humeur : Très bonne
    Date d'inscription : 05/11/2010

    Erreur de génération indéterminée [ RESOLU ] Empty Re: Erreur de génération indéterminée [ RESOLU ]

    Message par Tinei Dim 19 Déc 2010 - 18:06

    Admin a écrit:Comment ça il ne sert à rien? Si, il a résolu ton problème et peut être celui de quelqu'un d'autre Wink

    Tout à fait, j'avais la même chose.

    Merci

    Contenu sponsorisé


    Erreur de génération indéterminée [ RESOLU ] Empty Re: Erreur de génération indéterminée [ RESOLU ]

    Message par Contenu sponsorisé


      La date/heure actuelle est Jeu 28 Mar 2024 - 13:42