TextGadget()

Syntax

Ergebnis = TextGadget(#Gadget, x, y, Breite, Höhe, 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 der Identifier 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.

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

Beispiel:

  If OpenWindow(0,0,0,270,160,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"TextGadget") And CreateGadgetList(WindowID(0))
    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

All