IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VB.NET Discussion :

probleme affichage font dans combobox


Sujet :

VB.NET

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre éprouvé
    Homme Profil pro
    Étudiant
    Inscrit en
    Janvier 2018
    Messages
    323
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Nord (Nord Pas de Calais)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Janvier 2018
    Messages : 323
    Par défaut probleme affichage font dans combobox
    Bonjour,

    j'arrive pas à afficher les fonts dans ressources dans un combobox1.

    Nom : Capture d’écran 2023-09-25 111456.png
Affichages : 73
Taille : 3,8 Ko

    voici mon code :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    ComboBox1.Items.Add(GetFontRessources)
     
    Private Function GetFontRessources() As FontFamily
            For Each MyFont As String In Assembly.GetEntryAssembly().GetManifestResourceNames()
                If MyFont.ToLower.EndsWith(".ttf") Then
                    _FontCollection.AddFontFile(MyFont)
                End If
            Next
            Return New FontFamily(_FontCollection.Families(0).Name, _FontCollection)
        End Function
    Avez-vous une autre solution pour afficher les fonts dans ressources dans combobox1? merci d'avance

  2. #2
    Membre éprouvé
    Homme Profil pro
    Étudiant
    Inscrit en
    Janvier 2018
    Messages
    323
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France, Nord (Nord Pas de Calais)

    Informations professionnelles :
    Activité : Étudiant

    Informations forums :
    Inscription : Janvier 2018
    Messages : 323
    Par défaut
    Bonjour, j'ai trouver la solution pour afficher la liste de fonts dans my.ressources pour afficher dans combobox1.

    Nom : Sans titre.png
Affichages : 55
Taille : 11,8 Ko

    voici le codes :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    11
    12
    13
    14
    15
    16
    17
    18
    19
    20
    21
    Private ReadOnly _FontCollection As New PrivateFontCollection()
     
    Private Sub GetMyFontRessources(ByVal CB As ComboBox)
            For Each MyFont As String In Assembly.GetEntryAssembly().GetManifestResourceNames
                If MyFont.ToLower.EndsWith(".ttf") Then
                    Using fontStream As Stream = Assembly.GetEntryAssembly().GetManifestResourceStream(MyFont)
                        If Not (fontStream Is Nothing) Then
                            Dim data As System.IntPtr = Runtime.InteropServices.Marshal.AllocCoTaskMem(fontStream.Length)
                            Dim fontdata() As Byte = New Byte(fontStream.Length - 1) {}
                            fontStream.Read(fontdata, 0, fontStream.Length)
                            Marshal.Copy(fontdata, 0, data, fontStream.Length)
                            _FontCollection.AddMemoryFont(data, fontStream.Length)
                            fontStream.Close()
                            Marshal.FreeCoTaskMem(data)
                            Dim MyLangue As New FontFamily(_FontCollection.Families.Last.Name, _FontCollection)
                            CB.Items.Add(MyLangue.Name)
                        End If
                    End Using
                End If
            Next
        End Sub
    Mon problème, quand je choisie le font dans combobox1(voir image en haut). j'arrive à changer le font dans label1 mais pas avec ma liste dans my.ressources. pouvez-vous m'aider à résoudre ce problème? merci

Discussions similaires

  1. [Etat]Probleme affichage image dans états
    Par bibichris dans le forum IHM
    Réponses: 11
    Dernier message: 18/09/2013, 17h17
  2. Probleme affichage image dans picturebox
    Par Julien1987 dans le forum Windows Forms
    Réponses: 3
    Dernier message: 24/01/2007, 14h16
  3. Réponses: 3
    Dernier message: 01/06/2006, 19h45
  4. []probleme affichage valeur dans combobox
    Par gup dans le forum VB 6 et antérieur
    Réponses: 5
    Dernier message: 23/09/2005, 09h22

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo