1. Accueil
  2. Forum Codes-Sources
  3. Visual Basic
  4. VB.NET
Sujet Précédent Sujet Suivant

'System.String' en type 'System.Drawing.Image' [Résolu]

Signaler
Messages postés
315
Date d'inscription
dimanche 27 novembre 2005
Statut
Membre
Dernière intervention
22 décembre 2014
 -
Messages postés
315
Date d'inscription
dimanche 27 novembre 2005
Statut
Membre
Dernière intervention
22 décembre 2014
 -
Bonjour,

Pourquoi mon logo ne veut-il pas s'imprimer ?
Pourtant l'image se trouve bien dans le répertoire "locfichier05".

J'ai un message d'erreur
"Impossible d'effectuer un cast d'un objet de type 'System.String' en type 'System.Drawing.Image'."
à la fin de la ligne :
"logo01 = CType(locfichier05 & "BAL_modif_L264px.png", Image)"

Puis-je me permettre de vous solliciter afin de m'aider à solutionner ce bug ?
D'avance un immense merci.

Je vous joins d'abord mes imports : 
Imports System.IO
Imports System.Math
Imports System.Text.RegularExpressions
Imports System.Drawing
Imports System.Drawing.Text
Imports System.Drawing.Imaging
Imports System.Drawing.Image
Imports System.Drawing.Printing
Imports System.Drawing.Printing.PrinterSettings


Voici le code concerné : 
    Private Sub PrintDocument1_PrintPage(sender As Object, e As Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
        Dim logo01 As Image
        Dim fontCAP As PrivateFontCollection = New PrivateFontCollection
        fontCAP.AddFontFile(locfichier10 & "code128.ttf")
        Dim fontEAN As New Font(fontCAP.Families(0), 28, FontStyle.Regular)
        Dim font01 = New Font("Arial", 10)

        logo01 =  CType(locfichier05 & "BAL_modif_L264px.png", Image)
        rtbTicket.Text = "Bonjour"

        e.Graphics.DrawImageUnscaled(logo01, 0, 0, 264, 110)
        e.Graphics.DrawString(rtbTicket.Text, font01, Brushes.Black, 0, 125)
        e.Graphics.DrawString(code128TableB("20141128112523001245"), fontEAN, Brushes.Black, 0, 155)
    End Sub


jyd
A voir également:

2 réponses

Réponse 1 / 2
Messages postés
3258
Date d'inscription
jeudi 26 novembre 2009
Statut
Membre
Dernière intervention
3 décembre 2019
 50
Bonjour

que veux tu faire ? 
  logo01 =  CType(locfichier05 & "BAL_modif_L264px.png", Image)
Signaler
Messages postés
14799
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
6 juin 2021
 155
En gros charger l'image à l'emplacement désigné par le chemin d'accès.
L'aide de la classe System.Drawing.Bitmap devrait être consulté.
Signaler
Messages postés
315
Date d'inscription
dimanche 27 novembre 2005
Statut
Membre
Dernière intervention
22 décembre 2014
 >
Messages postés
14799
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
6 juin 2021
Ceci me semble hors sujet.
Cfr solution apportée par cs_ShayW ci dessous.
Signaler
Messages postés
14799
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
6 juin 2021
 155
Dans l'aide de System.drawing.bitmap, il y a la fonction qui permet de charger un fichier, mon message est totalement dans le sujet.
Signaler
Messages postés
315
Date d'inscription
dimanche 27 novembre 2005
Statut
Membre
Dernière intervention
22 décembre 2014
Merci à toi aussi
Réponse 2 / 2
Messages postés
3258
Date d'inscription
jeudi 26 novembre 2009
Statut
Membre
Dernière intervention
3 décembre 2019
 50 
logo01 = Image.FromFile(locfichier05 & "BAL_modif_L264px.png")
Signaler
Messages postés
315
Date d'inscription
dimanche 27 novembre 2005
Statut
Membre
Dernière intervention
22 décembre 2014
Merci.
C'est exactement cela que je voulais !!!
Répondre Posez votre question