SetGadgetFont funktioniert nicht

[PB42]

Hallo,

ich kriege das Arbeiten mit SetGadgetFont nicht hin. Der begonnene Code sieht wie folgt aus:

Code: Alles auswählen

OpenWindow(0,100,0,500,300,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"")
CreateGadgetList(WindowID(0))

If LoadFont(0,"Arial",18) 
SetGadgetFont(#PB_Default,FontID())
EndIf
      
StringGadget(0,50,140,50,30,"28")
StringGadget(1,150,140,50,30,"10")
StringGadget(2,250,140,70,30,"2005")
TextGadget(3,350,142,100,30,"Freitag")

If LoadFont(0,"Arial",12) 
SetGadgetFont(#PB_Default,FontID())
EndIf

TextGadget(4,65,110,30,20,"Tag")
TextGadget(5,160,110,30,20,"Monat")
TextGadget(6,275,110,30,20,"Jahr")

Repeat
eventID = WaitWindowEvent()
Until EventID = #PB_Eventclosewindow

Alle StringGadgets und das TaxtGadget(3) sollen Schriftgröße 18 haben und die TextGadgets 4, 5 und 6 eine wesentlich kleinere Schriftgröße: Warum zum Kuckuck beeinflußt die zweite Schriftgrößeneinstellung diejenige, die DAVOR liegt? Danke.

PB42

[Forgotten Tomb]

Hallo,

vielleicht liegt es daran ^^

Aus der PB-Hilfe:
Wenn für #Gadget die Konstante #PB_Default angegeben wird, dann wird der Zeichensatz 'FontID' für alle nachfolgend erzeugten Gadgets benutzt.

[PB42]

Das stimmt, aber das ist ja nicht das Problem.

[Forgotten Tomb]

na dann nicht

[PB42]

Das muß doch aber irgendwie lösbar sein. So ein Blödsinn muß doch längst schonmal jemandem aufegefallen sein.

PB42

[bobobo]

Die ID's sind schon wichtig.

Code: Alles auswählen

OpenWindow(0,100,0,500,300,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"") 
CreateGadgetList(WindowID(0)) 

If LoadFont(0,"Arial",18) 
SetGadgetFont(#PB_Default,FontID()) 
EndIf 
      
StringGadget(0,50,140,50,30,"28") 
StringGadget(1,150,140,50,30,"10") 
StringGadget(2,250,140,70,30,"2005") 
TextGadget(3,350,142,100,30,"Freitag") 

If LoadFont(1,"Arial",12)  ;  <----------  die Id gibt es nur zum Spaß, oder?
SetGadgetFont(#PB_Default,FontID()) 
EndIf 

TextGadget(4,65,110,30,20,"Tag") 
TextGadget(5,160,110,30,20,"Monat") 
TextGadget(6,275,110,30,20,"Jahr") 

Repeat 
eventID = WaitWindowEvent() 
Until EventID = #PB_EventCloseWindow

Wenn das Blödsinn ist dann solltest Du vielleicht besser mit Deiner Eisenbahn spielen statt mit Purebasic.

[PB42]

Das mit den IDs hatte ich übersehen, Danke für den Tipp. Stichwort Eisenbahn: Nenn dich doch BoahBoahBoah, wenn du als Anfänger gleich alles konntest.

PB42