EVENT_KEYDOWN

BlitzMax Forums/BlitzMax GUI Programming/EVENT_KEYDOWN

The Forum Archive is locked. These are the original blitzbasic.com forums, kept so their posts can still be read and searched. No new topics, replies or edits can be made here. To join the conversation, head over to the Blitz3D+ forums.

Topshot
 #1
Can anybody tell me why this dosn't work?




Import MaxGUI.Win32MaxGUIEx


Local MyWindow:TGadget = CreateWindow("My Window",100,100,800,600)
Local MyPanel:TGadget = CreatePanel(600,0,180,500,MyWindow,PANEL_GROUP,"MyPanel")
SetPanelColor MyPanel, 192, 192, 192

Repeat
	WaitEvent()
	Select EventID()
		Case EVENT_WINDOWCLOSE
		End
		Case EVENT_KEYDOWN
			Select EventData ()
		         Case KEY_ESCAPE
		          End
		         Case KEY_A
		          End
		      End Select
	End Select
Forever