Code: Select all
If OpenWindow(0, 0, 0, 500, 500, "Main Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
ButtonGadget(0, 10, 10, 150, 25, "Button 1")
; Create Window with #PB_Window_NoGadgets to prevent automatic GadgetList creation
If OpenWindow(1, 0, 0, 300, 200, "Child Window", #PB_Window_TitleBar | #PB_Window_WindowCentered | #PB_Window_NoGadgets, WindowID(0))
OldGadgetList = UseGadgetList(WindowID(1)) ; Create GadgetList and store old GadgetList
ButtonGadget(10, 10, 10, 150, 25, "Child Window Button")
UseGadgetList(OldGadgetList) ; Return to previous GadgetList
EndIf
ButtonGadget(1, 10, 45, 150, 25, "Button 2") ; This will be on the main window again
Repeat
event=WaitWindowEvent()
If event=#PB_Event_Gadget
gadget=EventGadget()
Debug(gadget)
EndIf
Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf
