SetGadgetFont(#Gadget, FontID)

Anfängerfragen zum Programmieren mit PureBasic.
Peter aus der Nordheide
Beiträge: 34
Registriert: 18.05.2005 14:59

SetGadgetFont(#Gadget, FontID)

Beitrag von Peter aus der Nordheide »

Hallo zusammen,

Aus der Hilfe :
Wird für den Zeichensatz 'FontID' die Konstante #PB_Default angegeben, so wird der Standard-Zeichensatz gesetzt.

SetGadgetFont(#PB_Default ,#PB_Default)

Welcher Zeichensatz wird denn als Standard-Zeichensatz mit welcher Zeichengröße verwendet ?

Ist es möglich einen anderen Zeichensatz als Standard-Zeichensatz zu deklarieren ?


Am Rande bemerkt. Eine böse Falle für Anfänger :

SetGadgetFont(#Gadget, FontID) - - - #Gadget ist nicht die Gadget-Nummer

Ich wollte ein einzelnes Gadget mit der Gadgetnummer ansprechen, hat zum sofortigen Abbruch geführt :

SetGadgetFont(104 ,UseFont(2))

TextGadget(104, 50, 200,150,50," Überschrift ")

Wenn man's kapiert hat, ist es klar wie Fleischbrühe - nur bei mir hat es etwas länger gedauert.

Aber dafür "sitzt" es jetzt auch - hoffentlich.

Gruß Peter
Christi
Beiträge: 154
Registriert: 31.08.2004 14:17
Kontaktdaten:

Re: SetGadgetFont(#Gadget, FontID)

Beitrag von Christi »

Code: Alles auswählen

TextGadget(104,50, 200,150,50," Überschrift ")
SetGadgetFont(104,UseFont(2))
andersrum musses sein, sonst gibts das gadget ja noch garnicht.
Peter aus der Nordheide
Beiträge: 34
Registriert: 18.05.2005 14:59

Re: SetGadgetFont(#Gadget, FontID)

Beitrag von Peter aus der Nordheide »

Christi hat geschrieben:

Code: Alles auswählen

TextGadget(104,50, 200,150,50," Überschrift ")
SetGadgetFont(104,UseFont(2))
andersrum musses sein, sonst gibts das gadget ja noch garnicht.
Hallo Christi,

hat ein wenig länger gedauert, aber nun hab' ich's endlich kapiert.

Für andere, die vielleicht auch - wie ich - Probleme damit haben, hier zum ausprobieren :

Code: Alles auswählen

If OpenWindow(0,600,0,200,600,#PB_Window_Systemmenu,"  Font Übungen")
EndIf                                              


If CreateGadgetList(WindowID())   

LoadFont (0,"Courier"   ,16)
LoadFont (1,"Arial Fett",10)
LoadFont (2,"Arial"     ,20)
LoadFont (3,"Arial"     , 9)

SetGadgetFont(#PB_Default ,#PB_Default)

TextGadget(101, 50,  50,150,50," Text 1 ",#PB_Text_Center)

TextGadget(102, 50, 100,150,50," Text 2 ",#PB_Text_Center)   ; manipuliert, siehe unten

TextGadget(103, 50, 150,150,50," Text 3 ",#PB_Text_Center)

TextGadget(104, 50, 200,150,50," Text 4 ",#PB_Text_Center)  

SetGadgetFont(#PB_Default ,UseFont(0))                 
                                    
TextGadget(105, 50, 250,150,50," Text 5 ",#PB_Text_Center)   ; manipuliert, siehe unten

TextGadget(106, 50, 300,150,50," Text 6 ",#PB_Text_Center)

TextGadget(107, 50, 350,150,50," Text 7 ",#PB_Text_Center)

TextGadget(108, 50, 400,150,50," Text 8 ",#PB_Text_Center)

TextGadget(109, 50, 450,150,50," Text 9 ",#PB_Text_Center)

SetGadgetFont(105,UseFont(2))                   ; werden die beiden auskommentiert,
SetGadgetFont(102,UseFont(0))                   ; kann man wunderschön die Wirkung sehen


Repeat : Until WaitWindowEvent()=#PB_Event_CloseWindow

EndIf 
End 
Bleibt noch die Frage nach dem Standardzeichensatz :

SetGadgetFont(#PB_Default ,#PB_Default)

Welcher Zeichensatz wird denn als Standard-Zeichensatz mit welcher Zeichengröße verwendet ?

Ist es möglich einen anderen Zeichensatz als Standard-Zeichensatz zu deklarieren ?



Nochmals vielen Dank

Gruß Peter
Antworten