none
extracteur icon RRS feed

  • Question

  • Bonjour,

    depuis plusieurs jours , j'ai chercher une solution a mon probléme.

    voici en image mon projet :

    voici mon code :

    Dim open As New OpenFileDialog
        Dim save As New SaveFileDialog
        Private Sub Button1_Click(sender As System.Object, e As System.EventArgs) Handles Button1.Click
            open.Filter = "All Files (*.*)|*.*"
            open.Title = "Ouverture"
            If open.ShowDialog = Windows.Forms.DialogResult.OK Then
                Dim BMP1 As Bitmap = New Bitmap(PictureBox1.Width, PictureBox1.Height, System.Drawing.Imaging.PixelFormat.Format32bppArgb)
                BMP1 = Icon.ExtractAssociatedIcon(open.FileName).ToBitmap
                Dim G As Graphics = Graphics.FromImage(BMP1)
                G.DrawImage(BMP1, 0, 0)
                PictureBox1.Image = BMP1
                PictureBox1.SizeMode = PictureBoxSizeMode.AutoSize
                Button1.Enabled = False
                Button2.Enabled = True
            Else : Exit Sub
            End If
        End Sub
    
        Private Sub Button2_Click(sender As System.Object, e As System.EventArgs) Handles Button2.Click
            save.Filter = "Icon (*.ico)|*.ico"
            save.Title = "Enregistrement l'Icon"
            If save.ShowDialog = Windows.Forms.DialogResult.OK Then
                Dim bmp As New Bitmap(PictureBox1.Image)
                bmp = New Bitmap(bmp, New Size(32, 32))
                Dim ico As Icon = Icon.FromHandle(bmp.GetHicon)
                Dim fs As New FileStream(save.FileName, IO.FileMode.CreateNew)
                ico.Save(fs)
                fs.Close()
                MsgBox("Enregistrement Terminer", MsgBoxStyle.Information, "Extraction l'Icon")
                Button1.Enabled = True
                Button2.Enabled = False
            Else : Exit Sub
            End If
        End Sub
    End Class

    Mon probléme c'est comment avoir la même couleur skype.ico?

    Avez-vous une solution a mon probléme?

    cordialement,

    jeudi 25 juin 2015 09:23

Réponses

  • Bonjour,

    là comme ça, je dirais que c'est lié à ton enregistrement de ton Bitmap. Lors de la création tu dois surement repasser en 16 couleurs.

    Si tu veux le vérifier, installe Axialis Icon Workshop en mode évaluation dans une machine virtuelle.

    Vincent

    jeudi 25 juin 2015 12:39