Seite 1 von 1

Font von TreeGadget-Item

Verfasst: 26.03.2010 14:39
von CSHW89
Hi Leute,
kleine frage. ich hatte gehofft, dass die antwort auf meine frage in den Snippets von RSBasic ist. dem ist leider nicht so. deshalb muss ich euch ein wenig belestigen.
ich möchte eigentlich nur den font eines eintrags eines treegadgets ändern. hab halt mehrere einträge und manche sollen 'Symbol' sein, also griechische buchstaben.

Code: Alles auswählen

If OpenWindow(0, 0, 0, 200, 200, "Test", #PB_Window_SystemMenu|1)
  TreeGadget(1, 10, 10, 180, 180)
  AddGadgetItem(1, -1, "a")
  AddGadgetItem(1, -1, "a") ;<--- dieser soll z.B. symbol sein
  
  
  Repeat: Until WaitWindowEvent()=#PB_Event_CloseWindow
EndIf
hoffe ihr hab vorschläge, danke schon mal,
lg kevin

Re: Font von TreeGadget-Item

Verfasst: 26.03.2010 16:04
von STARGÅTE
Wenn du "nur" griechische Buchstaben brauchst, kannst du das auch mit nur einer Schrift art erreichen, welche UNICODE unterstützt:

Einfach UniCode-Exe aktiveren und das ergebnis wäre:

Code: Alles auswählen

For n = $3b1 To $3b4
 Gri$ + Chr(n)+" "
Next

If OpenWindow(0, 0, 0, 200, 200, "Test", #PB_Window_SystemMenu|1)
  TreeGadget(1, 10, 10, 180, 180)
  AddGadgetItem(1, -1, "a b c d ")
  AddGadgetItem(1, -1, Gri$)
   
  Repeat: Until WaitWindowEvent()=#PB_Event_CloseWindow
EndIf
Bild

Re: Font von TreeGadget-Item

Verfasst: 26.03.2010 20:11
von CSHW89
ach ja, komplizierte fragen haben meist einfache lösungen :oops: . danke danke danke
lg kevin

Re: Font von TreeGadget-Item

Verfasst: 27.03.2010 01:35
von STARGÅTE
es gibt sicher auch n API lösung, wie es bei ListIconGadget möglich ist:
http://www.purearea.net/pb/CodeArchiv/G ... or+Font.pb

Re: Font von TreeGadget-Item

Verfasst: 27.03.2010 01:41
von CSHW89
das hatte ich auch schon gesehen. hab ein wenig rumexperimentiert. hat aber i-wie nicht funktioniert. naja egal, ich habs jetzt mit unicode gemacht, also danke nochmal
lg kevin