Adding minimise / maximise to window?

BlitzMax Forums/BlitzMax Programming/Adding minimise / maximise to window?

With MAXGUI this would be one way
Local style = WINDOW_TITLEBAR|WINDOW_RESIZABLE

MyFirstWindow:TGadget=CreateWindow("My Window", 200,200,320,240,Null,style)

Repeat
 WaitEvent()
Until EventID()=EVENT_WINDOWCLOSE

End