New WinBlitz3D beta

Blitz3D Forums/Blitz3D Programming/New WinBlitz3D beta

The forum is locked. These are the original blitzbasic.com forums, kept so they can still be read. No new topics, replies or edits can be made here. To join in, head over to the Blitz3D+ forums.

Mr. Picklesworth, a temporary fix.


; 
Include "WinBlitz3D_Include.bb"

; create gui window.
Global GUIwindow = CreateWindow("WinBlitz3D CreateWindow Example",10,15,800,500,0,0)
Global GUIwindow2 = CreateWindow("WinBlitz3D CreateWindow Example",10,15,800,500,0,0)
apiSetParent GUIwindow2,GUIwindow


; loop until user close's window.
While events <> $803

	events = WaitEvent()
	
	Select events

		Case $1001
			MenuSelected = EventData()
			Notify "Menu Event, You Selected Menu "+MenuSelected
				
		Case $401
			GadgetSelected = EventSource()
			Notify "Gadget Event, Pointer "+GadgetSelected	
	
	End Select
			
Wend
Notify "UnInitializing GUI"
End


kev