Bonjour,
J'essaie de programmer l'aperçu d'une feuille de facturation en utilisant une PictureBox à la place de l'objet Printer. Tout fonctionne mais j'ai des valeurs différentes avec TextHeight et TextWidth, ce qu'on peut facilement vérifier avec l'exemple suivant :
D'où vient cette différence et comment y remédier ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6 Private Sub Form_Load() Printer.FontName = Picture1.FontName Printer.FontSize = Picture1.FontSize MsgBox Picture1.TextHeight("A") & " - " & Printer.TextHeight("A") End Sub








Répondre avec citation
Partager