Comment : créer du texte vertical

Vous pouvez utiliser un objet StringFormat pour spécifier que le texte doit être dessiné verticalement et non horizontalement.

Exemple

L'exemple suivant assigne la valeur DirectionVertical à la propriété FormatFlags d'un objet StringFormat. Cet objet StringFormat est passé à la méthode DrawString de la classe Graphics. La valeur DirectionVertical est un membre de l'énumération StringFormatFlags.

L'illustration suivante montre le texte vertical.

Polices du texte

        Dim myText As String = "Vertical text"

        Dim fontFamily As New FontFamily("Lucida Console")
        Dim font As New Font( _
           fontFamily, _
           14, _
           FontStyle.Regular, _
           GraphicsUnit.Point)
        Dim pointF As New PointF(40, 10)
        Dim stringFormat As New StringFormat()
        Dim solidBrush As New SolidBrush(Color.FromArgb(255, 0, 0, 255))

        stringFormat.FormatFlags = StringFormatFlags.DirectionVertical

        e.Graphics.DrawString(myText, font, solidBrush, pointF, stringFormat)

        string myText = "Vertical text";

        FontFamily fontFamily = new FontFamily("Lucida Console");
        Font font = new Font(
        fontFamily,
           14,
           FontStyle.Regular,
           GraphicsUnit.Point);
        PointF pointF = new PointF(40, 10);
        StringFormat stringFormat = new StringFormat();
        SolidBrush solidBrush = new SolidBrush(Color.FromArgb(255, 0, 0, 255));

        stringFormat.FormatFlags = StringFormatFlags.DirectionVertical;

        e.Graphics.DrawString(myText, font, solidBrush, pointF, stringFormat); 

Compilation du code

Voir aussi

Tâches

Comment : écrire du texte avec GDI