Ajuster une Picturebox à son contenu

Version imprimable

11/11/2019, 14h20
Herve_be

Ajuster une Picturebox à son contenu
Bonjour,
Je ne comprends pas, j'ai pourtant déjà pas mal travaillé avec des picturebox !
Je voudrais ajuster la taille d'une Picturebox au texte que j'y imprime.
voici le code, Legend est la picturebox avec ScaleMode = 3 - Pixel
Code:

1 2 3 4 5 6 Htext = le texte à imprimer sur la légende Legend.CurrentX = 0: Legend.CurrentY = 0 Legend.Print Htext Legend.Width = Legend.TextWidth(Htext) Legend.Height = Legend.Textheight(Htext)
mais la picturebox est moins large et moins haute que le texte !

Merci d'avance pour vos réponses

Il faut imprimer après avoir redimensionné le PictureBox. Par exemple :

Code:

1
2
3
4
5
6
7
8
9
    Htext= "le texte à imprimer sur la légende"   
    Legend.CurrentX = 0: Legend.CurrentY = 0
    Legend.Width = Legend.TextWidth(Htext) 
    Legend.Height = Legend.TextHeight(Htext)
    Legend.AutoRedraw = True
    Legend.BorderStyle = 0
    Legend.Appearance = 0
 
    Legend.Print Htext

14/11/2019, 17h21
Herve_be

Bonjour,
Je n'avais pas vu ta réponse parce que je ne reçois pas les notifications.
Je n'ai pas essayé parce qu'entre temps j'ai trouvé autre chose : Legend.TextWidth(Htext) se réfère à ScaleWidth
alors que Width est en twips
donc j'ai défini le même ScaleWidth que le graph sur lequel j'affiche ma légende ce qui met ScaleMode à zéro
et ça fonctionne.