Bonjour,
J'imprime un document avec le code suivant:
Malgré que mon document ne comprenne que 3 textbox et un listbox d'une quinzaine de lignes, il faut plus de 5 minutes (il est vrai sur des machines pas très performantes) pour envoyer le document sur l'imprimante. En regardant la taille du fichier qu'il envoie, je me suis rendu compte qu'il fait plus de 120 mégas (pour info quand je l'imprime sur une imprimante PDF, il ne fait plus que 340 ko soit 300 fois moins !).
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Private Sub btnPrint_Click(ByVal sender As System.Object, ByVal e As System.Windows.RoutedEventArgs) Dim pd As New PrintDocument AddHandler pd.PrintPage, AddressOf pdprintpage AddHandler pd.EndPrint, AddressOf pdendprint pd.Print("Mon impression") End Sub Private Sub pdprintpage(ByVal sender As Object, ByVal e As PrintPageEventArgs) e.PageVisual = Me.PrintableLayout End Sub
Y a t'il une astuce pour diminuer drastiquement la taille du fichier à imprimer ?
Ou sinon, peut-on créer un fichier de type texte sans formatage ? et si oui, comment ?
Partager