Default and cancel buttons work again.

[GB.WEB.GUI]
* BUG: Default and cancel buttons work again.

comp/src/gb.web.gui/.project

@@ -1,6 +1,6 @@
 # Gambas Project File 3.0
 Title=Web application development using processes as session
-Startup=Webform3
+Startup=Webform1
 Icon=.hidden/webform.png
 Version=3.17.90
 VersionFile=1

comp/src/gb.web.gui/.src/WebForm.class

@@ -1531,6 +1531,9 @@ Private Sub DisableShortcuts()
     Next
   Endif
   
+  If $iDefault Then cShortcut["ENTER"] = True
+  If $iCancel Then cShortcut["ESCAPE"] = True
+  
   If cShortcut.Count = 0 Then Return
   
   _AddJavascript("gw.shortcuts = " & JS(cShortcut))