From 56340ea4bd5a991317cdea6c28c16e4409263f66 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Beno=C3=AEt=20Minisini?= <gambas@users.sourceforge.net>
Date: Thu, 7 Jul 2016 22:51:00 +0000
Subject: [PATCH] [GB.WEB.FORM] * BUG: WebTextBox: Report the Text property to
 the server when the control has lost the focus. * BUG: WebComboBox: Report
 the Text property to the server when the control has lost the focus.

git-svn-id: svn://localhost/gambas/trunk@7811 867c0c6c-44f3-4631-809d-bfa615b0a4ec
---
 comp/src/gb.web.form/.src/WebComboBox.class | 2 +-
 comp/src/gb.web.form/.src/WebTextBox.class  | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/comp/src/gb.web.form/.src/WebComboBox.class b/comp/src/gb.web.form/.src/WebComboBox.class
index ee923b2c8..fae04c189 100644
--- a/comp/src/gb.web.form/.src/WebComboBox.class
+++ b/comp/src/gb.web.form/.src/WebComboBox.class
@@ -51,7 +51,7 @@ Public Sub _Render()
   Dim I As Integer
   
   If Not $bReadOnly Then
-    Print "<input id=\""; Me.Name; ":entry\" class=\"gw-combobox-text\" type=\"text\" value=\""; Html(Text_Read()); "\""; Me._GetUpdateJS("onchange", "text", "this.value"); 
+    Print "<input id=\""; Me.Name; ":entry\" class=\"gw-combobox-text\" type=\"text\" value=\""; Html(Text_Read()); "\""; Me._GetUpdateJS("onchange", "text", "this.value"); Me._GetUpdateJS("onblur", "text", "this.value"); 
     If Not Me.Enabled Then Print " disabled";
     Print ">";
     Print "<div class=\"gw-combobox-arrow\">";
diff --git a/comp/src/gb.web.form/.src/WebTextBox.class b/comp/src/gb.web.form/.src/WebTextBox.class
index 7feaad384..e8fec8a04 100644
--- a/comp/src/gb.web.form/.src/WebTextBox.class
+++ b/comp/src/gb.web.form/.src/WebTextBox.class
@@ -41,7 +41,7 @@ End
 
 Public Sub _BeforeRender()
   
-  Print "<input type=\"text\""; Me._GetClassId(); Me._GetUpdateJS("onchange", "text", "this.value");
+  Print "<input type=\"text\""; Me._GetClassId(); Me._GetUpdateJS("onchange", "text", "this.value"); Me._GetUpdateJS("onblur", "text", "this.value");
   Me._RenderStyleSheet()
   If Not Me.Enabled Then Print " disabled";
   If $bReadOnly Then Print " readonly";