TextGadget()

Syntax

Ergebnis = TextGadget(#Gadget, x, y, Breite, Hoehe, Text$ [, Flags])

Erstellt ein Text-Gadget innerhalb der Gadget-Liste. Ein Text-Gadget ist ein einfacher Textbereich zum Anzeigen eines (nicht editierbaren) Textes.

Wenn #PB_Any als '#Gadget' Parameter verwendet wird, dann wird die Nummer des neuen Gadgets als 'Ergebnis' zurückgegeben.

'Flags' sind immer optional und können sich aus einer oder mehreren der folgenden Konstanten (verknüpft mit dem '|' OR-Operator) zusammensetzen:

  #PB_Text_Center : Der Text wird im Gadget zentriert dargestellt.
  #PB_Text_Right  : Der Text wird rechtsbündig dargestellt.
  #PB_Text_Border : Ein vertiefter Rand wird rings um das Gadget gezeichnet.

Der Inhalt des Gadgets kann später mit dem Befehl SetGadgetText() verändert werden und mit GetGadgetText() ermittelt werden. Den Zeichensatz eines TextGadget() können Sie mittels SetGadgetFont() ändern.

Dieses Gadget unterstützt die SetGadgetColor() und GetGadgetColor() Befehle mit den folgenden Werten als 'FarbTyp':

  #PB_Gadget_FrontColor: Textfarbe
  #PB_Gadget_BackColor : Hintergrundfarbe

Hinweis: Dieses Gadget empfängt keinerlei Anwendereingaben, auch GadgetToolTip() kann damit nicht verwendet werden.

Beispiel:

  If OpenWindow(0, 0, 0, 270, 160, "TextGadget", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
    TextGadget(0, 10,  10, 250, 20, "TextGadget Standard (Left)")
    TextGadget(1, 10,  70, 250, 20, "TextGadget Center", #PB_Text_Center)
    TextGadget(2, 10,  40, 250, 20, "TextGadget Right", #PB_Text_Right)
    TextGadget(3, 10, 100, 250, 20, "TextGadget Border", #PB_Text_Border)
    TextGadget(4, 10, 130, 250, 20, "TextGadget Center + Border", #PB_Text_Center|#PB_Text_Border)
    Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
  EndIf

Unterstützte OS

Alle