j'ai regardé dans l'aide de .NET 2005 et il me donne le code suivant, mais
il contient des erreurs(me.creategraphics par exemple), avez vous deja reussi
a faire fonctionner ce code? merci d'avance
Public Class Form1
Inherits Encodage
Private WithEvents printButton As New Button
Private WithEvents printDocument1 As New PrintDocument
Public Sub New()
printButton.Text = "Print Form"
Me.Controls.Add(printButton)
End Sub
Dim memoryImage As Bitmap
Private Sub CaptureScreen()
Dim myGraphics As Graphics = Me.CreateGraphics
Dim s As Size = Me.Size
memoryImage = New Bitmap(s.Width, s.Height, myGraphics)
Dim memoryGraphics As Graphics = Graphics.FromImage(memoryImage)
memoryGraphics.CopyFromScreen(Me.Location.X, Me.Location.Y, 0, 0, s)
End Sub
Private Sub printDocument1_PrintPage(ByVal sender As System.Object, _
ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles _
printDocument1.PrintPage
e.Graphics.DrawImage(memoryImage, 0, 0)
End Sub
Private Sub printButton_Click(ByVal sender As System.Object, ByVal e As _
System.EventArgs) Handles printButton.Click
CaptureScreen()
printDocument1.Print()
End Sub
Public Shared Sub Main()
Application.Run(New Form1())
End Sub
End Class
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Patrice
Merci SVP de toujours indiquer l'erreur rencontrée (à la compilation, à l'exécution ?). Mon premier soupçon serait que la classe Encodage n'hérite pas d'un formulaire ce que ferait que la méthode CreateGraphics serait inconnue ce qui créerait une erreur à la compilation...
Le code fonctionne bien ici à un deux ajustements prêts (démarrage directement sur le formulaire et le compilateur ne veut pas compiler si New n'appelle pas InitializeComponent).
-- Patrice
"damien" a écrit dans le message de news:
Bonjour,
j'ai regardé dans l'aide de .NET 2005 et il me donne le code suivant, mais il contient des erreurs(me.creategraphics par exemple), avez vous deja reussi a faire fonctionner ce code? merci d'avance
Public Class Form1 Inherits Encodage Private WithEvents printButton As New Button Private WithEvents printDocument1 As New PrintDocument
Public Sub New() printButton.Text = "Print Form" Me.Controls.Add(printButton) End Sub
Dim memoryImage As Bitmap
Private Sub CaptureScreen() Dim myGraphics As Graphics = Me.CreateGraphics Dim s As Size = Me.Size memoryImage = New Bitmap(s.Width, s.Height, myGraphics) Dim memoryGraphics As Graphics = Graphics.FromImage(memoryImage) memoryGraphics.CopyFromScreen(Me.Location.X, Me.Location.Y, 0, 0, s) End Sub
Private Sub printDocument1_PrintPage(ByVal sender As System.Object, _ ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles _ printDocument1.PrintPage e.Graphics.DrawImage(memoryImage, 0, 0) End Sub
Private Sub printButton_Click(ByVal sender As System.Object, ByVal e As _ System.EventArgs) Handles printButton.Click CaptureScreen() printDocument1.Print() End Sub
Public Shared Sub Main() Application.Run(New Form1()) End Sub End Class
Merci SVP de toujours indiquer l'erreur rencontrée (à la compilation, à
l'exécution ?). Mon premier soupçon serait que la classe Encodage n'hérite
pas d'un formulaire ce que ferait que la méthode CreateGraphics serait
inconnue ce qui créerait une erreur à la compilation...
Le code fonctionne bien ici à un deux ajustements prêts (démarrage
directement sur le formulaire et le compilateur ne veut pas compiler si New
n'appelle pas InitializeComponent).
--
Patrice
"damien" <damien@discussions.microsoft.com> a écrit dans le message de news:
D6A0C388-ACE5-47ED-AFEC-72142D1D5DB6@microsoft.com...
Bonjour,
j'ai regardé dans l'aide de .NET 2005 et il me donne le code suivant, mais
il contient des erreurs(me.creategraphics par exemple), avez vous deja
reussi
a faire fonctionner ce code? merci d'avance
Public Class Form1
Inherits Encodage
Private WithEvents printButton As New Button
Private WithEvents printDocument1 As New PrintDocument
Public Sub New()
printButton.Text = "Print Form"
Me.Controls.Add(printButton)
End Sub
Dim memoryImage As Bitmap
Private Sub CaptureScreen()
Dim myGraphics As Graphics = Me.CreateGraphics
Dim s As Size = Me.Size
memoryImage = New Bitmap(s.Width, s.Height, myGraphics)
Dim memoryGraphics As Graphics = Graphics.FromImage(memoryImage)
memoryGraphics.CopyFromScreen(Me.Location.X, Me.Location.Y, 0, 0,
s)
End Sub
Private Sub printDocument1_PrintPage(ByVal sender As System.Object, _
ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles _
printDocument1.PrintPage
e.Graphics.DrawImage(memoryImage, 0, 0)
End Sub
Private Sub printButton_Click(ByVal sender As System.Object, ByVal e As
_
System.EventArgs) Handles printButton.Click
CaptureScreen()
printDocument1.Print()
End Sub
Public Shared Sub Main()
Application.Run(New Form1())
End Sub
End Class
Merci SVP de toujours indiquer l'erreur rencontrée (à la compilation, à l'exécution ?). Mon premier soupçon serait que la classe Encodage n'hérite pas d'un formulaire ce que ferait que la méthode CreateGraphics serait inconnue ce qui créerait une erreur à la compilation...
Le code fonctionne bien ici à un deux ajustements prêts (démarrage directement sur le formulaire et le compilateur ne veut pas compiler si New n'appelle pas InitializeComponent).
-- Patrice
"damien" a écrit dans le message de news:
Bonjour,
j'ai regardé dans l'aide de .NET 2005 et il me donne le code suivant, mais il contient des erreurs(me.creategraphics par exemple), avez vous deja reussi a faire fonctionner ce code? merci d'avance
Public Class Form1 Inherits Encodage Private WithEvents printButton As New Button Private WithEvents printDocument1 As New PrintDocument
Public Sub New() printButton.Text = "Print Form" Me.Controls.Add(printButton) End Sub
Dim memoryImage As Bitmap
Private Sub CaptureScreen() Dim myGraphics As Graphics = Me.CreateGraphics Dim s As Size = Me.Size memoryImage = New Bitmap(s.Width, s.Height, myGraphics) Dim memoryGraphics As Graphics = Graphics.FromImage(memoryImage) memoryGraphics.CopyFromScreen(Me.Location.X, Me.Location.Y, 0, 0, s) End Sub
Private Sub printDocument1_PrintPage(ByVal sender As System.Object, _ ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles _ printDocument1.PrintPage e.Graphics.DrawImage(memoryImage, 0, 0) End Sub
Private Sub printButton_Click(ByVal sender As System.Object, ByVal e As _ System.EventArgs) Handles printButton.Click CaptureScreen() printDocument1.Print() End Sub
Public Shared Sub Main() Application.Run(New Form1()) End Sub End Class
