Textfarbe

[The_Dark_Zim-.-]

Hey Ho
hab eine kleine Frage. Wenn ich viele Textgadget's hab und die alle in ein und der selbe Farbe färbe wird das ziehmlich viel. Kann man das nicht mit einem Befehl machen ? Also Text = Rot und alle Texte werden Rot gefärbt.

Guß Zim und danke an alle die Helfen

[STARGÅTE]

also Gagdet-NUmmer einfach -1 nehmen ...
aber das muss vorher geschehen ... glaub ich

[Kiffi]

also Gagdet-NUmmer einfach -1 nehmen ...
aber das muss vorher geschehen ... glaub ich

da bist Du IMO auf dem selben falschen Dampfer, wie ich es grade war.
Farbe, nicht Font.

Grüße ... Kiffi

[The_Dark_Zim-.-]

Also mit Farbe gehts nicht. Vllt sollte man einfach eine "for next" Schleife machen ?

[Kiffi]

Vllt sollte man einfach eine "for next" Schleife machen ?

japp. Bietet sich bei TextGadgets sowieso an (sofern Du sie nicht im weiteren
Verlauf verwenden willst). Diese kannst Du dann mit #PB_ANY erstellen.

Grüße ... Kiffi

[The_Dark_Zim-.-]

Geht wunderbar

Code: Alles auswählen

        For gadget = 12 To 22
        SetGadgetColor(gadget, #PB_Gadget_BackColor, RGB(0, 0, 100))
        SetGadgetColor(gadget, #PB_Gadget_FrontColor, RGB(255, 255, 255))
        Next

Gruß Zim und danke an alle

[marco2007]

Du könntest auch das hier machen:

Code: Alles auswählen

Enumeration
  #erster_Eintrag
  #String_0
  #text_1
  ....
  ...
  ...
  ...
  #Gadget_1
  #letzter_Eintrag_der_Enumeration
EndEnumeration


For gadget = #erster_Eintrag To #letzter_Eintrag_der_Enumeration
  If GadgetType(gadget)=#PB_GadgetType_Text
    SetGadgetColor(gadget, #PB_Gadget_BackColor, RGB(0, 0, 100)) 
    SetGadgetColor(gadget, #PB_Gadget_FrontColor, RGB(255, 255, 255)) 
  EndIf
Next

...dann ist`s egal, welche Nummer die Textgadgets haben.

[AND51]

Ich hab das auch immer so wie marco2007 gemacht.
Aber da es ja auch #PB_Compiler_EnumerationValue gibt, möchte ich das hier demonstrieren. Einfach als letztes vor deine Event-Schleife setzen:

Code: Alles auswählen

For n=0 To #PB_Compiler_EnumerationValue
	If GadgetType(n) = #PB_GadgetType_Text
		SetGadgetColor(n, #PB_Gadget_BackColor, RGB(0, 0, 100))
		SetGadgetColor(n, #PB_Gadget_FrontColor, RGB(255, 255, 255))
	EndIf
Next

[Kaeru Gaman]

ich würde trotzdem die von Kiffi vorgeschlagene Variante vorziehen.

alle Gadgets mit Statischer Anzahl kann mit mit einer normalen Enumeration erzeugen,
diejenigen die man in einer Schleife ansprechen will, erzeugt man mit #PB_Any
und rückspeichert die ID in einem Array oder einer Liste.

[AND51]

Rote Textgadgets kann man sich aber am einfachsten mit Macros erstellen:

Code: Alles auswählen

Macro RedTextGadget(ID, x, y, width, height, Text, Flags)
   ; ...
EndMacro

Was in das Macro kommt, kann man sich ja denken.