PureBasic Forums - English

Posted: **Sat Sep 21, 2024 8:41 am**

How to open the second window so that the first window does not close when you click the cross of the second window?

OpenWindow(0, 200, 100, 300, 300, "Window 1")
OpenWindow(1, 300, 300, 200, 200, "Window 2")
EditorGadget(0, 0, 0, 200, 100)
Repeat
  Select WaitWindowEvent()
    Case #PB_Event_CloseWindow
      End
  EndSelect
ForEver

Posted: **Sat Sep 21, 2024 8:47 am**

Do you mean like this?

Code: Select all

OpenWindow(0, 200, 100, 300, 300, "Window 1")
OpenWindow(1, 300, 300, 200, 200, "Window 2")
EditorGadget(0, 0, 0, 200, 100)
Repeat
  Select WaitWindowEvent()
    Case #PB_Event_CloseWindow
      Select EventWindow()
        Case 0 : End
        Case 1 : CloseWindow(1)
      EndSelect
  EndSelect
ForEver

Posted: **Sat Sep 21, 2024 8:50 am**

Yes! Thanks!

PureBasic Forums - English

Second window

Second window

Re: Second window

Re: Second window