Window in Window

BlitzMax Forums/BlitzMax Beginners Area/Window in Window

Can someone help me. My application opens a window, with action buttons. One will open a new window with another action button. Then i have done my work on the secound window and i close it, my application quit. I want close only the secound window and work on the first window. Some IDEA'S?!?!
I am a GUI newbe!

TomToad

You need to check the source of the event.

Strict
Local MainWindow:TGadget = CreateWindow("Main",100,100,640,480)
Local NewWindow:TGadget = CreateWindow("Child",10,10,320,240,MainWindow)

Repeat
 WaitEvent()
 Select EventID()
 Case EVENT_WINDOWCLOSE
  Select EventSource()
  Case NewWindow
   FreeGadget(NewWindow)
  Case MainWindow
   End
  End Select
 End Select
Forever

Also this should be posted in the beginner's forum, not the tutorial forum. :)