
Eigentlich erwartet man doch da das gleiche Verhalten bezüglich der Textausrichtung wie bei einem einzeiligen Buttongadget. Handelt es sich hier um einen Bug?
Ich hab das mal mit einem Codeschnippsel aus dem Forum getestet:
Code: Alles auswählen
; #BS_LEFT = $00000100
; #BS_RIGHT = $00000200
; #BS_TOP = $00000400
; #BS_CENTER = $00000300
; #BS_BOTTOM = $00000800
Testbutton.s
Testbutton = ""
Testbutton = Testbutton + "Das ist ein" + #CRLF$
Testbutton = Testbutton + "Ellenlanger Text" + #CRLF$
Testbutton = Testbutton + "zum testen der Ausrichtfunktion" + #CRLF$
Testbutton = Testbutton + "des" + #CRLF$
Testbutton = Testbutton + "Buttons."
If OpenWindow(0, 100, 100, 640,480, "PureBasic Window", #PB_Window_SystemMenu | #PB_Window_TitleBar | #PB_Window_ScreenCentered)
l=100:h=40
x=WindowWidth(0)/2-(l/2):y=WindowHeight(0)/2-(h/2)
ButtonGadget(0,x,y,l,h,"NORMAL")
ButtonGadget(1,x-l-20,y,l,h,"LEFT",#BS_LEFT)
ButtonGadget(2,x+l+20,y,l,h,"RIGHT",#BS_RIGHT)
ButtonGadget(3,x,y-h-20,l,h,"TOP",#BS_TOP)
ButtonGadget(4,x,y+h+20,l,h,"BOTTOM",#BS_BOTTOM)
ButtonGadget(5,x-l-20,y-h-20,l,h,"TOP LEFT",#BS_LEFT|#BS_TOP)
ButtonGadget(6,x+l+20,y-h-20,l,h,"TOP RIGHT",#BS_RIGHT|#BS_TOP)
ButtonGadget(7,x-l-20,y+h+20,l,h,"BOTTOM LEFT",#BS_BOTTOM|#BS_LEFT)
; ButtonGadget(8,x+l+20,y+h+20,l,h,"BOTTOM RIGHT",#BS_BOTTOM|#BS_RIGHT)
ButtonGadget(8,x+l+20,y+h+20,l,h, Testbutton,#PB_Button_MultiLine|#BS_CENTER)
Repeat
EventID = WaitWindowEvent(100)
Select EventID
Case #PB_Event_CloseWindow
Quit = 1
EndSelect
Until Quit = 1
EndIf
End