Window in Window

BlitzMax Forums/BlitzMax Beginners Area/Window in Window

MacSven(Posted 2006) [#1]
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(Posted 2006) [#2]
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. :)