FryGUI

BlitzMax Forums/BlitzMax Programming/FryGUI

Yep, you're only changing the colours of the panels. You've got your loop running through the fry_GUI.gPanels list.

All the other gadgets are children of those panels, so you'd need to get another loop going.

For Local g:fry_TGadget = EachIn fry_GUI.gPanels
		g.HexColour(col)
		g.HexTextColour(txtcol)

		For Local child:fry_TGadget = EachIn g.Children
			g.HexColour(col)
			g.HexTextColour(txtcol)
		Next
	Next 


That should do it in a simple way. However, some gadgets may have children of their own so you'd be better off doing it recursively.

I had similar plans myself to get the GUI system to support colour schemes. I put it on hold while I worked on other aspects but I do plan to return to it, and hopefully create one that doesn't need to be a single colour.