PureBasic Forums - English

Posted: **Sat Sep 01, 2007 8:30 pm**

I'm not entirely sure on what people call this, But I'll try to explain what i am looking for.

Say for instance, You have a normal window open in Windows XP. Gasp! A popup! (MessageRequester, in this situation) I'll just drag it out of the way and keep --- What? The popup still has focus no matter how much i click the window? Perhaps if i close the popup it will regain focus in the way i want! *Click's "OK"*, It works! Gasp!

-- Yeah, Anyway... What I'm trying to figure out is how i can do that with Two Windows, Window A - Opens Window B, Window A - Can't be used until Window B is closed. If someone could kick me in the right direction that would be great.

Hope someone can make sense of this. :roll:

- CaD3X

Posted: **Sat Sep 01, 2007 8:35 pm**

Code: Select all

OpenWindow(0,0,0,320,240,"parent",#PB_Window_SystemMenu | #PB_Window_ScreenCentered)
CreateGadgetList(WindowID(0))
ButtonGadget(0,10,10,100,25,"Show Popup")

Repeat
	EventID = WaitWindowEvent()
	
	If EventID = #PB_Event_Gadget
		If EventGadget() = 0
			DisableWindow(0,1)
			OpenWindow(1,0,0,250,120,"Popup",#PB_Window_SystemMenu | #PB_Window_ScreenCentered)		
			CreateGadgetList(WindowID(1))
			ButtonGadget(1,10,10,100,25,"Close Popup")
		ElseIf	EventGadget() = 1
			DisableWindow(0,0)
			CloseWindow(1)
		EndIf
	EndIf
	
	If EventID = #PB_Event_CloseWindow
		Select EventWindow()
			Case 0 : Quit = 1
			Case 1
			DisableWindow(0,0)
			CloseWindow(1)
		EndSelect
	EndIf
Until Quit = 1

Posted: **Sat Sep 01, 2007 8:39 pm**

Ah! Brilliant thank you.

Thanks for the fast response also.

PureBasic Forums - English

Window Focus

Window Focus