TextWidth()

Syntaxe

Resultat.d = TextWidth(Texte$)

Renvoie la longueur d'une chaîne de caractère.

Arguments

Texte$

Le texte à mesurer.

Valeur de retour

Renvoie la longueur du texte en précision Double dans la police de caractères en cours.

Exemple

  If OpenWindow(0, 0, 0, 200, 200, "Dimensions texte", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
    If CreateImage(0, 200, 200) And StartDrawing(ImageOutput(0))
      DrawText(50, 80, "PUREBASIC", RGB(255, 255, 0))
      Debug "Longueur du texte : " + Str(TextWidth("PUREBASIC"))
      Debug "Hauteur du texte  : " + Str(TextHeight("PUREBASIC"))
      StopDrawing() 
      ImageGadget(0, 0, 0, 200, 200, ImageID(0))
    EndIf
    
    Repeat
      Event = WaitWindowEvent()
    Until Event = #PB_Event_CloseWindow
  EndIf

Voir aussi

TextHeight(), DrawingFont()

OS Supportés

Tous