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
L'aide de la classe System.Drawing.Bitmap devrait être consulté.
Cfr solution apportée par cs_ShayW ci dessous.