Data commit

Task/Events/Lingo/events-1.lingo

@@ -0,0 +1,9 @@
+-- the current window was closed
+on closeWindow
+...
+end
+
+-- the left mouse button was pressed by the user
+on mouseDown
+...
+end

Task/Events/Lingo/events-2.lingo

@@ -0,0 +1,8 @@
+-- send event #mouseDown programmatically to sprite 1
+sendSprite(1, #mouseDown)
+
+-- send custom event #foo to named sprite "bar"
+sendSprite("bar", #foo)
+
+-- send custom event #fooBar to all existing sprites
+sendAllSprites(#fooBar)

Task/Events/Lingo/events-3.lingo

@@ -0,0 +1,15 @@
+mx = xtra("Msg").new()
+
+-- send message WM_LBUTTONDOWN to a specific window identified by HWND hwnd
+WM_LBUTTONDOWN = 513
+MK_LBUTTON = 1
+lParam = 65536*y + x
+mx.send_msg (hwnd, WM_LBUTTONDOWN, MK_LBUTTON, lParam)
+
+-- listen for WM_COPYDATA and WM_MOUSEWHEEL messages sent to current application
+-- window, notify Lingo callback function 'msgReceived' when such messages occur.
+-- This callback function will receive hwnd, message, wParam and lParam as arguments
+-- (and for WM_COPYDATA messages also the data that was sent as ByteArray).
+WM_COPYDATA = 74
+WM_MOUSEWHEEL = 522
+mx.msg_listen([WM_COPYDATA, WM_MOUSEWHEEL], VOID, #msgReceived)