PureBoard

Code: Alles auswählen

If OpenWindow(0,0,0,500,500,"",#PB_Window_SystemMenu)
  If CreateGadgetList(WindowID(0))
    TextGadget(1,10,10,100,100,"Dieser Text wird zentriert, denn dieser Flag zentriert nicht nur eine Zeile, sondern alle.",#PB_Text_Center)
  EndIf
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf

Code: Alles auswählen

OpenWindow(0,0,0,512,512,"Vertikal zentrieren")
A1$ = "Vertikal zentriert"
A2$ = "Auch dieser Text ist trotz seiner größeren Länge und dem damit verbundenen Zeilenumbruch auf dem Buttongadget immer noch vertikal zentriert"
B1$ = "Horizontal zentriert"
B2$ = "Dieser Text ist zwar horizontal zentriert, aber seine obere Zeile beginnt immer am oberen Ende des Gadgets, das nennt man auch Top-Align"
CreateGadgetList(WindowID(0))
  ButtonGadget(0,   8,   8, 240, 240, A1$)
  ButtonGadget(1,   8, 264, 240, 240, A2$,#PB_Button_MultiLine)
  TextGadget  (2, 264,   8, 240, 240, B1$,#PB_Text_Center | #PB_Text_Border)  
  TextGadget  (3, 264, 264, 240, 240, B2$,#PB_Text_Center | #PB_Text_Border)  
Repeat:Until WaitWindowEvent() = #PB_Event_CloseWindow

Code: Alles auswählen

If OpenWindow(0,0,0,500,500,"",#PB_Window_SystemMenu) 
  If CreateGadgetList(WindowID(0)) 
    TextGadget(1,10,10,100,200,"Test 1 2 3 4 5 6 7 8",$340|#PB_Text_Border) 
  EndIf 
  
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow 
EndIf