Discussion :

[annedeblois]

Bonjour,

J'ai conçu une classe qui hérite de PrintDocument. Le document qui sera généré par cette classe est une fiche de dimensions personnalisées, qui s'imprimera sur du papier personnalisé.

Pour spécifier le format personnalisé, dans le code de la classe (dans le constructeur ou ailleurs), voici ce que je spécifie:

Code VB.NET :

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

1
2
 
Dim customPaperSize As New Printing.PaperSize("Perso", 800, 1000)

Je cherche à définir (dans Me.PrinterSettings.quelquechose) le le format personnalisé que j'ai défini, afin qu'il soit automatiquement envoyé à l'imprimante. Le code mentionné sur MSDN ne montre qu'une façon d'ajouter à la collection PaperSizes le format personnalisé, afin qu'il soit dans un ComboBox, mais rien ne spécifie comment le choisir de façon «non interactive» (c'est-à-dire dans le code, sans intervention de l'usager).

Je suis sûre que je brûle, mais je ne sais pas où regarder, exactement. Quelqu'un aurait-il une piste à me suggérer? D'avance, merci beaucoup, car je suis bloquée...

[annedeblois]

Pardon pour le UP, mais je voudrais savoir si la taille du papier doit être spécifiée du côté de la boîte de dialogue d'impression ou encore dans le code même de ma classe. Merci à l'avance,

[bidou]

je n'ai jamais regardé le problème en VB.NET mais en VB6 il fallait passer par l'API AddForm pour créer un format de papier sur l'imprimante

[annedeblois]

Merci pour ta suggestion, bidou.

Bizarrement, ils disent que dans .NET 2.0 ils ont ajouté les classes PaperSizeCollection et autres, je crois que ça remplace le AddForm. Si tel est le cas, il faudra que je vois si je suis obligée d'ajouter ce format à la liste déjà existante. Mais dans ce cas précis, je me demande comment formater mon document (les marges, etc.) pour qu'il ait exactement les mêmes paramètres.

Je vais voir si ça m'avance...

[annedeblois]

Après avoir fait une assez longue recherche sur Google, je suis tombée sur cette ligne de code:

Code :

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

1
2
 
Me.DefaultPageSettings.PaperSize.Kind = Printing.PaperKind.Custom

Mais j'ai un message d'erreur me disant que cette propriété est ReadOnly. Si j'ai bien compris, la personne doit sélectionner «Custom» ou «Personnalisé» comme type de papier. Mais je cherche à savoir s'il est possible de «simuler» la sélection du papier «Custom» et de définir les dimensions dans mon code, afin que cette ligne puisse fonctionner ou encore que je fasse un:

Code :

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

1
2
3
4
5
 
If Me.DefaultPageSettings.PaperSize.Kind = Printing.PaperKind.Custom Then
  Me.DefaultPageSettings.PaperSize = customPaperSize
  ' format que j'ai défini ailleurs dans le code
End If

Je sens que je m'approche du but...??

[annedeblois]

On dirait que ceci fonctionne:

Code :

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

1
2
 
Me.DefaultPageSettings.PaperSize = New Printing.PaperSize("8x10", 800, 1000)

...du moins sur une imprimante laser couleur HP et les imprimantes à jet d'encre de la boîte.

EDIT - ça fonctionne bien. Je mets Résolu.