diff options
| author | Ian C <ianc@noddybox.co.uk> | 2020-06-12 21:50:55 +0000 |
|---|---|---|
| committer | Ian C <ianc@noddybox.co.uk> | 2020-06-12 21:50:55 +0000 |
| commit | 64e351fba0f50c326bcc29ad9585a814755bfa8d (patch) | |
| tree | 231f70fccd4bf3ba788b3803e2e547d327e50000 | |
| parent | 6c0b11a6bb632a5c7cd29ad8a92ce31fe929c194 (diff) | |
If AppTerminate event recieved, End. Need to work out how to notify the
application that this is happening.
| -rw-r--r-- | mwidget.mod/mwidget.bmx | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/mwidget.mod/mwidget.bmx b/mwidget.mod/mwidget.bmx index 51b2573..88487f9 100644 --- a/mwidget.mod/mwidget.bmx +++ b/mwidget.mod/mwidget.bmx @@ -61,6 +61,7 @@ ModuleInfo "Author: Ian Cowburn" ModuleInfo "Version: $Revision$"
Import maxgui.maxgui
+Import maxgui.drivers
Import brl.linkedlist
Import brl.event
Import brl.timer
@@ -2766,12 +2767,21 @@ Type Static EndIf
Next
Else
+ Local handled:Int = False
+
For Local g:TMWidget=EachIn list
If g And g.gadget And g.gadget=e.source
DebugLog "Passing event to " + g.ToString()
g.Handle(e)
+ handled = True
EndIf
Next
+
+ If Not handled
+ If e.id = 259
+ End
+ EndIf
+ EndIf
EndIf
EndIf
|