DrawText()

Syntaxe

Resultat.d = DrawText(X.d, Y.d, Texte$ [, CouleurTexte [, CouleurFond]])

Affiche un texte sur la surface de dessin en cours.

Arguments

X.d, Y.d,	Position du texte.
Texte$	Le texte à afficher.
CouleurTexte (optionnel)	Couleur du texte. Si le paramètre n'est pas précisé, la couleur définie par FrontColor() sera utilisée par défaut. Les fonctions RGB() ou RGBA() peuvent être utilisées pour définir facilement une couleur.
CouleurFond (optionnel)	Couleur de fond. Si le paramètre n'est pas précisé, la couleur définie par BackColor() sera utilisée par défaut. Les fonctions RGB() ou RGBA() peuvent être utilisées pour définir facilement une couleur.

Valeur de retour

Renvoie la nouvelle position en X du curseur texte, juste après le dernier caractère affiché.

Remarques

Si le DrawingMode() courant utilise l'option #PB_2DDrawing_Transparent alors le fond est transparent.
Si DrawingMode() est configuré pour avoir un fond opaque et que le mode de dessin courant utilise le canal alpha alors le texte est d'abord mélangé au fond et ensuite appliqué sur la zone de dessin.

Pour avoir une sortie de texte de type gadget, le mode de dessin #PB_2DDrawing_NativeText peut être utilisé (Voir DrawingMode()).

Exemple

  If OpenWindow(0, 0, 0, 200, 200, "DrawText Exemple", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
    If CreateImage(0, 200, 200) And StartDrawing(ImageOutput(0))
      DrawingMode(#PB_2DDrawing_Transparent)
      Box(0, 0, 200, 200, RGB(255, 255, 255))
      For i = 1 To 30
        DrawText(Random(200), Random(200), "Hello World!", RGB(Random(255), Random(255), Random(255)))
      Next i
      StopDrawing() 
      ImageGadget(0, 0, 0, 200, 200, ImageID(0))
    EndIf
    
    Repeat
      Event = WaitWindowEvent()
    Until Event = #PB_Event_CloseWindow
  EndIf

Voir aussi

DrawRotatedText(), DrawingFont(), FrontColor(), BackColor(), DrawingMode()

OS Supportés

Tous