Discussion :

[Soncar]

bonjour

tout est dans le titre (je suppose que c'est complexe mais si vous avez des conseils je suis preneur ^^)

Merci d'avance

[Sacha999]

t'appelle en javascript document.print()

[Soncar]

J'ai vu que via un bouton avec le code suivant PrintDocument1.Print()

on appel PrintDocument1_PrintPage dans lequel on tape le code qui va servir à imprimer mais je ne sais pas quoi mettre comme contenu dans PrintDocument1_PrintPage pour imprimer mon DataGridView

Pour l'instant si quelqu'un à la solution ^^

Merci d'avance

[Soncar]

J'ai trouvé ce code qui pourrait m'être utile mais j'ai un soucis

Le bouton sur lequel je clic se nomme ImprimerGrid

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
 
Private Sub ImprimerGrid_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ImprimerGrid.Click
        CaptureScreen()
        PrintDocument1.Print()
    End Sub
 
 
    Private Declare Function BitBlt Lib "gdi32.dll" Alias "BitBlt" (ByVal hdcDest As IntPtr, ByVal nXDest As Integer, ByVal nYDest As _
   Integer, ByVal nWidth As Integer, ByVal nHeight As Integer, ByVal hdcSrc As IntPtr, ByVal nXSrc As Integer, ByVal nYSrc As Integer, _
   ByVal dwRop As System.Int32) As Long
    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)
        Dim dc1 As IntPtr = mygraphics.GetHdc
        Dim dc2 As IntPtr = memoryGraphics.GetHdc
        BitBlt(dc2, 0, 0, Me.ClientRectangle.Width, Me.ClientRectangle.Height, dc1, 0, 0, 13369376)
        mygraphics.ReleaseHdc(dc1)
        memoryGraphics.ReleaseHdc(dc2)
    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

Mon souhait c'est que l'image écran ne soit prise qu'en parti (c'est à dire la partie de mon dataGridView) en prenant les dimensions exactes de ce dernier

je pense que ça se passe dans

Code :

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

BitBlt(dc2, 0, 0, Me.ClientRectangle.Width, Me.ClientRectangle.Height, dc1, 0, 0, 13369376)

pour indiquer les points x et y de départs et x et y de fin de l'image à sauvegarder

Messieurs les experts je suis impatient de vous lire ^^

Merci d'avance