..Why does this STILL not work (its been like 3-4 yrs)??
Framework maxgui.win32maxgui
Import brl.eventqueue
Local w:TGadget = CreateWindow("Test", 100, 100, 200, 200, Null, WINDOW_TITLEBAR)
Local la:TGadget = CreateLabel("HELLO", 50, 50, 100, 20, w, LABEL_FRAME | LABEL_CENTER)
Local b1:TGadget = CreateButton("RED",50, 100, 40, 40, w)
Local b2:TGadget = CreateButton("BLUE", 100, 100, 40, 40, w)
Repeat
Select WaitEvent()
Case EVENT_GADGETACTION
Select EventSource()
Case b1
SetGadgetColor la, 255, 0, 0
Case b2
SetGadgetColor la, 0, 0, 255, True
End Select
Case EVENT_WINDOWCLOSE
End
End Select
Forever
Any workarounds? (no, using max2d and a canvas is not an option, has to be memory efficient)
|