Discussion :

[Vincent32]

Bonjour,

Je souhaite après un click sur un bouton imprimer un Table Layout Panel et son contenu. Le tout qui tienne sur une page (il faut le redimensionner pour qu'il tienne sur une seule page) en orientation portrait. Je souhaite également pouvoir sélectionner mon imprimante.

J'ai parcouru le forum de nombreux post traitent ce problème, seulement le fait d'être débutant ainsi que le manque d'indications (ou explications) m'empêchent de l'adapter à mon cas, je consulte également le tutoriel

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

http://bidou.developpez.com/tutoriels/dotnet/impression/

mais le code est peu commenté et je ne vois pas comment faire. J'ai néanmoins commencé à réalisé un bout de code :

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
22
 Imports System.Drawing
Imports System.Drawing.Imaging
Imports System.Drawing.Printing
Imports System.IO
 
Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        Dim doc As New PrintDocument
        Dim PageSetup As New PageSetupDialog
 
        Me.PrintDocument1.DefaultPageSettings.Landscape = True
        Me.PrintDocument1.OriginAtMargins = True
        Me.PrintPreviewDialog1.ShowDialog(Me)
    End Sub
 
 
    Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
        Dim XPos, YPos As Single
        Dim ChaineImpr As String
        Using MyGr As Graphics = e.Graphics
 
        End Using
    End Sub

Mon form possède un Printdocument et un printpreviewdialog

Merci par avance de votre aide

[Sankasssss]

Bonjour,

Le cours de Ph. Lasserre et particulièrement la partie impression explique très bien cela.

pour spécifier l'imprimante dans le code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
            pd.PrinterSettings().PrinterName = strPrinter
            pd.DefaultPageSettings.PaperSource = _
            pd.PrinterSettings.PaperSources.Item(iIndexBacJaune)

et en dehors du code, voir la partie du cours consacré

Si vous avez une question précise, n'hésitez pas.

[Vincent32]

Bonjour Sankasssss,

Merci pour ta réponse, il est indéniable que le cours de Ph. Lasserre est excellent. Cependant la partie impression, je m'excuse laisse à désirer ... Toutefois le conseil indiqué :

Prévoir une longue soirée, au calme, un bon siège, 1 g de paracétamol et un gros thermos de café!!

est tout à fait pertinent et censé

En effet simple débutant je n'y comprends rien, le code n'est ni commenté ni expliqué comment s'y retrouver ?

A l'heure actuelle j'ai réalisé un gros programme très performant qui fonctionne très bien et ce grâce au cours de Ph. Lasserre.

Des questions précises ? Très bien :

Comment je récupère mon TableLayoutPanel5 pour l'imprimer ?
Comment je le redimensionne pour qu'il tienne sur une page ?

Pour ce qui est du choix de l'imprimante, je vais passer par un PrintDialog1 :

Comment je valide l'impression ?


Voici mes trois questions qui actuellement me bloquent dans la finalisation de mon programme. J'ai beau chercher sur le forum et dans les tutoriels je n'arrive pas à comprendre la logique et le code de l'impression.

Merci d'avance de bien vouloir m'aider, (je ne souhaite pas que l'on fasse à ma place je veux apprendre je veux que l'on m'explique pour que je puisse réaliser)

[Pol63]

toncontrol.DrawToBitmap (fournir un system.Drawing.bitmap créé avec la surcharge du new qui demande width et height je pense, le rectangle qui va avec je pense ou toncontrol.clientrectangle (à tester))
puis e.Graphics.Drawimage(le bitmap, destrect, sourcerect etc...)

la surcharge de drawimage demande destrect et sourcerect permet le redimensionnement
le destrect est à créer à partir de printablearea ou bounds (à tester aussi)
le sourcerect est 0,0,bitmap.width, bitmap.height

voir avec les dpi et les units si l'image est moche à l'impression, car l'écran est en 96 dpi, et du 96dpi imprimé c'est pas top donc redimensionné c'est peut etre pire

il faut en effet un peu de paracétamol tellement ces classes sont peu pratiques (par exemple des pagessettings qui se retrouvent sur plusieurs classes, rien n'est intuitif etc...)


NB : dans l'event printpage, si on met e.hasmorepages = true, à la sortie de l'event celui ci est redéclenché, ca permet de faire une impression sur plusieurs pages, par contre vu qu'on tombe dans la même méthode le code est chiant à écrire (d'où le paracétamol une fois de plus) et peut devenir illisible (paracétamol si relecture plusieurs mois plus tard)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
Using MyGr As Graphics = e.Graphics
 
End Using

retire ce using, il est plus destructeur qu'utile, si un évènement te donne une variable ce n'est pas à toi de la détruire

[MABROUKI]

Bonjour Vincent32...
Comme dis par Pol63 ,tu dois utiliser Control.DrawToBitmap (de ton TableLayoutPanell)....
Maintenant la resolution d'image generee est de 96 dpi "logiques" ..pas fameux....
code exemple avec un TableLayoutPanel avec gestion des marges....à remplir avec des controles par tes soins....

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
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
 
'- ajoute pour tester l'exemple:
'- un bouton ApercuImp
'- un TableLayoutPanel1  sur le WinForm 
'- PrintDocument
'- PrintPreviewDialog
Imports System.Drawing.Printing
Public Class frmPrintTableLayoutPanel
    Public Sub New()
 
        ' Cet appel est requis par le Concepteur Windows Form.
        InitializeComponent()
 
        ' Ajoutez une initialisation quelconque après l'appel InitializeComponent().
        btnApercuImp.Dock = DockStyle.Top
        ' Un simple control TableLayoutPanel que j'ai rempli avec d'autres controls
        ' Dock en fill et positionne en dessous du bouton
        Me.TableLayoutPanel1.Dock = DockStyle.Fill
        'Maximize la taille du form
        Me.WindowState = FormWindowState.Maximized
    End Sub
 
    Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage
        Dim MyGr As Graphics = e.Graphics
        'Met PageUnit à Display (apercu conforme à sortie printer)
        MyGr.PageUnit = GraphicsUnit.Display
        MyGr.SmoothingMode = Drawing2D.SmoothingMode.AntiAlias
        MyGr.SmoothingMode = Drawing2D.SmoothingMode.HighQuality
 
        'Envoie TableLayoutPanel dans un bitmap avec Control.DrawToBitmap
        Dim memoryImagePanel = New Bitmap(Me.TableLayoutPanel1.Bounds.Width, Me.TableLayoutPanel1.Bounds.Height, MyGr)
        Me.TableLayoutPanel1.DrawToBitmap(memoryImagePanel, Me.TableLayoutPanel1.Bounds)
 
        'code .net managed qui recopie l'image en gardant les proportions 
        'rect source =>memoryImagePanel 
        Dim RectSource As RectangleF = New Rectangle(0, 0, memoryImagePanel.Width, memoryImagePanel.Height)
        'definit les "marges" diaboliques
        Dim myMargin As Margins = New Margins(20, 20, 20, 20)
        'les assignes à  PrintDocument1
        PrintDocument1.DefaultPageSettings.Margins = myMargin
 
        'rect destination c'est notre format de page choisi par user (A4,A3 etc...)
        'il se trouve dans e.MarginBounds que nous avons personnalise cette fois
        Dim RectDest As RectangleF = e.MarginBounds
 
        'surcharge de DrawImage qui recopie l'image en gardant les proportions 
        MyGr.DrawImage(memoryImagePanel, RectDest, RectSource, GraphicsUnit.Pixel)
 
    End Sub
 
    Private Sub btnApercuImp_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnApercuImp.Click
        PrintPreviewDialog1.Document = PrintDocument1
        PrintPreviewDialog1.ShowDialog()
    End Sub
End Class

bon code............

[Vincent32]

Je travaille encore dessus, j'essaye par moi même et si j'ai plus de questions je reviens vers vous.

Mon problème majeur à l'heure actuelle est que le table Layout est plus grand que l'écran (scroll bar latérale et verticale) or il ne m'imprime que la partie visible à l'écran et non toute ma table layout

Je regarde le code et j'essaye le code fourni page 50 de ce document :

http://bidou.developpez.com/tutoriel...et/impression/

Si vraiement je bloque je reviens vous voir

En tout cas merci beaucoup pour les solutions apportées et le code commenté !