OVH Cloud OVH Cloud

Imprimer formulaire

3 réponses
Avatar
armin
Bonjour !

Comment imprimer tout simplement un formulaire qui se trouve ouvert a
l'ecran?

Merci

3 réponses

Avatar
AzertyH
Je suis dans le même cas que toi ! Je cherche à imprimer un formulaire tel
qu'il se présente à l'écran. Aparament, d'après mes recherches, on peut pas.
Au lieu de sa, j'ai compris qu'il fallait se taper la programmation de
l'impression de chaque élément du formulaire. En tout cas, moi je le dis bien
haut et très fort: Merci visual basic 2005 d'avoir autant régressé dans la
non simplicité. Et après il vont dire que c'est extraordinaire visual b. 2005
!!! Mort de rire... A part sa, si quelque peut nous dire comment on imprime
un formulaire en un clin d'eil, merci beaucoup. Je regrette beaucoup VB6
Avatar
brogalsk
'---------------------------------------------------------------
'Partie permettant d'imprimer le formulaire present a l'ecran
'---------------------------------------------------------------

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 btnPrint_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles btnPrint.Click
CaptureScreen()
PrintDocument1.Print()
End Sub

'---------------------------------------------------------------
'Fin de la partie permettant d'imprimer le formulaire present a l'ecran
'---------------------------------------------------------------


"AzertyH" a écrit :

Je suis dans le même cas que toi ! Je cherche à imprimer un formulaire tel
qu'il se présente à l'écran. Aparament, d'après mes recherches, on peut pas.
Au lieu de sa, j'ai compris qu'il fallait se taper la programmation de
l'impression de chaque élément du formulaire. En tout cas, moi je le dis bien
haut et très fort: Merci visual basic 2005 d'avoir autant régressé dans la
non simplicité. Et après il vont dire que c'est extraordinaire visual b. 2005
!!! Mort de rire... A part sa, si quelque peut nous dire comment on imprime
un formulaire en un clin d'eil, merci beaucoup. Je regrette beaucoup VB6



Avatar
AzertyH
Merci infiniment pour ta réponse. Après toutes mes recherches acharnées,
c'est la seule que j'ai trouvé crédible. Je me suis donc empressé d'essayer
ton code et j'ai vue avec emerveillement mon formulaire s'imprimer. Mais,
comme rien n'est parfait, le formulaire n'est maleureusement pas imprimé sur
toute la feuille (c très chiant arg...). Il faut que j'obtienne une véritable
feuille de facturation client qui s'imprime dans les regle de l'art : dans
toute ma feuille. Je suis stagière et c'est pour une entreprise. J'ai essayer
de faire varier les paramètre sur ton code, mais sans suxès. Quand j'essay
d'agrandir la hauteur, c'est impossible car la capture d'image de mon
formulaire ne doit pas dépasser la hauteur de mon écran. C'est pas simple du
tout. J'espère que tu pourra m'aider. Merci pour ton aide précieuse.
Cordialement