Discussion :

[Invité]

bonjour,
c'est un site remarquable pour trouver de l'aide sur la programmation
j'aurai besoin de votre aide
je fais un petit programme c'est un bloc note et le probleme c'est qu'il ne veut pas imprimer
voici le 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
Private Sub ImprimerToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ImprimerToolStripMenuItem.Click
        cmd.PrinterSettings.Copies = 3
        cmd.AllowCurrentPage = True
        cmd.AllowPrintToFile = True
        cmd.PrinterSettings.PrintToFile = False
        cmd.AllowSelection = True
        cmd.AllowSomePages = True
        If cmd.ShowDialog() = Windows.Forms.DialogResult.OK Then
            RichTextBox1.Text = "paramètres enregistrés."
        Else
            RichTextBox1.Text = "les paramètres n'ont pas été pris en compte."
        End If
 
    End Sub
End Class

alors quand je teste le prog quand je clique sur imprimer la boite de dialogue s'ouvre, la je trouve les imprimante et quand je clique sur imprimer bin rien ne se passe
pouvez vous me dire pourquoi ?
merci d'avance,

[cybermaxs]

Salut,

le problème de l'impression en dotnet, c'est qu'il faut se taper tout le travail. Les différents contrôles mis à disposition te permettent de sélectionner les imprimantes, configurer l'impression, ... bref de bien préparer ton impression. Mais au final, c'est à toi de réellement faire l'impression c'est à dire de faire la mise en forme en fonction du contenu ; j'avoue c'est pas toujours évident.

Pour cela, il y a l'objet PrintDocument et l'event PrintPage. En t'abonnement, tu devras faire le dessin par printPageEventArgs.Graphics.DrawString (par exemple pour une chaîne).

Si ton impression est simple, cela devrait suffire.

[mactwist69]

Tu peux aussi t'essayer à Crystal Report qui est pas mal (pas présent dans la toutes les versions de VS)

[Invité]

merci pour vos réponse

j'ai rajouté se code après end if

Code :

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

1
2
3
4
5
6
7
8
'Imprime en utilisant un gestionnaire d'erreurs pour intercepter les problemes
    try
    'déclare la variable imprimerdoc de type printdocument
    Dim imprimerdoc As New PrintDocument
    imprimerdoc.print()    'imprime le texte
        Catch ex As Exception
        End Try
    End Sub

mais la il m'imprime une page blanche
que faire je comprend pas trop bien

[cybermaxs]

Si tu besoin est juste d'imprimer une ligne de texte, ajoute alors un handler sur PrintDoc.PrintPage dans lequel tu vas faire un e.Graphics.DrawString(..).

Si tu n'ajoutes pas de handler c'est normal d'avoir une page vide, car c'est à toi de dire ce qu'il imprimer.

[Invité]

voici le nouveau code

Code :

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

1
2
3
4
5
6
7
8
9
10
 'Imprime en utilisant un gestionnaire d'erreurs pour intercepter les problemes
    try
    'déclare la variable imprimerdoc de type printdocument
            Dim imprimerdoc As New PrintDocument
            AddHandler imprimerdoc.PrintPage, AddressOf Me.imprimertexte
    imprimerdoc.print()    'imprime le texte
        Catch ex As Exception
        End Try
        ev.graphics.drawstring(RichTextBox1.Text)
    End Sub

le probleme c'est qu'il me souligne me.imprimertexte il me dit que imprimertexte n'est pas un membre de bloc note et quand je le remplace par richtextbox1 sa ne marche pas n'ont plus
en plus de sa il me dit que ev n'est pas déclarer