For example, if the last event received was a keystroke event, EventData will return the ascii code of the keystroke. Or, in the case of a menu click event, EventData will return the id of that menu item specified when it was created.
; Example originally provided by Mag, tidied up by Mark Tiffany
; First, we create a window
WinHandle=CreateWindow("Window, Menu and EventData Example",0,0,400,200)
; Now we set up the menus. Two menus, File and Edit, with different sub menu items.
; Set up the first main menu.
; Note that the second parameter specifies a unique ID For the menu item.
; This will be returned to us in EventData() when the event occurs.
CreateMenu "Open",1,file ; the first child menu item
CreateMenu "Shortcut F5",2,file ;child menu with shortcut sample
CreateMenu "",0,file ; a separator can be implemented by leaving the text blank
CreateMenu "Quit",3,file ; and another child menu item
; Now set up the second menu.
; Note that ALT shortcuts have been enabled by prefixing the desired letter with an ampersand "&"
; Now that we have set up the window and menus, we need to a main loop to handle their events
If ID=$803 Then Exit ; Handle the close gadget on the window being hit
If ID=$1001 Then ; Handle any menu item hit events
; extract the EventData as this will contain our unique id for the menu item
If EID=1 Then Notify "Open selected"
If EID=2 Then Notify "Shortcut selected"
If EID=3 Then Notify "Quit selected": Exit
If EID=4 Then Notify "Copy selected"
If EID=5 Then Notify "Paste selected"
If EID=6 Then Notify "Cut selected"
End ; bye!
BlitzPlus Manual Forum
Blitz3D Equivalent Command
| Blitz BASIC Founders Fund || |